funcion payment

[cmena]

hola, uso esta funcion para determinar el valor cuota de un monto x, pero me da error , dice que me falta el tpaymenttime al parecer es obligatorio, como lo paso y que significa?


function Payment(Rate: Extended; NPeriods: Integer; const PresentValue, const FutureValue: Extended; PaymentTime: TPaymentTime): Extended;


gracias

[Sotrono]

Que tal una vuelta por la ayuda de Delphi???
Por lo que veo TPaymentTime tiene estos dos posibles valores:

ptStartOfPeriod: Interest is calculated on the principle balance at the beginning of the payment period

ptEndOfPeriod: Interest is calculated at the end of the payment period

Bytes...

[cmena]

Empezado por Sotrono

Que tal una vuelta por la ayuda de Delphi???
Por lo que veo TPaymentTime tiene estos dos posibles valores:

ptStartOfPeriod: Interest is calculated on the principle balance at the beginning of the payment period

ptEndOfPeriod: Interest is calculated at the end of the payment period

Bytes...

Gracias, si revise la ayuda, pero que es lo que paso como parametro? pongo el ptstartofperiod y me envia este error "[Error] UnitCotizaciones.pas(310): Incompatible types: 'Extended' and 'TPaymentTime'"
asi tengo la instruccion que se cae
ShowMessage(floattostr(payment(5,12,100000,ptStartOfPeriod)));

[Sotrono]

Hola, el problema es que te falta pasarle un parámetro (son 5, no 4). El que te falta es: FutureValue, que es de tipo Extended. Por eso el error "Incompatible types: 'Extended' and 'TPaymentTime'"

Bytes...

[cmena]

Empezado por Sotrono

Hola, el problema es que te falta pasarle un parámetro (son 5, no 4). El que te falta es: FutureValue, que es de tipo Extended. Por eso el error "Incompatible types: 'Extended' and 'TPaymentTime'"

Bytes...

Gracias amigo argentino, me funciono, pero el valor que me retorna no es el valor cuota estoy usando la funcion correcta para calcular el valor de la cuota?
ejemplo: valor_cuota:=Payment(5,12,100000,0,ptStartOfPeriod);

si tengo 5% de tasa, a 12 meses y saldo afinanciar de 100.000 la cuota deberia ser 10.475 mensual. la funcion me devuelve 83.333 ???

gracias por la ayuda

se despide un amigo chileno.

[Sotrono]

estoy usando la funcion correcta para calcular el valor de la cuota?

Nunca utilice esa función y mis conocimientos en finanzas no son muy grandes. La traducción de lo que dice la ayuda de Delphi sobre la función es: Calcula un pago completamente amortizado.

Bien, si lo que queres es calcular el valor de la cuota, supongo que se calcula así:
Digamos que hay que realizar un pago de $100 en 10 cuotas con un interés del 5%. El total a pagar sería $105. Si a $105 lo dividimos por la cantidad de cuotas tendriamos el valor de la cuota.
Codificado:

Código Delphi [-]
function ValorCuota(APagar : Extended; Cant_Cuotas : Integer; Interes : Real): Extended;
begin
  Result := (APagar + (Interes * APagar / 100)) / Cant_Cuotas;
end;

Como ya te dije, no tengo grandes conocimientos en finanzas, y no manejo muy bien el "lenguaje financiero", asi que ya me dirás si eso es lo que necesitabas o no.

Saludos...