diff --git a/cg/cg4301.cpp b/cg/cg4301.cpp index c81123bf0..0eb543140 100755 --- a/cg/cg4301.cpp +++ b/cg/cg4301.cpp @@ -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