Ejemplo n.º 1
0
        public TList_CFGFaturaCartao Select(Utils.TpBusca[] vBusca, Int32 vTop, string vNM_Campo)
        {
            TList_CFGFaturaCartao lista = new TList_CFGFaturaCartao();
            bool podeFecharBco          = false;

            if (Banco_Dados == null)
            {
                podeFecharBco = this.CriarBanco_Dados(false);
            }
            System.Data.SqlClient.SqlDataReader reader = this.ExecutarBusca(this.SqlCodeBusca(vBusca, Convert.ToInt16(vTop), vNM_Campo));
            try
            {
                while (reader.Read())
                {
                    TRegistro_CFGFaturaCartao reg = new TRegistro_CFGFaturaCartao();
                    if (!reader.IsDBNull(reader.GetOrdinal("cd_empresa")))
                    {
                        reg.Cd_empresa = reader.GetString(reader.GetOrdinal("cd_empresa"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("nm_empresa")))
                    {
                        reg.Nm_empresa = reader.GetString(reader.GetOrdinal("nm_empresa"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("CD_Historico_rec")))
                    {
                        reg.Cd_historico_rec = reader.GetString(reader.GetOrdinal("CD_Historico_rec"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("DS_Historico_rec")))
                    {
                        reg.Ds_historico_rec = reader.GetString(reader.GetOrdinal("DS_Historico_rec"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("cd_historico_pag")))
                    {
                        reg.Cd_historico_pag = reader.GetString(reader.GetOrdinal("cd_historico_pag"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("ds_historico_pag")))
                    {
                        reg.Ds_historico_pag = reader.GetString(reader.GetOrdinal("ds_historico_pag"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("CD_Historico_Juro")))
                    {
                        reg.Cd_historico_juro = reader.GetString(reader.GetOrdinal("CD_Historico_Juro"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("DS_Historico_Juro")))
                    {
                        reg.Ds_historico_juro = reader.GetString(reader.GetOrdinal("DS_Historico_Juro"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("cd_historico_taxa")))
                    {
                        reg.Cd_historico_taxa = reader.GetString(reader.GetOrdinal("cd_historico_taxa"));
                    }
                    if (!reader.IsDBNull(reader.GetOrdinal("ds_historico_taxa")))
                    {
                        reg.Ds_historico_taxa = reader.GetString(reader.GetOrdinal("ds_historico_taxa"));
                    }

                    lista.Add(reg);
                }
            }
            finally
            {
                reader.Close();
                reader.Dispose();
                if (podeFecharBco)
                {
                    this.deletarBanco_Dados();
                }
            }
            return(lista);
        }
Ejemplo n.º 2
0
        public static void QuitarFatura(List <TRegistro_FaturaCartao> val,
                                        DateTime Dt_quitacao,
                                        string Cd_contager,
                                        string Cd_empresa,
                                        string Tp_movimento,
                                        BancoDados.TObjetoBanco banco)
        {
            bool             st_transacao = false;
            TCD_FaturaCartao qtb_fatura   = new TCD_FaturaCartao();

            try
            {
                if (banco == null)
                {
                    st_transacao = qtb_fatura.CriarBanco_Dados(true);
                }
                else
                {
                    qtb_fatura.Banco_Dados = banco;
                }
                //Buscar configuracao para quitar fatura
                TList_CFGFaturaCartao lCfg = TCN_CFGFaturaCartao.Buscar(Cd_empresa,
                                                                        string.Empty,
                                                                        string.Empty,
                                                                        string.Empty,
                                                                        string.Empty,
                                                                        qtb_fatura.Banco_Dados);
                if (lCfg.Count.Equals(0))
                {
                    throw new Exception("Não existe configuração para quitar fatura na empresa " + Cd_empresa.Trim());
                }
                //Incluir lancamento de caixa na conta de quitacao
                string cd_lanctocaixa_q = TCN_LanCaixa.GravaLanCaixa(
                    new TRegistro_LanCaixa()
                {
                    Cd_Empresa     = Cd_empresa,
                    Cd_ContaGer    = Cd_contager,
                    Nr_Docto       = "QUITARFAT",
                    ComplHistorico = "QUITACAO FATURA CARTAO",
                    Dt_lancto      = Dt_quitacao,
                    Cd_Historico   = Tp_movimento.Trim().ToUpper().Equals("P") ? lCfg[0].Cd_historico_pag : lCfg[0].Cd_historico_rec,
                    Vl_RECEBER     = Tp_movimento.Trim().ToUpper().Equals("R") ? val.Sum(p => p.Vl_nominal - p.Vl_quitado) : decimal.Zero,
                    Vl_PAGAR       = Tp_movimento.Trim().ToUpper().Equals("P") ? val.Sum(p => p.Vl_nominal - p.Vl_quitado) : decimal.Zero,
                    St_Estorno     = "N"
                }, qtb_fatura.Banco_Dados);
                //Gravar Juro
                string cd_lanctocaixajr = string.Empty;
                if (val.Sum(p => p.Vl_juro) > decimal.Zero)
                {
                    if (string.IsNullOrEmpty(lCfg[0].Cd_historico_juro))
                    {
                        throw new Exception("Não existe configuração para quitar juro da fatura na empresa " + Cd_empresa.Trim());
                    }
                    cd_lanctocaixajr = TCN_LanCaixa.GravaLanCaixa(new TRegistro_LanCaixa()
                    {
                        Cd_Empresa     = Cd_empresa,
                        Cd_ContaGer    = Cd_contager,
                        Nr_Docto       = "JUROFATURA",
                        ComplHistorico = "JURO FATURA CARTAO",
                        Dt_lancto      = Dt_quitacao,
                        Cd_Historico   = lCfg[0].Cd_historico_juro,
                        Vl_RECEBER     = decimal.Zero,
                        Vl_PAGAR       = val.Sum(p => p.Vl_juro),
                        St_Titulo      = "N",
                        St_Estorno     = "N"
                    }, qtb_fatura.Banco_Dados);
                }
                //Gravar Caixa Taxa
                string cd_lanctocaixatx = string.Empty;
                if (val.Sum(p => p.Vl_taxa) > decimal.Zero)
                {
                    if (string.IsNullOrEmpty(lCfg[0].Cd_historico_taxa))
                    {
                        throw new Exception("Não existe configuração para quitar taxa da fatura na empresa " + Cd_empresa.Trim());
                    }
                    cd_lanctocaixatx = TCN_LanCaixa.GravaLanCaixa(new TRegistro_LanCaixa()
                    {
                        Cd_Empresa     = Cd_empresa,
                        Cd_ContaGer    = Cd_contager,
                        Nr_Docto       = "TXFATURA",
                        ComplHistorico = "TAXA FATURA CARTAO",
                        Dt_lancto      = Dt_quitacao,
                        Cd_Historico   = lCfg[0].Cd_historico_taxa,
                        Vl_RECEBER     = decimal.Zero,
                        Vl_PAGAR       = Math.Round(val.Sum(p => p.Vl_taxa), 2),
                        St_Estorno     = "N",
                        St_Titulo      = "N"
                    }, qtb_fatura.Banco_Dados);
                }
                val.ForEach(p =>
                {
                    if ((p.Vl_fatura - p.Vl_quitado) > decimal.Zero)
                    {
                        if (p.Dt_fatura.Value.Date > Dt_quitacao.Date)
                        {
                            throw new Exception("Não é permitido quitar fatura com data de lançamento maior que a data de quitação.");
                        }
                        //Incluir lancamento de caixa contrario ao original
                        string cd_lanctocaixa_o = TCN_LanCaixa.GravaLanCaixa(new TRegistro_LanCaixa()
                        {
                            Cd_Empresa   = Cd_empresa,
                            Cd_ContaGer  = p.Cd_contager,
                            Nr_Docto     = p.Id_fatura.Value.ToString(),
                            Dt_lancto    = Dt_quitacao,
                            Cd_Historico = p.Tp_movimento.Trim().ToUpper().Equals("P") ? lCfg[0].Cd_historico_pag : lCfg[0].Cd_historico_rec,
                            Vl_RECEBER   = p.Tp_movimento.Trim().ToUpper().Equals("P") ? p.Vl_fatura - p.Vl_quitado : decimal.Zero,
                            Vl_PAGAR     = p.Tp_movimento.Trim().ToUpper().Equals("R") ? p.Vl_fatura - p.Vl_quitado : decimal.Zero,
                            St_Estorno   = "N"
                        }, qtb_fatura.Banco_Dados);
                        decimal?cd_tx = null;
                        if (p.Pc_taxa > decimal.Zero)
                        {
                            cd_tx = decimal.Parse(CamadaDados.TDataQuery.getPubVariavel(cd_lanctocaixatx, "@P_CD_LANCTOCAIXA"));
                        }
                        decimal?cd_jr = null;
                        if (!string.IsNullOrEmpty(cd_lanctocaixajr))
                        {
                            cd_jr = decimal.Parse(CamadaDados.TDataQuery.getPubVariavel(cd_lanctocaixajr, "@P_CD_LANCTOCAIXA"));
                        }
                        //Incluir Registo na Tabela de Quitacao
                        TCN_QuitarFatura.Gravar(
                            new TRegistro_Quitarfatura()
                        {
                            Id_quitar          = null,
                            Id_fatura          = p.Id_fatura,
                            Cd_contager        = p.Cd_contager,
                            Cd_lanctocaixa     = decimal.Parse(CamadaDados.TDataQuery.getPubVariavel(cd_lanctocaixa_o, "@P_CD_LANCTOCAIXA")),
                            Cd_contagerquit    = Cd_contager,
                            Cd_lanctocaixaquit = decimal.Parse(CamadaDados.TDataQuery.getPubVariavel(cd_lanctocaixa_q, "@P_CD_LANCTOCAIXA")),
                            Cd_lanctocaixajuro = cd_jr,
                            Cd_lanctocaixatx   = cd_tx,
                            Dt_lancto          = Dt_quitacao,
                            Vl_quitado         = p.Vl_fatura - p.Vl_quitado,
                            Vl_juro            = p.Vl_juro,
                            Vl_taxa            = p.Vl_taxa
                        }, qtb_fatura.Banco_Dados);
                    }
                });
                if (st_transacao)
                {
                    qtb_fatura.Banco_Dados.Commit_Tran();
                }
            }
            catch (Exception ex)
            {
                if (st_transacao)
                {
                    qtb_fatura.Banco_Dados.RollBack_Tran();
                }
                throw new Exception("Erro quitar fatura: " + ex.Message.Trim());
            }
            finally
            {
                if (st_transacao)
                {
                    qtb_fatura.deletarBanco_Dados();
                }
            }
        }