Exemplo n.º 1
0
        //listar creditos pagina 2, registro de pagos
        private void DatosCre()
        {
            DataTable datos = new DataTable();
            int       atras = Convert.ToInt32(cre.dias_atraso(CboPresta.Text, DtpPago.Value.Date.ToString("yyyy/MM/dd")));

            //TxtInteres.Text = inteori.ToString();
            datos         = cre.cantcre(CboPresta.Text, DtpPago.Value.ToString());
            TxtMonto.Text = datos.Rows[0][0].ToString();
            decimal saldocap    = Convert.ToDecimal(datos.Rows[0][1].ToString());
            decimal inte        = Convert.ToDecimal(TxtInteres.Text);
            decimal monto       = Convert.ToDecimal(TxtMonto.Text);
            decimal interes     = Convert.ToDecimal(TxtInteres.Text);
            decimal interestemp = 0;

            TxtMonto.Text   = TxtMonto.Text;
            TxtSaldo.Text   = Convert.ToString(saldocap);
            TxtSaldInt.Text = datos.Rows[0][5].ToString();
            TxtVenc.Text    = datos.Rows[0][2].ToString();
            TxtTipo.Text    = datos.Rows[0][3].ToString();
            // TxtAtraso.Text = cre.dias_atraso(CboPresta.Text,DtpPago .Value.ToString ("yyyy/MM/dd"));
            if (Convert.ToDecimal(TxtSaldInt.Text) > 0)
            {
                interestemp = Convert.ToDecimal(TxtSaldInt.Text);
            }
            TxtTotalTod.Text = Convert.ToString(Convert.ToDecimal(TxtSaldo.Text) + interestemp);
            TxtFechConc.Text = datos.Rows[0][6].ToString();
            TxtTasa.Text     = datos.Rows[0][7].ToString() + "%";
            TxtPlazo.Text    = (datos.Rows[0][8].ToString());
            if (TxtTipo.Text == "1")
            {
                TxtTipo.Text = "Diario";
                int total = cre.diasnopag(CboPresta.Text, DtpPago.Value.ToString("yyyy/MM/dd"), datos.Rows[0][6].ToString());
                TxtAtraso.Text = total.ToString() + " Día(s)";
            }
            else if (TxtTipo.Text == "2")
            {
                TxtTipo.Text = "Diario-Interes";
                int total = cre.diasnopag(CboPresta.Text, DtpPago.Value.ToString("yyyy/MM/dd"), datos.Rows[0][6].ToString());
                TxtAtraso.Text = total.ToString() + " Día(s)";
            }
            else if (TxtTipo.Text == "3")
            {
                TxtTipo.Text = "Mesual-Fijo";
                int total = cre.diasnopag(CboPresta.Text, DtpPago.Value.ToString("yyyy/MM/dd"), datos.Rows[0][6].ToString());
                TxtAtraso.Text = total + " Día(s)";
            }
            else if (TxtTipo.Text == "4")
            {
                TxtTipo.Text = "Mesual-SobreSaldo";
                int total = cre.diasnopag(CboPresta.Text, DtpPago.Value.ToString("yyyy/MM/dd"), datos.Rows[0][6].ToString());
                TxtAtraso.Text = total + " Día(s)";
            }

            DataTable aldia = new DataTable();

            aldia           = cre.saldosdias(CboPresta.Text, DtpPago.Value.ToString("yyyy/MM/dd"));
            TxtCapital.Text = aldia.Rows[0][0].ToString();
            TxtInteres.Text = aldia.Rows[0][1].ToString();
            decimal intere = 0;

            if (Convert.ToDecimal(aldia.Rows[0][1]) > 0)
            {
                intere = Convert.ToDecimal(aldia.Rows[0][1]);
            }
            decimal capi = 0;

            if (Convert.ToDecimal(aldia.Rows[0][0]) > 0)
            {
                capi = Convert.ToDecimal(aldia.Rows[0][0]);
            }

            TxtCuotaD.Text = (capi + intere).ToString();
        }
Exemplo n.º 2
0
        public void Cred_venc(string tip)
        {
            Reportes.AtrasosE Encab = new Reportes.AtrasosE();
            Encab.titulo = "Creditos Atrasados";
            string  consulta;
            decimal interes, capital;

            consulta = "SELECT cre.cod_credito,CONCAT(cli.nombres,' ', cli.apellidos) AS Nombre, cre.monto, DATE_format(cre.FECHA_CONC,'%d/-%m/%y'), cre.FECHA_VENCI, CONCAT(cli.TELEFONO1,'\n',cli.Telefono2,'\n',cli.TelefonoCon) AS telefonos, interes,cre.id_tipo_credito  " +
                       "FROM cliente cli " +
                       "INNER JOIN asigna_solicitud asol ON asol.codigo_cli = cli.CODIGO_CLI " +
                       "INNER JOIN asigna_credito acre ON acre.ID_SOLICITUD = asol.ID_SOLICITUD " +
                       "INNER JOIN credito cre ON cre.COD_CREDITO = acre.COD_CREDITO " +
                       "WHERE cre.ESTADO = 'Activo' order by cli.nombres and cli.apellidos";
            DataTable credito = new DataTable();

            credito = buscar(consulta);
            int cont, total;

            total = credito.Rows.Count;


            for (cont = 0; cont < total; cont++)
            {
                Reportes.AtrasosD detalle = new Reportes.AtrasosD();
                string            cod     = credito.Rows[cont][0].ToString();
                string            tipo    = credito.Rows[cont][7].ToString();
                string            etiqueta;
                if (tipo == "1" || tipo == "2")
                {
                    etiqueta = "(D)";
                }
                else
                {
                    etiqueta = "(M)";
                }
                int diasatras = 0;
                diasatras = cre.diasnopag(cod, DateTime.Now.Date.ToString("yyyyy/MM/dd"), credito.Rows[0][3].ToString());
                DataTable atras = new DataTable();
                atras = cre.saldosdias(cod, DateTime.Now.Date.ToString());

                if (diasatras > 0)
                {
                    decimal inte;
                    inte = Convert.ToDecimal(atras.Rows[0][1].ToString());
                    if (inte < 0)
                    {
                        inte = 0;
                    }
                    interes = calcint(credito.Rows[cont][0].ToString(), diasatras);
                    capital = calcCap(credito.Rows[cont][0].ToString(), diasatras);
                    if (interes > 0 || capital > 0)
                    {
                        detalle.Nombre  = credito.Rows[cont][1].ToString() + " " + etiqueta;
                        detalle.Monto   = Convert.ToDecimal(credito.Rows[cont][2]);
                        detalle.Lugar   = "Total a cancelar";
                        detalle.Catraso = Convert.ToDecimal(atras.Rows[0][0].ToString()); //capital;
                        detalle.Iatraso = inte;                                           //interes;
                        detalle.dias    = diasatras;
                        detalle.Tel     = credito.Rows[cont][5].ToString();
                        Encab.Detalle.Add(detalle);
                    }
                }
            }
            Reportes.Atrasos formu = new  Reportes.Atrasos();
            formu.Enca.Add(Encab);
            formu.Deta = Encab.Detalle;
            formu.Show();
        }