Totalizzazione versamenti

git-svn-id: svn://10.65.10.50/trunk@1643 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-07-27 08:03:00 +00:00
parent c44962e1a2
commit 4a9b11b239
2 changed files with 10 additions and 6 deletions

View File

@ -794,7 +794,7 @@ _DescrItem* TLiquidazione_app::describe_deleghe(int month)
d->_s1 = _del->get("S1"); // banca
d->_s2 = _del->get("S7"); // ABI
d->_s3 = _del->get("S8"); // CAB
d->_r0 = _del->get_real("R0") + _del->get_real("R1");
d->_r0 = _del->get_real("R0");
d->_d0 = _del->get_date("D0");
} // altrimenti lascia tutto in bianco e ci scriveranno i dati a mano

View File

@ -1039,11 +1039,15 @@ void Visliq_app::write_del()
real inter(0.0);
// riapplica il tasso di interesse
// se trimstrale e' stato scorporato rispetto
// all'eventuale input utente
inter = vers/(real(100.0)/(real(100.0)+intr));
inter.ceil();
if (!intr.is_zero())
{
// riapplica il tasso di interesse
// se trimstrale e' stato scorporato rispetto
// all'eventuale input utente
inter = vers*(real(100.0)/(real(100.0)+intr));
inter = vers - inter;
inter.ceil();
}
_del->put("R0",vers);
_del->put("R1",inter);