Juros compostos em access

[Lindiomar 0]

Ola alguem poderia me ajudar. Tenho que calcular em um relatorio os juros sobre um valor, sao juros de poupança + tr (esta é facil). Mas como fazer com que no relatorio ocorra o seguinte.

 

Mes Inicial ------ Valor ----- % ---- Correção ---- Valor Corrigido

16/05/2009 ------ 60,00 ----- 0,0 ---- 0,00 ---- 60,00

16/06/2009 ------ 60,00 ----- 0,5823 ---- 0,34 ---- 60,34 ATE AQUI TUDO BEM EU ACERTO

16/07/2009 ------ 60,34 ----- 0,5 ---- 0,30 ---- 60,64 aqui esta o problema

 

Entendam que o valor inicial é 60, no mes seguinte o % deverá ser calculado em cima do 60,00+0,34 (valor inicial+correção) e não somente em cima do valor inicial.

 

Será que alguem poderia me ajudar

 

Obrigado

 

Lindiomar

[Ted k' 126]

você tem que somar a correção antes de chegar ao proximo mês!

[Lindiomar 0]

Como faço isto? J[á tentei no rpt somar campos mais acaba dando erro.

[xanburzum 169]

olha este exemplo,é so colocar o valor, nº de pacelas, nº de parcelas com juros e o juros a.m.

 

<%
'calcula o valor de cada parcela, e em quantas vezes o produto poderá ser parcelado e com quantas parcelas
'possui juros, e quantas não possui.
x = "2.550,00" 'Valor do Produto
y = "12" 'Nº total de Parcelas
cjuros = "0,05" 'Juros Cobrado a.m
juros = "6" -1 +1 'Nº de Parcela C/ Juros
%>
<table border="0" width="200"cellspacing="1" cellpadding="0" bgcolor="#F2F2F2">
    <tr>
        <td width="197" align="center" colspan="3">
        <p align="left"><b><font face="Verdana" size="2">Parcelamento</font></b></td>
    </tr>
<%
For i = 1 To y
If (i-1) = Round(y/2,0) Then
End If
%>
    <tr>
        <td width="38"><font face="Verdana" size="2"><%=i%> x</font></td>
        <td width="90"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then valor = FormatCurrency(Round(x/i,1),2) else valor = FormatCurrency(x * (cjuros * (1+cjuros)^ i) / ((1+cjuros)^ i -1))%><%=valor%></font></td>
        <td width="67"><font face="Verdana" size="2"><%If juros > i Or juros = 0 Then juro = "sem juros" Else juro = "<font color='#FF0000'>com juros</font>"%><%=juro%></font></td>
    </tr>
<%Next%>
</table>