FoxPro/Visual FoxPro - cronograma

   
Vista:

cronograma

Publicado por sebastian (244 intervenciones) el 29/08/2009 00:12:35
Hola programadores tengo este codigo que muestra cronograma de pagos pero no puedo terminar las fechas que debe de pagar que debe ser cada 30 dias si el prestamo es el 28/08, 29/09, 28/10, 28/11, 17/12 etc.... pueden ayudarme a terminar este procedimiento Gracias.

use CALCULAR
r=0.035
c=500
t=6
i=c*r
a= i / ((1+r)^(t)-1)
cuo=a+i
? cuo
?" It-Sald Cap - Amortiza- interes - cuota"
FOR it=1 TO t
a=cuo-i
c=c-a
? ALLTRIM(STR(it))+" "+alltrim(STR(c,12,2))+" "+ALLTRIM(STR(a,12,2))+" "+ALLTRIM(STR(i,12,2))+" " +ALLTRIM(STR(cuo,12,2))
append blank
replace item with it
replace saldo_cap with c
replace capital with a
replace interes with i
replace cuota with cuo
I=c*r
ENDFOR
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:cronograma

Publicado por Javier (265 intervenciones) el 29/08/2009 00:49:24
Hola: toma la fecha del préstamo y sumale 30 .
Escribe lo siguiente antes del ciclo:

dFecha = dFechaPrestamo + 30

dentro del ciclo
REPLACE Fecha With dFecha

dentro del ciclo y al final del mismo

dFecha = dFecha + 30

O consulta la función GoMonth() que creo que sería más exacto.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cronograma

Publicado por Sebastian (244 intervenciones) el 29/08/2009 01:50:15
Gracias amigo no se como trabajar con la funcion GoMonth() pero voy a intentarlo, esta funcion podra darme los mismo dias para todas las fechas. Gracias nuevamente
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar