diff --git a/cg/cg4301.cpp b/cg/cg4301.cpp index c0310bd02..ca612fdfc 100755 --- a/cg/cg4301.cpp +++ b/cg/cg4301.cpp @@ -613,7 +613,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt) // speciale in liquidazione annuale bool autodafe = tipodoc == "AF"; //Adesso il tipocr==4 non c'entra piu' un tubo // vendite art. 40 c. 5/6/8 acq.intra., con trattamento - // speciale in liquidazione annuale (A36 in stampa) + // speciale in liquidazione annuale (A13 in stampa) bool art40 = (tipodoc != "AF" && tipoiva != "NS" && !rcs.get_bool("AUTOFATT") && rcs.get_bool("VALINTRA") && !intra); // indica acquisti per rivendita; viene messo in B4 di PIM per // indicare che e' soggetto al ricalcolo IVA (se voluto) in modo @@ -788,7 +788,7 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt) if (isrimbinfr) esni_rimb += imponibile; } - else if (tipoes_a == "14") + else if (tipoes_a == "12") esenti_b14 += imponibile; } @@ -974,8 +974,8 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt) /* i conturbanti art. 40 c. 5/6/8 a.i. */ TToken_string kr(_pim->get("S0"),'!'); - real a36i(kr.get(0)); - real a36v(kr.get(1)); + real a13i(kr.get(0)); + real a13v(kr.get(1)); /* le porche fatture in ritardo */ TToken_string fr(_pim->get("S1"),'!'); @@ -1127,9 +1127,9 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt) // Vengono piazzati in una TToken_string con separatore = a '!'. // La TToken_string viene registrata in S0. // La describe_pim() sommera' tutte le storie, scorporandoli - // dalle vendite e assegnandoli al codice A36 in caso di liq annuale. - a36i += imponibile; - a36v += imposta; + // dalle vendite e assegnandoli al codice A13 in caso di liq annuale. + a13i += imponibile; + a13v += imposta; } if (corrisp && !true_corrisp) @@ -1162,9 +1162,9 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt) _pim->put("B4", (_isricacq && was_riv) ? "X" : ""); _pim->put("S5", tipoiva); - // art 40 c. 5/6/8 per A36. - kr.add(a36i.string(), 0); - kr.add(a36v.string(), 1); + // art 40 c. 5/6/8 per A13. + kr.add(a13i.string(), 0); + kr.add(a13v.string(), 1); _pim->put("S0",kr); @@ -1475,15 +1475,15 @@ void TLiquidazione_app::iva11_set_arr(const TString& codatt) array.add(imposta,TAB11_FC208); } - if (tipoes_a == "01") + if (tipoes_a == "13") array.add(imponibile,TAB11_FC109); - else if (tipoes_a == "12") + else if (tipoes_a == "10") array.add(imponibile,TAB11_FC110); - else if (tipoes_a == "13") + else if (tipoes_a == "11") array.add(imponibile,TAB11_FC111); - else if (tipoes_a == "14") + else if (tipoes_a == "12") array.add(imponibile,TAB11_FC112); - else if (tipoes_a == "15") + else if (tipoes_a == "14") array.add(imponibile,TAB11_FC113); } else @@ -1528,13 +1528,13 @@ void TLiquidazione_app::iva11_set_arr(const TString& codatt) array.add(imposta,TAB11_SBI06); } - if (tipoes_a == "01") + if (tipoes_a == "13") array.add(imponibile,TAB11_SBF07); - else if (tipoes_a == "12") + else if (tipoes_a == "10") array.add(imponibile,TAB11_SBF08); - else if (tipoes_a == "13") + else if (tipoes_a == "11") array.add(imponibile,TAB11_SBF09); - else if (tipoes_a == "14") + else if (tipoes_a == "12") array.add(imponibile,TAB11_SBF10); } else @@ -1592,9 +1592,9 @@ void TLiquidazione_app::iva11_set_arr(const TString& codatt) } } - if (tipoes_v == "10") + if (tipoes_v == "24") array.add(imponibile,TAB11_EC107); - if (tipoes_v == "24") + if (tipoes_v == "21") array.add(imponibile,TAB11_EC108); else if (tipoes_v == "B1") array.add(imponibile,TAB11_EC109); @@ -1602,11 +1602,11 @@ void TLiquidazione_app::iva11_set_arr(const TString& codatt) array.add(imponibile,TAB11_EC110); else if (tipoes_v == "B3") array.add(imponibile,TAB11_EC111); - else if (tipoes_v == "26") + else if (tipoes_v == "25") array.add(imponibile,TAB11_EC112); - else if (tipoes_v == "24B") + else if (tipoes_v == "22") array.add(imponibile,TAB11_EC114); - else if (tipoes_v == "23") + else if (tipoes_v == "20") array.add(imponibile,TAB11_EC115); if (tipocr == 4) @@ -1625,7 +1625,7 @@ void TLiquidazione_app::iva11_set_arr(const TString& codatt) array.add(imposta,TAB11_L2BIS); } - if (!autofattura && !sosp_imp && intra && tipoes_v == "24B") + if (!autofattura && !sosp_imp && intra && tipoes_v == "22") array.add(imponibile,TAB11_E52); if (_isagricolo && (tipodoc != "CR" && tipodoc != "SC" && tipodoc != "RF" && tipodoc != "FS")) @@ -1795,22 +1795,22 @@ void TLiquidazione_app::iva11_set_arr_pim(const TString& codatt) array.add(_pim->get_real("R10"),TAB11_FBC206); } - if (a11 == "12") + if (a11 == "10") array.add(_pim->get_real("R9"),TAB11_FBC107); - if (a11 == "13" || a11 == "14") + if (a11 == "11" || a11 == "12") array.add(_pim->get_real("R9"),TAB11_FBC108); - if (a11 == "15") + if (a11 == "14") array.add(_pim->get_real("R9"),TAB11_FBC109); } } // is_acquisto if (is_vendita) { - if (v11 == "E50") + if (v11 == "G7A") array.add(imp,TAB11_EC116); - else if (v11 == "E51") + else if (v11 == "G7B") array.add(imp,TAB11_EC117); - else if (v11 == "R9") + else if (v11 == "R9") // Divenuto obsoleto prima ancora di utilizzarlo... array.add(imp,TAB11_R9,LF_TAB1100B); @@ -2474,9 +2474,9 @@ void TLiquidazione_app::recalc_annual(const char* att) real volaff2 = 0.0; real imp_ifs = 0.0; real imp_af = 0.0; - real imp_a36 = 0.0; + real imp_a13 = 0.0; TString16 codiva,reg,tiva; - TToken_string a36("",'!'); + TToken_string a13("",'!'); int tipoatt = att[strlen(att) -1] - '0'; TString aaa(att); @@ -2507,9 +2507,9 @@ void TLiquidazione_app::recalc_annual(const char* att) const bool simp = _reg->get_bool("B1"); imp_ifs = _pim->get_real("R0"); imp_af = _pim->get_real("R7"); - a36 = _pim->get("S0"); - imp_a36 = a36.get(0); - imp_ifs -= imp_af + imp_a36; // Toglie le autofatture e le op. A36 + a13 = _pim->get("S0"); + imp_a13 = a13.get(0); + imp_ifs -= imp_af + imp_a13; // Toglie le autofatture e le op. A13 if (corrisp) imp_ifs += _pim->get_real("R5"); // Se corrisp. aggiunge le FS if ( // ESCLUSI: