Пример #1
0
        public static TList_PreVenda_DT_Vencto Calcula_Parcelas(TRegistro_PreVenda val, bool St_calcular)
        {
            TList_PreVenda_DT_Vencto retorno = new TList_PreVenda_DT_Vencto();

            if (((val.Vl_prevenda - val.Vl_devcred) > 0) && (!string.IsNullOrEmpty(val.Cd_condPgto)) && (val.QTD_Parcelas > 0) && (St_calcular))
            {
                TList_Parcelas Lista_Parcela = TLanCalcParcelas.CalcularParcelas(val.Vl_prevenda - val.Vl_devcred,
                                                                                 val.Vl_prevenda - val.Vl_devcred,
                                                                                 val.Dt_emissao.Value,
                                                                                 val.QTD_Parcelas,
                                                                                 val.Parcelas_Dias_Desdobro);
                int cont = 1;
                Lista_Parcela.ForEach(p =>
                {
                    retorno.Add(
                        new CamadaDados.Faturamento.PDV.TRegistro_PreVenda_DT_Vencto()
                    {
                        DiasVencto = p.Dt_vencimento.Value.Subtract(val.Dt_prevenda.Value).Days,
                        Vl_parcela = p.Vl_parcela,
                        id_parcela = cont++
                    });
                });
            }
            return(retorno);
        }
Пример #2
0
        public static TList_ParcelasMud Calcula_Parcelas(TRegistro_LanMudanca val)
        {
            TList_ParcelasMud retorno = new TList_ParcelasMud();

            if (val.Vl_mudanca > 0)
            {
                TList_Parcelas Lista_Parcela = TLanCalcParcelas.CalcularParcelas(val.Vl_mudanca,
                                                                                 val.Vl_mudanca,
                                                                                 CamadaDados.UtilData.Data_Servidor(),
                                                                                 val.QTD_parcelas.Equals(decimal.Zero) ? 1 : val.QTD_parcelas,
                                                                                 val.QTD_diasdesdobro);
                Lista_Parcela.ForEach(p =>
                {
                    retorno.Add(
                        new CamadaDados.Mudanca.TRegistro_ParcelasMud()
                    {
                        DiaVencto  = p.Dt_vencimento.Value.Subtract(CamadaDados.UtilData.Data_Servidor()).Days,
                        Vl_parcela = p.Vl_parcela,
                    });
                });
            }
            return(retorno);
        }
Пример #3
0
        public static TList_ParcelaContrato Calcula_Parcelas(TRegistro_ContratoFin val)
        {
            TList_ParcelaContrato retorno = new TList_ParcelaContrato();

            if ((val.Vl_Contrato > 0) && (val.QTD_parcelas > 0))
            {
                TList_Parcelas Lista_Parcela = TLanCalcParcelas.CalcularParcelas(val.Vl_Contrato,
                                                                                 val.Vl_Contrato,
                                                                                 val.Dt_contrato.Value,
                                                                                 val.QTD_parcelas,
                                                                                 val.QTD_diasdesdobro);
                Lista_Parcela.ForEach(p =>
                {
                    retorno.Add(
                        new CamadaDados.Financeiro.Contrato.TRegistro_ParcelaContrato()
                    {
                        Dt_venctoProvisaostr = p.Dt_vencimentostr,
                        Vl_parcProvisao      = p.Vl_parcela
                    });
                });
            }
            return(retorno);
        }