root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Cazzatella differita e round prorata

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@1640 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
villa 1995-07-25 08:19:50 +00:00
parent db5acc1fba
commit 311aa57811
2 changed files with 3713 additions and 3711 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
cg/cg4301.cpp
View File

@ -1119,7 +1119,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
if (!_prorata.is_zero() && month != 13) if (!_prorata.is_zero() && month != 13)
{ {
prorata = acquisti_iva * (_prorata / CENTO); prorata = acquisti_iva * (_prorata / CENTO);
prorata.round(ROUND_LIRA); prorata.round(ROUND_MILLELIRE);
acquisti_iva -= prorata; acquisti_iva -= prorata;
} }
look_plm(month, codatt, TRUE); look_plm(month, codatt, TRUE);
@ -1427,7 +1427,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
attc++; attc++;
} // fine else } // fine else
if (!(_isdifferita && is_first_month(month))) if (!(_isdifferita && is_first_month(month+deltam)))
{ {
if (_isviaggio) if (_isviaggio)
{ {
@ -1457,7 +1457,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
} }
} // end ciclo su attivita' } // end ciclo su attivita'
if (!(_isdifferita && is_first_month(month))) if (!(_isdifferita && is_first_month(month+deltam)))
{ {
if (month < 13) // va bene anche se differita sommando deltam (che e' 0 normalmente) if (month < 13) // va bene anche se differita sommando deltam (che e' 0 normalmente)
{ {
@ -1518,8 +1518,9 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
{ {
// calcolo conguaglio -- se positivo e' a debito // calcolo conguaglio -- se positivo e' a debito
real topay = (iaq + ppg) * (prorata / CENTO); real topay = (iaq + ppg) * (prorata / CENTO);
topay.round(ROUND_MILLELIRE);
conguaglio = topay - ppg; conguaglio = topay - ppg;
conguaglio.round(ROUND_LIRA); conguaglio.round(ROUND_MILLELIRE);
} }
_pla->put("R9", conguaglio); _pla->put("R9", conguaglio);
_pla->put("R10",prorata); _pla->put("R10",prorata);

5
cg/cg4304.cpp
View File

@ -693,8 +693,9 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt)
{ {
// calcolo conguaglio -- se positivo e' a debito // calcolo conguaglio -- se positivo e' a debito
topay = (iaq + ppg) * (pr / CENTO); topay = (iaq + ppg) * (pr / CENTO);
topay.round(ROUND_MILLELIRE);
co = topay - ppg; co = topay - ppg;
co.round(ROUND_LIRA); co.round(ROUND_MILLELIRE);
} }
_DescrItem* dd = new _DescrItem(ANNUAL); _DescrItem* dd = new _DescrItem(ANNUAL);
@ -1018,7 +1019,7 @@ void TLiquidazione_app::set_pim_head()
void TLiquidazione_app::set_pim(_DescrItem& d) void TLiquidazione_app::set_pim(_DescrItem& d)
{ {
// succede con le autocazzate non residenti non moviomentate eccetera // succede con le autocazzate non residenti non movimentate eccetera
if ((d._r0 + d._r1 + d._r2 + d._r3 + d._r4 + d._r5) == ZERO) if ((d._r0 + d._r1 + d._r2 + d._r3 + d._r4 + d._r5) == ZERO)
return; return;