Corretto aggiornamento saldi di chiusura

git-svn-id: svn://10.65.10.50/trunk@3084 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-06-25 12:54:16 +00:00
parent 1c95e7a580
commit 673e2fb152

View File

@ -265,12 +265,15 @@ void TSaldo_agg::registra()
flag_salini = 'D'; flag_salini = 'D';
saldi.put(SLD_FLAGSALINI, flag_salini); saldi.put(SLD_FLAGSALINI, flag_salini);
saldi.put(SLD_SALDO, si); saldi.put(SLD_SALDO, si);
} }
real sf = tcon.saldofin();
char flag_salfin = sf < ZERO ? 'A' : 'D'; TImporto sf('D', tcon.saldofin());
if (flag_salfin == 'A') sf = -sf; TImporto old_sf(saldi.get(SLD_FLAGSALFIN)[0], saldi.get_real(SLD_SALDOFIN));
saldi.put(SLD_FLAGSALFIN, flag_salfin);
saldi.put(SLD_SALDOFIN, sf); sf += old_sf;
sf.normalize();
saldi.put(SLD_FLAGSALFIN, sf.sezione());
saldi.put(SLD_SALDOFIN, sf.valore());
r = saldi.get_real(SLD_PDARE); r = saldi.get_real(SLD_PDARE);
r += tcon.dare(); r += tcon.dare();