Corretta recalc_percrata

git-svn-id: svn://10.65.10.50/trunk@2485 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1996-01-23 11:54:34 +00:00
parent 761dfe7f02
commit d0714c6c0e

View File

@ -612,7 +612,9 @@ void TPagamento::set_datarata(int i, const TDate & d)
real TPagamento::recalc_percrata(int i)
{
real hm(_tpr < 4 ? _firstr : _secndr);
if (i == 0 && _tpr > 3) return ZERO;
real tpay(tpay_rata(i));
if (i == 0 && _tpr > 0 && _tpr < 4)
tpay -= _secndr;