Corretto 0.0 in ZERO

git-svn-id: svn://10.65.10.50/trunk@957 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-02-02 18:15:35 +00:00
parent ea86d8e7ce
commit c9afa0a749

View File

@ -260,7 +260,7 @@ TToken_string& Pagamento::set_rata(int index, real howmuch,
TDate oldd = index > 0 ? data_rata(index -1) : _inizio;
int day = date - oldd;
real toshare(_tpr == 0 ? _firstr : _secndr);
real perc = (_tpr > 0 && index == 0) ? 0.0 : howmuch/toshare;
real perc = (_tpr > 0 && index == 0) ? ZERO : howmuch/toshare;
perc *= real(100.0);
perc.round(2);