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)
{
prorata = acquisti_iva * (_prorata / CENTO);
prorata.round(ROUND_LIRA);
prorata.round(ROUND_MILLELIRE);
acquisti_iva -= prorata;
}
look_plm(month, codatt, TRUE);
@ -1427,7 +1427,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
attc++;
} // fine else
if (!(_isdifferita && is_first_month(month)))
if (!(_isdifferita && is_first_month(month+deltam)))
{
if (_isviaggio)
{
@ -1457,7 +1457,7 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
}
} // 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)
{
@ -1518,8 +1518,9 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
{
// calcolo conguaglio -- se positivo e' a debito
real topay = (iaq + ppg) * (prorata / CENTO);
topay.round(ROUND_MILLELIRE);
conguaglio = topay - ppg;
conguaglio.round(ROUND_LIRA);
conguaglio.round(ROUND_MILLELIRE);
}
_pla->put("R9", conguaglio);
_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
topay = (iaq + ppg) * (pr / CENTO);
topay.round(ROUND_MILLELIRE);
co = topay - ppg;
co.round(ROUND_LIRA);
co.round(ROUND_MILLELIRE);
}
_DescrItem* dd = new _DescrItem(ANNUAL);
@ -1018,7 +1019,7 @@ void TLiquidazione_app::set_pim_head()
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)
return;