Correzioni Enrica + errori liq.
git-svn-id: svn://10.65.10.50/trunk@1582 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
403683e090
commit
00b28074d6
@ -147,7 +147,7 @@ bool TLiquidazione_app::update_firm(int month, bool recalc)
|
||||
|
||||
look_lim(liq_month(month), TRUE);
|
||||
|
||||
if (_isfinal && _lim->get_bool("B1") && _month != 13)
|
||||
if (_isregis && _lim->get_bool("B1") && _month != 13)
|
||||
return TRUE;
|
||||
|
||||
TConfig cnf(CONFIG_DITTA, "cg");
|
||||
@ -255,9 +255,10 @@ bool TLiquidazione_app::update_firm(int month, bool recalc)
|
||||
_pla->rewrite();
|
||||
}
|
||||
|
||||
|
||||
for (_reg->first(); _reg->good(); _reg->next())
|
||||
{
|
||||
if (codatt == _reg->get("S8") || quater)
|
||||
if (codatt == _reg->get("S8") || quater) // TBC quater: e' una pezza ma andra' cambiato
|
||||
{
|
||||
if (!riepliq) riepliq = _reg->get_bool("B6");
|
||||
if (!stliq) stliq = _reg->get_bool("B7");
|
||||
@ -492,6 +493,9 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
|
||||
const bool sosp_imp = _reg->get_bool("B1");
|
||||
const TRectype& rcs = _cur->curr(LF_CAUSALI);
|
||||
const bool fattrit = rcs.get_bool("RITFATT");
|
||||
|
||||
// for degiubbing only
|
||||
int numreg = _rmoviva->get_int("NUMREG");
|
||||
|
||||
if (dok || sreg || rs8 || cmt) continue;
|
||||
|
||||
@ -1039,7 +1043,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
|
||||
_pim->put("R12",fsv);
|
||||
_pim->put("I1", (long)tipomov);
|
||||
_pim->put("B3", ivarimb ? "X" : "");
|
||||
_pim->put("B4", _isricacq && was_riv? "X" : "");
|
||||
_pim->put("B4", (_isricacq && was_riv) ? "X" : "");
|
||||
_pim->put("S5", tipoiva);
|
||||
|
||||
// fatture in ritardo
|
||||
@ -1076,7 +1080,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt)
|
||||
real perc = _iva->get_real("R0");
|
||||
|
||||
real new_iva = (_pim->get_real("R0") * perc)/CENTO;
|
||||
new_iva.round(ROUND_LIRA);
|
||||
new_iva.ceil(ROUND_LIRA); // TBC check ceil
|
||||
|
||||
if (new_iva != old_iva)
|
||||
{
|
||||
@ -1625,8 +1629,6 @@ void TLiquidazione_app::write_liq(int month, const char* codatts)
|
||||
_lam->rewrite();
|
||||
}
|
||||
|
||||
//*
|
||||
|
||||
void TLiquidazione_app::recalc_annual(const char* att)
|
||||
{
|
||||
// viene chiamata 2 volte per le att. miste; PLA e' stata
|
||||
|
Loading…
x
Reference in New Issue
Block a user