public DSRel_II GetExtratoPagamento(int codProjeto, int?codInvestidor)
{
DSRel_II ds = new DSRel_II();
string sql = @"SELECT DRINVESTIDORES.NOME,DROBRAINVESTIDOR.APARTAMENTO ,DRPAGAMENTOINVESTIDOR.* FROM DRINVESTIDORES
JOIN DROBRAINVESTIDOR ON
DROBRAINVESTIDOR.CODINVESTIDOR = DRINVESTIDORES.CODINVESTIDOR
JOIN DRPAGAMENTOINVESTIDOR ON
DRPAGAMENTOINVESTIDOR.CODIGOPRJ = DROBRAINVESTIDOR.CODIGOPRJ AND
DRINVESTIDORES.CODINVESTIDOR = DRPAGAMENTOINVESTIDOR.CODINVESTIDOR
WHERE
DROBRAINVESTIDOR.CODIGOPRJ = @1 AND
DRPAGAMENTOINVESTIDOR.STATUS = 'A'";
if (codInvestidor != null)
{
sql = sql + " AND DRINVESTIDORES.CODINVESTIDOR =@2 ";
DBCon.Fill(ds.DREXTRATOPAG, sql, codProjeto, codInvestidor);
}
else
{
DBCon.Fill(ds.DREXTRATOPAG, sql, codProjeto);
}
return(ds);
}
public DSRel_II GetDespesasNaoClassificadas(int codProjeto, DateTime?dataIni, DateTime?dataFim)
{
string filtroPer = string.Empty;
if (dataIni != null && dataFim != null)
{
filtroPer = "AND DATAPAG >=@2 AND DATAPAG <=@3";
}
DSRel_II ds = new DSRel_II();
string sql = @"SELECT DRDESPESA.DATAPAG, DRDESPESA.DESCRICAO,DRDESPESA.VALOR,DRFORNECEDOR.NOME,
DRDESPESA.CODETAPA,DRDESPESA.CODATIVIDADE,
CASE STATUS WHEN 'A' THEN 'APROVADO'
ELSE 'Ñ APROV.' END STATUS
FROM DRDESPESA
LEFT JOIN DRFORNECEDOR ON
DRFORNECEDOR.CODFORNECEDOR = DRDESPESA.CODFORNECEDOR
WHERE
( (CODETAPA IS NULL AND CODATIVIDADE IS NULL) OR STATUS <> 'A' )
AND CODIGOPRJ =@1 " + filtroPer;
if (string.IsNullOrEmpty(filtroPer))
{
DBCon.Fill(ds.DRDESPESANAOCLASSIFICADA, sql, codProjeto);
}
else
{
DBCon.Fill(ds.DRDESPESANAOCLASSIFICADA, sql, codProjeto, dataIni, dataFim);
}
return(ds);
}
public void RelatorioDespesasNaoClassificada()
{
if (_dataIni != null && _dataFim != null)
{
}
else
if (_dataIni != null || _dataFim != null)
{
MessageBox.Show("Favor informar a data inicial e final");
return;
}
DRFormAguarde.ExecuteFormWait("Gerando Relatório", "Despesas Não Classificadas ");
ds = ServerDR.GetDespesasNaoClassificadas(DRProjetoContext.DRProjeto.CodProjeto, _dataIni, _dataFim);
if (ds.DRDESPESANAOCLASSIFICADA.Rows.Count == 0)
{
DRFormAguarde.FormAguarde.FinalizaAguarde();
MessageBox.Show("Não foi encontrado nenhuma informação!");
return;
}
DataRow rowEmp = ServerDR.GetInfoEmpresa();
string caminho;
DRRelatorisClass.LoadLogoRel(rowEmp, out caminho);
string titulo = "Relatório de Despesas Não Classificada";
if (_dataIni != null && _dataFim != null)
{
titulo = string.Format("Relatório de Despesas Não Classificada - Período de {0} á {1}", Convert.ToDateTime(_dataIni).ToShortDateString(),
Convert.ToDateTime(_dataFim).ToShortDateString());
}
DRFormAguarde.FormAguarde.FinalizaAguarde();
using (DRViewRel rel = new DRViewRel())
{
Microsoft.Reporting.WinForms.ReportParameter[] parametros =
{
new Microsoft.Reporting.WinForms.ReportParameter("P_OBRA", "Obra: " + DRProjetoContext.DRProjeto.NomeProjeto),
new Microsoft.Reporting.WinForms.ReportParameter("ImageLogo", caminho),
new Microsoft.Reporting.WinForms.ReportParameter("Endereco", DRRelatorisClass.GetEndereco(rowEmp)),
new Microsoft.Reporting.WinForms.ReportParameter("NomeEmpresa", rowEmp["NOME"].ToString()),
new Microsoft.Reporting.WinForms.ReportParameter("TITULO", titulo)
};
rel.ExecuteRel(ds.DRDESPESANAOCLASSIFICADA, "DSRel_II_DRDESPESANAOCLASSIFICADA", "DRRelDespesa_NaoClassificada.rdlc", parametros);
DRRelatorisClass.DeleteImageLogo();
}
ds.Dispose();
}
public DSRel_II GetCotas(int codProjeto)
{
DSRel_II ds = new DSRel_II();
string sql = @"SELECT DRINVESTIDORES.NOME,DRCOTAS.*,DROBRAINVESTIDOR.* FROM DRCOTAS
JOIN DROBRAINVESTIDOR ON
DROBRAINVESTIDOR.CODIGOPRJ = DRCOTAS.CODIGOPRJ AND
DROBRAINVESTIDOR.IDCOTA = DRCOTAS.IDCOTA
JOIN DRINVESTIDORES ON
DRINVESTIDORES.CODINVESTIDOR = DROBRAINVESTIDOR.CODINVESTIDOR
WHERE DROBRAINVESTIDOR.CODIGOPRJ = @1 ";
DBCon.Fill(ds.DRRELCOTAS, sql, codProjeto);
return(ds);
}
public DSRel_II GetPatrimonios(DateTime?dtIni, DateTime?dtFim, int codProjeto)
{
DSRel_II ds = new DSRel_II();
if (dtIni != null && dtFim != null)
{
DBCon.Fill(ds.DRPATRIMONIO, @"SELECT * FROM DRPATRIMONIO WHERE CODIGOPRJ =@1 AND
DATAAQUISICAO >=@2 AND DATAAQUISICAO <=@3 ",
codProjeto, dtIni, dtFim);
}
else
{
DBCon.Fill(ds.DRPATRIMONIO, "SELECT * FROM DRPATRIMONIO WHERE CODIGOPRJ =@1", codProjeto);
}
return(ds);
}
public DSRel_II GetDespesadoPeriodo(DateTime?dtIni, DateTime?dtFim, int codProjeto)
{
DSRel_II ds = new DSRel_II();
if (dtIni != null && dtFim != null)
{
DBCon.Fill(ds.DRDESPESACONFERENCIA, @"SELECT DATAPAG,DESCRICAO,NUMERONOTA,VALOR FROM DRDESPESA
WHERE CODIGOPRJ =@1 AND DATAPAG >=@2 AND DATAPAG <=@3" ,
codProjeto, dtIni, dtFim);
}
else
{
DBCon.Fill(ds.DRDESPESACONFERENCIA, @"SELECT DATAPAG,DESCRICAO,NUMERONOTA,VALOR FROM DRDESPESA
WHERE CODIGOPRJ =@1" , codProjeto);
}
return(ds);
}
public static void RelatorioCota()
{
DRFormAguarde.ExecuteFormWait("Gerando Relatório", "Cotas");
DRRelServer serverRel = new DRRelServer();
serverRel.Initializa(DRContex.Sistema.StringConexao);
using (DSRel_II ds = serverRel.GetCotas(DRProjetoContext.DRProjeto.CodProjeto))
{
if (ds.DRRELCOTAS.Rows.Count == 0)
{
DRFormAguarde.FormAguarde.FinalizaAguarde();
MessageBox.Show("Não foi encontrado nenhuma informação!");
return;
}
DataRow rowEmp = serverRel.GetInfoEmpresa();
string caminho;
LoadLogoRel(rowEmp, out caminho);
using (DRViewRel rel = new DRViewRel())
{
Microsoft.Reporting.WinForms.ReportParameter[] parametros =
{
new Microsoft.Reporting.WinForms.ReportParameter("P_OBRA", "Obra: " + DRProjetoContext.DRProjeto.NomeProjeto),
new Microsoft.Reporting.WinForms.ReportParameter("ImageLogo", caminho),
new Microsoft.Reporting.WinForms.ReportParameter("Endereco", DRRelatorisClass.GetEndereco(rowEmp)),
new Microsoft.Reporting.WinForms.ReportParameter("NomeEmpresa", rowEmp["NOME"].ToString()),
new Microsoft.Reporting.WinForms.ReportParameter("TITULO", "Relatório de Cotas"),
new Microsoft.Reporting.WinForms.ReportParameter("TotalPrevistoCota", serverRel.GetValorTotalPrevistoCota(DRProjetoContext.DRProjeto.CodProjeto).ToString())
};
DRFormAguarde.FormAguarde.FinalizaAguarde();
//rel.AddDataSource("DataSet1_DREMPRESA", ds.DREMPRESA);
rel.ExecuteRel(ds.DRRELCOTAS, "DSRel_II_DRRELCOTAS", "DRRelCotas.rdlc", parametros);
}
DeleteImageLogo();
}
}
public DSRel_II GetEtapa_Atividade_RelDespesa(int codProjeto, DataTable tbFilter, string tipo,
DateTime?dataIni, DateTime?dataFim)
{
DSRel_II ds = new DSRel_II();
string sql =
@"SELECT * FROM
(
SELECT DRATIVIDADE.CodEtapa,DRATIVIDADE.CodAtividade,DRETAPA.DESCRICAO ETAPA,
DRATIVIDADE.DESCRICAO ATIVIDADE,
(
SELECT SUM(VALOR) FROM DRDESPESA WHERE
DRDESPESA.CodigoPrj = DRATIVIDADE.CodigoPrj AND
DRDESPESA.CodEtapa = DRATIVIDADE.CodEtapa AND
DRDESPESA.CODATIVIDADE = DRATIVIDADE.CODATIVIDADE AND
DRDESPESA.STATUS = 'A' {1}
) VALORDESPESA
FROM DRATIVIDADE
JOIN DRETAPA ON
DRETAPA.CodigoPrj = DRATIVIDADE.CodigoPrj AND
DRETAPA.CodEtapa = DRATIVIDADE.CodEtapa
WHERE DRATIVIDADE.CodigoPrj = @1 {0}
) DESPESA WHERE DESPESA.VALORDESPESA > 0";
string filter = GetFiltro("DRATIVIDADE", tbFilter, tipo);
#region Monta Filtro por Periodo
string filtroData = string.Empty;
if (dataIni != null && dataFim != null)
{
filtroData = " AND (DRDESPESA.DATAPAG >= @2 AND DRDESPESA.DATAPAG <= @3)";
}
#endregion
if (!string.IsNullOrEmpty(filter))
{
sql = string.Format(sql, " AND " + filter, filtroData);
}
else
{
sql = string.Format(sql, string.Empty, filtroData);
}
if (!string.IsNullOrEmpty(filtroData))
{
DBCon.Fill(ds.DRETAPA_ATIVIDADE, sql, codProjeto, dataIni, dataFim);
}
else
{
DBCon.Fill(ds.DRETAPA_ATIVIDADE, sql, codProjeto);
}
string sqlDespesa = @"SELECT DRDESPESA.CODETAPA,DRDESPESA.CODATIVIDADE,
DRDESPESA.Descricao,DATAPAG,VALOR,NumeroNota FROM DRDESPESA
WHERE DRDESPESA.CodigoPrj = @1 AND DRDESPESA.STATUS = 'A' {0} {1}";
if (!string.IsNullOrEmpty(filter))
{
filter = filter.Replace("DRATIVIDADE", "DRDESPESA");
sqlDespesa = string.Format(sqlDespesa, filtroData, " AND " + filter);
}
else
{
sqlDespesa = string.Format(sqlDespesa, filtroData, string.Empty);
}
if (!string.IsNullOrEmpty(filtroData))
{
DBCon.Fill(ds.DRDESPESA, sqlDespesa, codProjeto, dataIni, dataFim);
}
else
{
DBCon.Fill(ds.DRDESPESA, sqlDespesa, codProjeto);
}
return(ds);
}
public void RelatorioDespesaPorAtividade()
{
if (_dataIni != null && _dataFim != null)
{
}
else
if (_dataIni != null || _dataFim != null)
{
MessageBox.Show("Favor informar a data inicial e final");
return;
}
if (ServerDR.ExisteDespesasNaoClassificadas(DRProjetoContext.DRProjeto.CodProjeto, _dataIni, _dataFim))
{
MessageBox.Show(Resources.SMensagemValidacaoDespNaoClassificada, "Informação Importante", MessageBoxButtons.OK, MessageBoxIcon.Warning);
}
DRFormAguarde.ExecuteFormWait("Gerando Relatório", "Acompanhamento de Despesa");
if (ckFiltraEtapa.Checked)
{
ds = ServerDR.GetEtapa_Atividade_RelDespesa(DRProjetoContext.DRProjeto.CodProjeto, drSelecAtividade_Etapa1.GetEtapasSelecionadas(), "E",
_dataIni, _dataFim);
}
else
if (ckFiltraAtividade.Checked)
{
ds = ServerDR.GetEtapa_Atividade_RelDespesa(DRProjetoContext.DRProjeto.CodProjeto, drSelecAtividade_Etapa1.GetAtividadesSelecionadas(), "A",
_dataIni, _dataFim);
}
else
{
ds = ServerDR.GetEtapa_Atividade_RelDespesa(DRProjetoContext.DRProjeto.CodProjeto, new DataTable(), string.Empty,
_dataIni, _dataFim);
}
if (ds.DRETAPA_ATIVIDADE.Rows.Count == 0)
{
DRFormAguarde.FormAguarde.FinalizaAguarde();
MessageBox.Show("Não foi encontrado nenhuma informação!");
return;
}
DataRow rowEmp = ServerDR.GetInfoEmpresa();
string valorTotalDespesa = ds.DRDESPESA.Compute("Sum(Valor)", string.Empty).ToString();
string caminho;
DRRelatorisClass.LoadLogoRel(rowEmp, out caminho);
string titulo = "Relatório de Despesa - Etapa/Atividade";
if (_dataIni != null && _dataFim != null)
{
titulo = string.Format("Relatório de Despesa - Etapa/Atividade - Período de {0} á {1}", Convert.ToDateTime(_dataIni).ToShortDateString(),
Convert.ToDateTime(_dataFim).ToShortDateString());
}
DRFormAguarde.FormAguarde.FinalizaAguarde();
using (DRViewRel rel = new DRViewRel())
{
Microsoft.Reporting.WinForms.ReportParameter[] parametros =
{
new Microsoft.Reporting.WinForms.ReportParameter("P_OBRA", "Obra: " + DRProjetoContext.DRProjeto.NomeProjeto),
new Microsoft.Reporting.WinForms.ReportParameter("ImageLogo", caminho),
new Microsoft.Reporting.WinForms.ReportParameter("Endereco", DRRelatorisClass.GetEndereco(rowEmp)),
new Microsoft.Reporting.WinForms.ReportParameter("NomeEmpresa", rowEmp["NOME"].ToString()),
new Microsoft.Reporting.WinForms.ReportParameter("TITULO", titulo),
new Microsoft.Reporting.WinForms.ReportParameter("TotalDespesa", valorTotalDespesa)
};
rel.ExecuteRel(ds.DRETAPA_ATIVIDADE, "DSRel_II_DRETAPA_ATIVIDADE", "DRRelEtapaAtividade.rdlc", parametros,
new SubreportProcessingEventHandler(ProcessaSubRelatorioDespesa));
DRRelatorisClass.DeleteImageLogo();
}
ds.Dispose();
}
