private void BtnImprimir_Click(object sender, EventArgs e)
{
CadVeic.LerDados(Mapa.IdVeiculo);
string sSql = "SELECT T1.ID_VENDA,T1.NUMDOCUMENTO,T1.FORMNF,T2.RAZAOSOCIAL,RTRIM(T1.ENDERECO)+','+RTRIM(T1.NUMERO)+' '+RTRIM(T1.COMPLEMENTO) AS ENDERECO," +
" T1.FONE,T1.CEP,T1.BAIRRO,T1.CIDADE,T3.ENTREGADOR,T4.VENDEDOR,T5.FORMAPGTO,T1.ID_VDMASTER,T1.VLRTOTAL,T7.VENCIMENTO,T7.VLRORIGINAL,T1.PREVENTREGA,T8.DOCUMENTO FROM MAPAENTREGAITENS MP" +
" LEFT JOIN MVVENDA T1 ON (T1.ID_VENDA=MP.ID_VENDA)" +
" LEFT JOIN PESSOAS T2 ON (T2.ID_PESSOA=T1.ID_PESSOA)" +
" LEFT JOIN ENTREGADORES T3 ON (T3.ID_ENTREGADOR=T1.ID_ENTREGADOR)" +
" LEFT JOIN VENDEDORES T4 ON (T4.ID_VENDEDOR=T1.ID_VENDEDOR)" +
" LEFT JOIN FORMAPAGAMENTO T5 ON (T5.ID_FORMAPGTO=T1.ID_FORMAPGTO)" +
" LEFT JOIN LANCFINANCEIRO T7 ON (T7.ID_VENDA=T1.ID_VENDA)" +
" LEFT JOIN TIPODOCUMENTO T8 ON (T8.ID_DOCUMENTO=T7.ID_TIPODOCUMENTO)" +
" WHERE MP.STATUS=0 AND MP.ID_MAPA=" + Mapa.IdMapa.ToString();
sSql = sSql + " ORDER BY T2.RAZAOSOCIAL,T1.ID_VENDA";
BtnImprimir.Enabled = false;
FrmRelatorios FrmRel = new FrmRelatorios();
Relatorios.RelMapEntrega RelMapa = new Relatorios.RelMapEntrega();
DataSet TabRel = new DataSet();
TabRel = Controle.ConsultaTabela(sSql);
RelMapa.Database.Tables[0].SetDataSource(TabRel.Tables[0]);
FrmRel.cryRepRelatorio.ReportSource = RelMapa;
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section2.ReportObjects["LblFilial"])).Text = FrmPrincipal.LstFilial.Text.Trim();
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section5.ReportObjects["LblRodaPe"])).Text = FrmPrincipal.Rel_RodaPe;
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section2.ReportObjects["LblPeriodo"])).Text = "Mapa: " + string.Format("{0:D5}", Mapa.IdMapa) + " Veiculo: " + CadVeic.Veiculo.ToString().Trim() + " Placa: " + CadVeic.Placa.ToString().Trim();
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section2.ReportObjects["LblConferente"])).Text = "Conferente: " + Mapa.Conferente.Trim();
FrmRel.ShowDialog();
BtnImprimir.Enabled = true;
}
public virtual CrystalDecisions.CrystalReports.Engine.ReportDocument CreateReport()
{
RelMapEntrega rpt = new RelMapEntrega();
rpt.Site = this.Site;
return(rpt);
}
private void BtnImprimir_Click(object sender, EventArgs e)
{
if (LstPesqEntregador.SelectedValue.ToString() == "0")
{
MessageBox.Show("Selecione um Entregador", "Atenção", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
string sSql = "SELECT T1.ID_VENDA,T1.NUMDOCUMENTO,T1.FORMNF,T2.RAZAOSOCIAL,RTRIM(T1.ENDERECO)+','+RTRIM(T1.NUMERO)+' '+RTRIM(T1.COMPLEMENTO) AS ENDERECO," +
" T1.FONE,T1.CEP,T1.BAIRRO,T1.CIDADE,T3.ENTREGADOR,T4.VENDEDOR,T5.FORMAPGTO,T1.ID_VDMASTER,T1.VLRTOTAL,T7.VENCIMENTO,T7.VLRORIGINAL,T1.PREVENTREGA,T8.DOCUMENTO FROM MVVENDA T1" +
" LEFT JOIN PESSOAS T2 ON (T2.ID_PESSOA=T1.ID_PESSOA)" +
" LEFT JOIN ENTREGADORES T3 ON (T3.ID_ENTREGADOR=T1.ID_ENTREGADOR)" +
" LEFT JOIN VENDEDORES T4 ON (T4.ID_VENDEDOR=T1.ID_VENDEDOR)" +
" LEFT JOIN FORMAPAGAMENTO T5 ON (T5.ID_FORMAPGTO=T1.ID_FORMAPGTO)" +
" LEFT JOIN LANCFINANCEIRO T7 ON (T7.ID_VENDA=T1.ID_VENDA)" +
" LEFT JOIN TIPODOCUMENTO T8 ON (T8.ID_DOCUMENTO=T7.ID_TIPODOCUMENTO)" +
" WHERE ((T1.STATUS = 2) OR (T1.STATUS = 1 AND T1.TPVENDA IN ('BONIF','EMVF','CO','PR','AM','TROCA'))) AND T1.ID_ENTREGADOR=" + LstPesqEntregador.SelectedValue.ToString();
if (Chk_Periodo.Checked)
{
sSql = sSql + " AND T1.PREVENTREGA >= Convert(DateTime,'" + Dt1.Value.Date.ToString() + "',103) AND T1.PREVENTREGA <= Convert(DateTime,'" + Dt2.Value.Date.ToString() + "',103)";
}
sSql = sSql + " ORDER BY T2.RAZAOSOCIAL,T1.ID_VENDA";
BtnImprimir.Enabled = false;
FrmRelatorios FrmRel = new FrmRelatorios();
Relatorios.RelMapEntrega RelMapa = new Relatorios.RelMapEntrega();
DataSet TabRel = new DataSet();
TabRel = Controle.ConsultaTabela(sSql);
RelMapa.Database.Tables[0].SetDataSource(TabRel.Tables[0]);
FrmRel.cryRepRelatorio.ReportSource = RelMapa;
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section2.ReportObjects["LblFilial"])).Text = FrmPrincipal.LstFilial.Text.Trim();
((CrystalDecisions.CrystalReports.Engine.TextObject)(RelMapa.Section5.ReportObjects["LblRodaPe"])).Text = FrmPrincipal.Rel_RodaPe;
FrmRel.ShowDialog();
BtnImprimir.Enabled = true;
}
}
