Como Generar Cuotas en VFP 9.0

1,137 views
Skip to first unread message

Antuan

unread,
Jul 29, 2012, 2:56:53 PM7/29/12
to publice...@googlegroups.com
Hola! estimados, queria saber cual es el codigo en VFP POO, para generar cuotas en un sistema de credito;
para mas detalles estoy creando un sistema el cual tiene que manejar credito, y a un plazo maximo de 36 meses si el cliente compra hoy ocupo que genere las cuotas de acuerdo al plazo y saber cuando esta proximo a vencer o si vence hoy o si ya vencio; en espera de su apoyo, gracias

Luis Maria Guayan

unread,
Jul 29, 2012, 4:09:57 PM7/29/12
to publice...@googlegroups.com
No indicas que sistema de crédito quieres implementar, ta paso un código en VFP (no es POO) para el Sistema Francés

*-- Sistema Frances
*-- Datos a Cargar
Capital = 10000
CantidadCuotas = 36
TasaAnual = 15  && Porcentaje
TasaMensual = TasaAnual/12/100
*-- Listado
? "    Nro.Cuota        " + ;
  "Cuota             " + ;
  "Cuota Capitalizada             "+ ;
  "Interes "
? REPLICATE("-",80)
FOR NroCuota = 1 TO CantidadCuotas
  Cuota = Capital * ;
    (TasaMensual/(1-(1+TasaMensual)^-CantidadCuotas))
  CuotaCapitalizada = Cuota * ;
    (1-TasaMensual*(1-(1+TasaMensual)^-(CantidadCuotas-NroCuota+1))/TasaMensual)
  Interes = TasaMensual * Cuota * ;
    (1-(1+TasaMensual)^-(CantidadCuotas-NroCuota+1))/TasaMensual
  ? NroCuota, ROUND(Cuota,2), ROUND(CuotaCapitalizada,2), ROUND(Interes,2)
ENDFOR

Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________

El 29/07/2012 15:56, Antuan escribió:
Hola! estimados, queria saber cual es el codigo en VFP POO, para generar cuotas en un sistema de credito;
para mas detalles estoy creando un sistema el cual tiene que manejar credito, y a un plazo maximo de 36 meses si el cliente compra hoy ocupo que genere las cuotas de acuerdo al plazo y saber cuando esta proximo a vencer o si vence hoy o si ya vencio; en espera de su apoyo, gracias
--
 
 
 

Mario Oviedo

unread,
Aug 20, 2012, 11:08:10 PM8/20/12
to publice...@googlegroups.com
no se dice aprendices, se dice principiantes

El 29 de julio de 2012 21:29, HernanCano <jherna...@gmail.com> escribió:

No indicas que sistema de crédito que quieres implementar.
El Sistema Francés es el más difícil de entender para los aprendices.
Uno muy fácil te lo presento a continuación:

Se pretende conocer el valor de cada cuota mensual sabiendo que se presta $1,000,000,oo (un millón de pesos colombianos) a cancelar durante un año.

VrCapital = 1000000
NúmCuotas = 12 && en meses

if NúmCuotas > 0
   VrCuotaMes = VrCapital / NúmCuotas
else
   VrCuotaMes = 0
endif
&& VrCuotaMes da alrededor de $83,333.33 .

?'#', 'SaldoAnterior', 'VrCuotaMes', 'Saldo que pasa'
SaldoAnterior = VrCapital
for i=1 to NumCuotas
?i, SaldoAnterior, VrCuotaMes, SaldoAnterior-VrCuotaMes
SaldoAnterior = SaldoAnterior-VrCuotaMes
next


¿Correcto?



El domingo, 29 de julio de 2012 13:56:53 UTC-5, Antuan escribió:
Hola! estimados, queria saber cual es el codigo en VFP POO, para generar cuotas en un sistema de credito;
para mas detalles estoy creando un sistema el cual tiene que manejar credito, y a un plazo maximo de 36 meses si el cliente compra hoy ocupo que genere las cuotas de acuerdo al plazo y saber cuando esta proximo a vencer o si vence hoy o si ya vencio; en espera de su apoyo, gracias

--
 
 
 

Walter R. Ojeda Valiente

unread,
Aug 20, 2012, 11:30:49 PM8/20/12
to publice...@googlegroups.com
Hmmmm, parece que tienes razón, "principiante" se ve más adecuado que "aprendiz".

Según la RAE:

aprendiz, za.

1. m. y f. Persona que aprende algún arte u oficio.

2. m. y f. Persona que, a efectos laborales, se halla en el primer grado de una profesión manual, antes de pasar a oficial.



principiante.

(Del ant. part. act. de principiar).

1. adj. Que principia. U. m. c. s.

2. adj. Que empieza a estudiar, aprender o ejercer un oficio, arte, facultad o profesión. U. m. c. s.



Saludos.

Walter.





Date: Mon, 20 Aug 2012 21:08:10 -0600
Subject: Re: [vfp] Re: Como Generar Cuotas en VFP 9.0
From: maov...@gmail.com
To: publice...@googlegroups.com
--
 
 
 

Carlos Miguel FARIAS

unread,
Aug 21, 2012, 7:37:17 AM8/21/12
to publice...@googlegroups.com
Algunos son aprendices principiantes y otros estan al principio de su aprendisaje.
El dia que no tenga mas para aprender, mi vida no tendrá razón de ser.
Saludos: Miguel, Santa Rosa (LP)

--
 
 
 

Luis Mata

unread,
Aug 21, 2012, 9:41:54 AM8/21/12
to publice...@googlegroups.com
jajaja tanta huev...
--
 
 
 
Message has been deleted

ARVIOS

unread,
Aug 24, 2012, 8:14:33 AM8/24/12
to publice...@googlegroups.com
Para calcular la cuota fija: 
PAYMENT(Valor a Financiar,Tasa,Plazo)

Debes calcular la tasa diaria para calcular los intereses corrientes dependiendo la modalidad del credito (si cada cuota es cada 15, 30, 45, etc) dias)

ya calculando los intereses puedes saber cuanto le vas a sumar a capital

Adolfo Leon Quintero Hoyos

unread,
Aug 24, 2012, 4:17:11 PM8/24/12
to publice...@googlegroups.com
Amigo tengo aplicativo para prestamistas desarrollado con todo para control de creditos y sus pagos con diseño de letra de cambio y muchos reportes, podemos llegar a un acuerdo si te interesa, te anexo el manual para que te orientes pero te puedo vender las fuentes,.

Saludos

Adolfo

El 22 de agosto de 2012 16:16, Jhonny Zambrana <jhonny....@gmail.com> escribió:

El domingo, 29 de julio de 2012 14:56:53 UTC-4, Antuan escribió:
Hola! estimados, queria saber cual es el codigo en VFP POO, para generar cuotas en un sistema de credito;
para mas detalles estoy creando un sistema el cual tiene que manejar credito, y a un plazo maximo de 36 meses si el cliente compra hoy ocupo que genere las cuotas de acuerdo al plazo y saber cuando esta proximo a vencer o si vence hoy o si ya vencio; en espera de su apoyo, gracias

--
 
 
 

prestamos2.pdf

Jairo Miranda

unread,
Aug 24, 2012, 5:11:40 PM8/24/12
to publice...@googlegroups.com

Adolfo Leon Quintero Hoyos

unread,
Aug 27, 2012, 12:36:18 PM8/27/12
to publice...@googlegroups.com
Jairo buenos dias  podemos hablar telefónicamente me puedes llamar al 315 5794703 ind. Colombia
057 

Saludos

Adolfo

--
 
 
 

Jairo Miranda

unread,
Aug 27, 2012, 2:16:53 PM8/27/12
to publice...@googlegroups.com
 Te llame y te deje mensaje volveré a marcarte a la tarde, 5 pm
ok?

_____________________________________________
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Adolfo Leon Quintero Hoyos

Enviado el: lunes, 27 de agosto de 2012 11:36


Para: publice...@googlegroups.com
Asunto: Re: [vfp] Re: Como Generar Cuotas en VFP 9.0

 

 

Jairo buenos dias  podemos hablar telefónicamente me puedes llamar al 315 5794703 ind. Colombia

057 

 

Saludos

 

Adolfo

Adolfo Leon Quintero Hoyos

unread,
Aug 27, 2012, 2:54:43 PM8/27/12
to publice...@googlegroups.com
Que pena me quede sin pila y ya lo recargue estoy pendiente de tu llamada

Saludos

Adolfo

--
 
 
 

esteban micossi

unread,
Aug 27, 2012, 9:21:01 PM8/27/12
to publice...@googlegroups.com
Hola Adolfo
 
Che, esta bueno el sistema para darselo a mi señora para que administre bien su CARTERA y se deje de joder con mi BILLETERA.
 
No te enojes, es una bromita.
 
Realmente esta bueno el sistema (de acuerdo a las imagenes), por que estoy asesorando a una financiera y les puedo ofrecer tu sistema
les dare tu e-mail para que se comuniquen ellos directamente contigo.
 
Te dejo un saludo
 
Esteban

Adolfo Leon Quintero Hoyos

unread,
Aug 28, 2012, 9:18:44 AM8/28/12
to publice...@googlegroups.com
Gracias mi amigo cualquier cosa te comento 


Saludos


Adolfo

--
 
 
 

HernanCano

unread,
Jul 29, 2012, 11:29:09 PM7/29/12
to publice...@googlegroups.com

No indicas que sistema de crédito que quieres implementar.
El Sistema Francés es el más difícil de entender para los aprendices.
Uno muy fácil te lo presento a continuación:

Se pretende conocer el valor de cada cuota mensual sabiendo que se presta $1,000,000,oo (un millón de pesos colombianos) a cancelar durante un año.

VrCapital = 1000000
NúmCuotas = 12 && en meses

if NúmCuotas > 0
   VrCuotaMes = VrCapital / NúmCuotas
else
   VrCuotaMes = 0
endif
&& VrCuotaMes da alrededor de $83,333.33 .

?'#', 'SaldoAnterior', 'VrCuotaMes', 'Saldo que pasa'
SaldoAnterior = VrCapital
for i=1 to NumCuotas
?i, SaldoAnterior, VrCuotaMes, SaldoAnterior-VrCuotaMes
SaldoAnterior = SaldoAnterior-VrCuotaMes
next


¿Correcto?


El domingo, 29 de julio de 2012 13:56:53 UTC-5, Antuan escribió:
Reply all
Reply to author
Forward
0 new messages