コード例 #1
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);
            }
        }
コード例 #2
0
        private void TotalizarImpostos()
        {
            decimal tot_retsai      = decimal.Zero;
            decimal tot_substsai    = decimal.Zero;
            decimal tot_impcalcsai  = decimal.Zero;
            decimal tot_retent      = decimal.Zero;
            decimal tot_credent     = decimal.Zero;
            decimal tot_substent    = decimal.Zero;
            decimal tot_outroscred  = decimal.Zero;
            decimal tot_estornocred = decimal.Zero;
            decimal tot_outrosdeb   = decimal.Zero;
            decimal tot_estornodeb  = decimal.Zero;

            if (bsImpostoSaida.Count > 0)
            {
                tot_retsai            = (bsImpostoSaida.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostoretido);
                lblImpRetSaida.Text   = tot_retsai.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                tot_impcalcsai        = (bsImpostoSaida.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostocalc);
                lblImpCalcSaida.Text  = tot_impcalcsai.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                tot_substsai          = (bsImpostoSaida.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostosubsttrib);
                lblImpSubstSaida.Text = tot_substsai.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
            }
            if (bsImpostosEntrada.Count > 0)
            {
                tot_retent            = (bsImpostosEntrada.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostoretido);
                lblImpRetEntrada.Text = tot_retent.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                //Somar imposto creditar
                object obj = new CamadaDados.Faturamento.NotaFiscal.TCD_ImpostosNF().BuscarEscalar(
                    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
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = string.Empty,
                        vVL_Busca = "(nf.dt_saient <= " + "'" + new DateTime(dtPeriodo.Value.Year, dtPeriodo.Value.Month, DateTime.DaysInMonth(dtPeriodo.Value.Year, dtPeriodo.Value.Month)).ToString("yyyyMMdd") + " 23:59:59') or" +
                                    "(ctrc.DT_SaiEnt <= " + "'" + new DateTime(dtPeriodo.Value.Year, dtPeriodo.Value.Month, DateTime.DaysInMonth(dtPeriodo.Value.Year, dtPeriodo.Value.Month)).ToString("yyyyMMdd") + " 23:59:59')"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.id_lotefis",
                        vOperador = "is",
                        vVL_Busca = "null"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.st_gerarcredito",
                        vOperador = "=",
                        vVL_Busca = "0"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = string.Empty,
                        vVL_Busca = "(nf.Tp_Movimento = 'E' or ctrc.tp_movimento = 'E')"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = "exists",
                        vVL_Busca = "(select 1 from TB_FAT_SerieNF serie " +
                                    "where ((serie.Nr_Serie = nf.Nr_Serie and serie.cd_modelo = nf.cd_modelo) or " +
                                    "(serie.Nr_Serie = ctrc.Nr_Serie and serie.cd_modelo = ctrc.cd_modelo)) " +
                                    "and isnull(serie.ST_GeraSintegra, 'N') = 'S')"
                    }
                }, "isnull(sum(isnull(a.Vl_ImpostoCalc, 0)), 0)");
                tot_credent            = obj == null ? decimal.Zero : Convert.ToDecimal(obj);
                lblImpCredEntrada.Text = tot_credent.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                lblImpCalcEntrada.Text = (bsImpostosEntrada.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostocalc).ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                obj = new CamadaDados.Faturamento.NotaFiscal.TCD_ImpostosNF().BuscarEscalar(
                    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
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = string.Empty,
                        vVL_Busca = "(nf.dt_saient <= " + "'" + new DateTime(dtPeriodo.Value.Year, dtPeriodo.Value.Month, DateTime.DaysInMonth(dtPeriodo.Value.Year, dtPeriodo.Value.Month)).ToString("yyyyMMdd") + " 23:59:59') or" +
                                    "(ctrc.DT_SaiEnt <= " + "'" + new DateTime(dtPeriodo.Value.Year, dtPeriodo.Value.Month, DateTime.DaysInMonth(dtPeriodo.Value.Year, dtPeriodo.Value.Month)).ToString("yyyyMMdd") + " 23:59:59')"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.id_lotefis",
                        vOperador = "is",
                        vVL_Busca = "null"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = "a.st_gerarcredito",
                        vOperador = "=",
                        vVL_Busca = "1"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = string.Empty,
                        vVL_Busca = "(nf.Tp_Movimento = 'E' or ctrc.tp_movimento = 'E')"
                    },
                    new Utils.TpBusca()
                    {
                        vNM_Campo = string.Empty,
                        vOperador = "exists",
                        vVL_Busca = "(select 1 from TB_FAT_SerieNF serie " +
                                    "where ((serie.Nr_Serie = nf.Nr_Serie and serie.cd_modelo = nf.cd_modelo) or " +
                                    "(serie.Nr_Serie = ctrc.Nr_Serie and serie.cd_modelo = ctrc.cd_modelo)) " +
                                    "and isnull(serie.ST_GeraSintegra, 'N') = 'S')"
                    }
                }, "isnull(sum(isnull(a.Vl_ImpostoCalc, 0)), 0)");
                lblImpostoNCredEntrada.Text = obj == null ? string.Empty : Convert.ToDecimal(obj.ToString()).ToString("N2", new System.Globalization.CultureInfo("en-US", true));
                tot_substent            = (bsImpostosEntrada.DataSource as CamadaDados.Faturamento.NotaFiscal.TList_ImpostosNF).Sum(p => p.Vl_impostosubsttrib);
                lblImpSubstEntrada.Text = tot_substent.ToString("N2", new System.Globalization.CultureInfo("en-US", true));
            }
            //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_emp.Text.Trim() + "'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = "a.cd_imposto",
                    vOperador = "=",
                    vVL_Busca = cd_imposto.Text
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = "a.dt_lancto",
                    vOperador = "<=",
                    vVL_Busca = "'" + new DateTime(dtPeriodo.Value.Year, dtPeriodo.Value.Month, DateTime.DaysInMonth(dtPeriodo.Value.Year, dtPeriodo.Value.Month)).ToString("yyyyMMdd") + " 23:59:59'"
                },
                new Utils.TpBusca()
                {
                    vNM_Campo = "a.id_lotefis",
                    vOperador = "is",
                    vVL_Busca = "null"
                }
            }, 0, string.Empty);
            if (lImposto.Count > 0)
            {
                tot_outroscred           = lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C")).Sum(p => p.Vl_lancto);
                tot_estornocred          = lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("C") && p.Tp_lancto.Trim().Equals("1")).Sum(p => p.Vl_lancto);
                tot_outrosdeb            = lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D")).Sum(p => p.Vl_lancto);
                tot_estornodeb           = lImposto.Where(p => p.D_c.Trim().ToUpper().Equals("D") && p.Tp_lancto.Trim().Equals("3")).Sum(p => p.Vl_lancto);
                tot_outroscreditos.Text  = tot_outroscred.ToString("N2", new System.Globalization.CultureInfo("en-US"));
                tot_estorno_credito.Text = tot_estornocred.ToString("N2", new System.Globalization.CultureInfo("en-US"));
                tot_outrosdebitos.Text   = tot_outrosdeb.ToString("N2", new System.Globalization.CultureInfo("en-US"));
                tot_estornodebito.Text   = tot_estornodeb.ToString("N2", new System.Globalization.CultureInfo("en-US"));
            }
            else
            {
                tot_outroscreditos.Text  = string.Empty;
                tot_estorno_credito.Text = string.Empty;
                tot_outrosdebitos.Text   = string.Empty;
                tot_estornodebito.Text   = string.Empty;
            }
            vl_saldodevedor       = (tot_impcalcsai + tot_substsai + tot_outrosdeb - tot_estornodeb);
            tot_debito.Text       = vl_saldodevedor.ToString("N2", new System.Globalization.CultureInfo("en-US"));
            vl_saldocredor        = (tot_credent + tot_retent + this.Vl_credito + tot_outroscred - tot_estornocred);
            tot_saldocredito.Text = vl_saldocredor.ToString("N2", new System.Globalization.CultureInfo("en-US"));
            if ((vl_saldodevedor - vl_saldocredor) > 0)
            {
                lblSaldoCredorDevedor.Text = "SALDO DEVEDOR: " + (vl_saldodevedor - vl_saldocredor).ToString("N2", new System.Globalization.CultureInfo("en-US"));
            }
            else
            {
                lblSaldoCredorDevedor.Text = "SALDO CREDOR: " + (vl_saldocredor - vl_saldodevedor).ToString("N2", new System.Globalization.CultureInfo("en-US"));
            }
        }