コード例 #1
0
 private void BuscarUltimoLoteFis()
 {
     if ((!string.IsNullOrEmpty(cd_emp.Text)) &&
         (!string.IsNullOrEmpty(cd_imposto.Text)))
     {
         CamadaDados.Fiscal.TList_LoteImposto lImposto =
             new CamadaDados.Fiscal.TCD_LoteImposto().Select(
                 new Utils.TpBusca[]
         {
             new Utils.TpBusca()
             {
                 vNM_Campo = "a.cd_empresa",
                 vOperador = "=",
                 vVL_Busca = "'" + cd_emp.Text.Trim() + "'"
             },
             new Utils.TpBusca()
             {
                 vNM_Campo = "a.cd_imposto",
                 vOperador = "=",
                 vVL_Busca = "'" + cd_imposto.Text.Trim() + "'"
             }
         }, 1, string.Empty, "a.dt_lote desc");
         if (lImposto.Count > 0)
         {
             dt_ultimaApuracao.Text       = lImposto[0].Dt_lotestr;
             this.Vl_credito              = lImposto[0].Vl_credito;
             this.Vl_debito               = lImposto[0].Vl_debito;
             lblSaldoDevedorAnterior.Text = this.Vl_debito.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
             lblSaldoCredorAnterior.Text  = this.Vl_credito.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
         }
         else
         {
             dt_ultimaApuracao.Clear();
             lblSaldoDevedorAnterior.Text = string.Empty;
             lblSaldoCredorAnterior.Text  = string.Empty;
         }
     }
 }
コード例 #2
0
        private void visualizarTodasNotasFiscaisToolStripMenuItem_Click(object sender, EventArgs e)
        {
            if (string.IsNullOrEmpty(cd_empresa.Text))
            {
                MessageBox.Show("Obrigatorio informar empresa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                cd_empresa.Focus();
                return;
            }
            if (DT_Inic.Text.Trim().Equals("/  /"))
            {
                MessageBox.Show("Obrigatorio informar data inicial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                DT_Inic.Focus();
                return;
            }
            if (DT_Final.Text.Trim().Equals("/  /"))
            {
                MessageBox.Show("Obrigatorio informar data final.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
                DT_Final.Focus();
                return;
            }
            BindingSource bs = new BindingSource();

            bs.DataSource = new CamadaDados.Fiscal.TCD_ApuracaoImpostos().SelectApuracaoFiscal(
                new Utils.TpBusca[]
            {
                new Utils.TpBusca()
                {
                    vNM_Campo = "a.cd_empresa",
                    vOperador = "=",
                    vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : string.Empty,
                    vOperador = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "=" : string.Empty,
                    vVL_Busca = clbSerie.Vl_Busca.Trim().Equals(string.Empty) ? "a.nr_serie" : "(a.nr_serie not in(" + clbSerie.Vl_Busca.Trim() + ") or a.tp_nota = 'T')"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = "ISNULL(B.ST_GERASINTEGRA, 'N')",
                    vOperador = "=",
                    vVL_Busca = "'S'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
                    vOperador = ">=",
                    vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Inic.Text).ToString("yyyyMMdd")) + " 00:00:00'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = rbEmissao.Checked ? "a.dt_emissao" : "a.dt_saient",
                    vOperador = "<=",
                    vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = "isnull(a.st_registro, '')",
                    vOperador = "<>",
                    vVL_Busca = "'C'"
                }
            });
            if (bs.Count > 0)
            {
                //Buscar outros debitos/creditos
                CamadaDados.Fiscal.TList_LanctoImposto lImposto =
                    new CamadaDados.Fiscal.TCD_LanctoImposto().Select(
                        new Utils.TpBusca[]
                {
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.cd_empresa",
                        vOperador = "=",
                        vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = "exists",
                        vVL_Busca = "(select 1 from tb_fis_imposto x " +
                                    "where x.cd_imposto = a.cd_imposto " +
                                    "and x.st_icms = 0)"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.dt_lancto",
                        vOperador = "<=",
                        vVL_Busca = "'" + string.Format(new System.Globalization.CultureInfo("en-US", true), Convert.ToDateTime(DT_Final.Text).ToString("yyyyMMdd")) + " 23:59:59'"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.id_lotefis",
                        vOperador = "is",
                        vVL_Busca = "null"
                    }
                }, 0, string.Empty);
                //Buscar Saldo Anterior
                CamadaDados.Fiscal.TList_LoteImposto lLoteImp =
                    new CamadaDados.Fiscal.TCD_LoteImposto().Select(
                        new Utils.TpBusca[]
                {
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.cd_empresa",
                        vOperador = "=",
                        vVL_Busca = "'" + cd_empresa.Text.Trim() + "'"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = "exists",
                        vVL_Busca = "(select 1 from tb_fis_imposto x " +
                                    "where x.cd_imposto = a.cd_imposto " +
                                    "and x.st_icms = 0)"
                    }
                }, 1, string.Empty, "a.dt_lote desc");
                using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
                {
                    FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
                    Rel.Altera_Relatorio = Altera_Relatorio;

                    Rel.DTS_Relatorio  = bs;
                    Rel.Nome_Relatorio = this.Name;
                    Rel.NM_Classe      = this.Name;
                    Rel.Modulo         = "FIS";
                    Rel.Ident          = "TFResumoFiscal";
                    Rel.Parametros_Relatorio.Add("DATA_INI", DT_Inic.Text);
                    Rel.Parametros_Relatorio.Add("DATA_FIN", DT_Final.Text);
                    Rel.Parametros_Relatorio.Add("NRLIVROFISCAL", nr_livro.Value);
                    Rel.Parametros_Relatorio.Add("NRPAGINAINICIAL", nr_pagina.Value);
                    Rel.Parametros_Relatorio.Add("VL_DEBITAR", (bs.DataSource as CamadaDados.Fiscal.TList_ApuracaoFiscal).Where(p => p.Cd_cfop.Substring(0, 1).Equals("5") ||
                                                                                                                                p.Cd_cfop.Substring(0, 1).Equals("6") ||
                                                                                                                                p.Cd_cfop.Substring(0, 1).Equals("7")).Sum(p => p.Vl_icms));
                    Rel.Parametros_Relatorio.Add("VL_CREDITAR", (bs.DataSource as CamadaDados.Fiscal.TList_ApuracaoFiscal).Where(p => p.Cd_cfop.Substring(0, 1).Equals("1") ||
                                                                                                                                 p.Cd_cfop.Substring(0, 1).Equals("2") ||
                                                                                                                                 p.Cd_cfop.Substring(0, 1).Equals("3")).Sum(p => p.Vl_icms));
                    if (lImposto.Count > 0)
                    {
                        Rel.Parametros_Relatorio.Add("VL_OUTROS_DEB", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D")).Sum(p => p.Vl_lancto));
                        Rel.Parametros_Relatorio.Add("VL_ESTORNO_DEB", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D") && p.Tp_lancto.Trim().Equals("3")).Sum(p => p.Vl_lancto));
                        Rel.Parametros_Relatorio.Add("VL_OUTROS_CRED", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C")).Sum(p => p.Vl_lancto));
                        Rel.Parametros_Relatorio.Add("VL_ESTORNO_CRED", lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C") && p.Tp_lancto.Trim().Equals("1")).Sum(p => p.Vl_lancto));
                    }
                    if (lLoteImp.Count > 0)
                    {
                        Rel.Parametros_Relatorio.Add("VL_DEB_ANTERIOR", lLoteImp[0].Vl_debito);
                        Rel.Parametros_Relatorio.Add("VL_CRED_ANTERIOR", lLoteImp[0].Vl_credito);
                    }

                    fImp.St_enabled_enviaremail = true;
                    fImp.pCd_clifor             = string.Empty;
                    fImp.pMensagem = "RELATORIO RESUMO FISCAL";

                    if (Altera_Relatorio)
                    {
                        Rel.Gera_Relatorio(string.Empty,
                                           fImp.pSt_imprimir,
                                           fImp.pSt_visualizar,
                                           fImp.pSt_enviaremail,
                                           fImp.pSt_exportPdf,
                                           fImp.Path_exportPdf,
                                           fImp.pDestinatarios,
                                           null,
                                           "RELATORIO RESUMO FISCAL",
                                           fImp.pDs_mensagem);

                        Altera_Relatorio = false;
                    }
                    else
                    if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
                    {
                        Rel.Gera_Relatorio(string.Empty,
                                           fImp.pSt_imprimir,
                                           fImp.pSt_visualizar,
                                           fImp.pSt_enviaremail,
                                           fImp.pSt_exportPdf,
                                           fImp.Path_exportPdf,
                                           fImp.pDestinatarios,
                                           null,
                                           "RELATORIO RESUMO FISCAL",
                                           fImp.pDs_mensagem);
                    }
                }
            }
            else
            {
                MessageBox.Show("Não existe registro para gerar relatorio.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
        }