diff --git a/cg/cg0400.cpp b/cg/cg0400.cpp index 4c8a51e7a..92458ea3e 100755 --- a/cg/cg0400.cpp +++ b/cg/cg0400.cpp @@ -197,7 +197,7 @@ const char* TProgressivi_iva::desc_iva(const TString& cod) if (cod == "{AF") TMP = "Artt.17c3/74c1"; - else if (cod == "{A14") + else if (cod == "{VA7") TMP = "Art.40c5/6/8 a.i."; else { @@ -272,8 +272,8 @@ void TProgressivi_iva::look_pim() TTable tabiva("%IVA"); TString80 codtab; TString16 codatt,codiva,tipoiva,codreg; - TToken_string a14("",'!'); - real imponibile, imposta,afi,afv,a14i,a14v; + TToken_string va7("",'!'); + real imponibile, imposta,afi,afv,va7i,va7v; real corr_item,*cp,aliquota; bool is_key; @@ -281,7 +281,7 @@ void TProgressivi_iva::look_pim() for (pim.first(); !pim.eof(); pim.next()) { - imponibile = imposta = afi = afv = a14i = a14v = ZERO; + imponibile = imposta = afi = afv = va7i = va7v = ZERO; tiporec tipo; codtab = pim.get("CODTAB"); @@ -339,16 +339,16 @@ void TProgressivi_iva::look_pim() imposta += pim.get_real("R6"); } if (_mese == 13) - { // Separa le autofatture non residenti(AF) e gli importi A14 + { // Separa le autofatture non residenti(AF) e gli importi VA7 afi = pim.get_real("R7"); afv = pim.get_real("R8"); - a14 = pim.get("S0"); - a14i = a14.get(0); - a14v = a14.get(1); - imponibile -= afi + a14i; - imposta -= afv + a14v; + va7 = pim.get("S0"); + va7i = va7.get(0); + va7v = va7.get(1); + imponibile -= afi + va7i; + imposta -= afv + va7v; _gen1_array.add_riga("{AF",afi,afv,ZERO,ZERO,ZERO,ZERO); // Mette '{' cosi' vengono stampati per ultimi - _gen1_array.add_riga("{A14",a14i,a14v,ZERO,ZERO,ZERO,ZERO); + _gen1_array.add_riga("{VA7",va7i,va7v,ZERO,ZERO,ZERO,ZERO); } if (_mese != 13) diff --git a/cg/cg4301.cpp b/cg/cg4301.cpp index 7234953a9..7554e480b 100755 --- a/cg/cg4301.cpp +++ b/cg/cg4301.cpp @@ -663,7 +663,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 (A14 in stampa) + // speciale in liquidazione annuale (VA7 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 @@ -1055,8 +1055,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 a14i(kr.get(0)); - real a14v(kr.get(1)); + real va7i(kr.get(0)); + real va7v(kr.get(1)); /* le porche fatture in ritardo */ TToken_string fr(_pim->get("S1"),'!'); @@ -1207,9 +1207,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 A14 in caso di liq annuale. - a14i += imponibile; - a14v += imposta; + // dalle vendite e assegnandoli al codice VA7 in caso di liq annuale. + va7i += imponibile; + va7v += imposta; } if (corrisp && !true_corrisp) @@ -1243,9 +1243,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 A14. - kr.add(a14i.string(), 0); - kr.add(a14v.string(), 1); + // art 40 c. 5/6/8 per VA7. + kr.add(va7i.string(), 0); + kr.add(va7v.string(), 1); _pim->put("S0",kr); @@ -1817,7 +1817,7 @@ void TLiquidazione_app::iva11_set_arr_pim(const TString& codatt) TToken_string tt("",'!'); tiporeg treg; int tipocr,tipodet,tagr; - real aliq, imp, iva, lor, vtot, atot, ivav, ivaa, adf, adi, a14i, a14v; + real aliq, imp, iva, lor, vtot, atot, ivav, ivaa, adf, adi, va7i, va7v; TString16 cur_att; const bool is_key = _iva11_arr.is_key(codatt); @@ -1948,10 +1948,10 @@ void TLiquidazione_app::iva11_set_arr_pim(const TString& codatt) } tt = _pim->get("S0"); - a14i = tt.get(0); - a14v = tt.get(1); - adf = imp - _pim->get_real("R7") - a14i + _pim->get_real("R5"); - adi = iva - _pim->get_real("R8") - a14v + _pim->get_real("R6"); + va7i = tt.get(0); + va7v = tt.get(1); + adf = imp - _pim->get_real("R7") - va7i + _pim->get_real("R5"); + adi = iva - _pim->get_real("R8") - va7v + _pim->get_real("R6"); if (aliq == 4.00) { array.add(adf,TAB11_EC101); @@ -2665,9 +2665,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_a14 = 0.0; + real imp_va7 = 0.0; TString16 codiva,reg,tiva; - TToken_string a14("",'!'); + TToken_string va7("",'!'); int tipoatt = att[strlen(att) -1] - '0'; TString aaa(att); @@ -2705,9 +2705,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"); - a14 = _pim->get("S0"); - imp_a14 = a14.get(0); - imp_ifs -= imp_af + imp_a14; // Toglie le autofatture e le op. A14 + va7 = _pim->get("S0"); + imp_va7 = va7.get(0); + imp_ifs -= imp_af + imp_va7; // Toglie le autofatture e le op. VA7 if ( // ESCLUSI: strcmp(att,*_pim_codatt) != 0 || diff --git a/cg/cg4304.cpp b/cg/cg4304.cpp index f4f0e93ec..865ddcc71 100755 --- a/cg/cg4304.cpp +++ b/cg/cg4304.cpp @@ -646,7 +646,7 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt) if (!corrisp || (!cfv.is_zero() || !cfi.is_zero())) { real adf, adi; // autofatture non residenti art. 17 - real a14i, a14v; // ammontare art 40 c. 5/6/8 + real va7i, va7v; // ammontare art 40 c. 5/6/8 real vendi = corrisp ? cfi : _pim->get_real("R0"); real vendv = corrisp ? cfv : _pim->get_real("R1"); @@ -656,21 +656,21 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt) if (month == 13) { TToken_string kr(_pim->get("S0"),'!'); - a14i = kr.get(0); - a14v = kr.get(1); + va7i = kr.get(0); + va7v = kr.get(1); adf = _pim->get_real("R7"); adi = _pim->get_real("R8"); } - d->_r0 += vendi - adf - a14i; - d->_r1 += vendv - adi - a14v; + d->_r0 += vendi - adf - va7i; + d->_r1 += vendv - adi - va7v; t0 += vendi /* - adf */; t1 += vendv /* - adi */; autodafe += adf; autodafe_iva += adi; - art40 += a14i; - art40_iva += a14v; + art40 += va7i; + art40_iva += va7v; } } if (isnew) @@ -720,7 +720,7 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt) { _DescrItem* ads = new _DescrItem(PIM_ROW); ads->_s0 = ref; - ads->_s1 = "A14"; + ads->_s1 = "VA7"; ads->_r0 = art40; ads->_r1 = art40_iva; if (isfirst) @@ -1333,7 +1333,7 @@ void TLiquidazione_app::set_pim(_DescrItem& d) int rw = 1; if (d._s1 == "AF") //Il dio sistema colpisce ancora, non va bene A35, ma AF... d._s2 = "Artt.17c3/74c1"; // La descrizione non la metto uguale perche' cosi e' piu' fika - else if (d._s1 == "A14") // Sempre per merito del dio sistema ho dovuto aggiungere A14. + else if (d._s1 == "VA7") // Sempre per merito del dio sistema ho dovuto aggiungere VA7. d._s2 = "Art.40c5/6/8 a.i."; else if (d._s0 == "74TER") rw++;