diff --git a/src/cg/cg4100.cpp b/src/cg/cg4100.cpp index 4f8990a97..7719a25b1 100755 --- a/src/cg/cg4100.cpp +++ b/src/cg/cg4100.cpp @@ -90,7 +90,7 @@ bool CG4100_App::sort_sal() sal.clear_saldi(year); long numreg = 0L; tiposal tsal = normale; - bool provvis = FALSE; + char provvis; TDate datareg; TString query; query << "USE RMOV SELECT ANNOES=" << _year; @@ -108,15 +108,14 @@ bool CG4100_App::sort_sal() break; if (_year != rmov.get_int(RMV_ANNOES)) continue; - numreg = rmov.get_long(RMV_NUMREG); - gruppo = rmov.get_int(RMV_GRUPPO); conto = rmov.get_int(RMV_CONTO); sottoconto = rmov.get_long(RMV_SOTTOCONTO); bool scaricato = false; - if (numreg != oldnumreg) + + if (numreg != oldnumreg) { if (sal.items() > 0) { @@ -143,7 +142,7 @@ bool CG4100_App::sort_sal() } scaricato = mov.get_bool(MOV_SCARCON); - provvis = mov.get(MOV_PROVVIS).not_empty(); + provvis = mov.get_char(MOV_PROVVIS); datareg = mov.get_date(MOV_DATAREG); sal.set_anno_es(_year); diff --git a/src/cg/cg4300.cpp b/src/cg/cg4300.cpp index 572065259..79b104bf5 100755 --- a/src/cg/cg4300.cpp +++ b/src/cg/cg4300.cpp @@ -308,6 +308,9 @@ bool TLiquidazione_app::user_create() __firm = TApplication::get_firm(); + _prorata_nd = ini_get_bool(CONFIG_STUDIO, "cg", "ProRataNumDen", false); + + pnd.add_status(1); if (_is_interactive) diff --git a/src/cg/cg4300.h b/src/cg/cg4300.h index b4d44670c..0066b7ce8 100755 --- a/src/cg/cg4300.h +++ b/src/cg/cg4300.h @@ -273,7 +273,8 @@ class TLiquidazione_app : public TPrint_application bool _stampa_acc; // stampa trafiletto saldo/acconto bool _riepilogo; // stampa riepilogo sul registro bool _sind11; // somma imposte non detraibili in trasferimento IVA11 (da configurazione dati studio) - tbc _basecalc; // tipo base di calcolo acconto + bool _prorata_nd; // calcolo pro rata con numeratore e denominatore su codice IVA + tbc _basecalc; // tipo base di calcolo acconto TString8 _freqviva; // frequenza versamenti (M|T) long _n_ditte; // numero ditte bool _comp_acconto; // stiamo calcolando l'acconto diff --git a/src/cg/cg4301.cpp b/src/cg/cg4301.cpp index 37634f4a2..e5082d586 100755 --- a/src/cg/cg4301.cpp +++ b/src/cg/cg4301.cpp @@ -1644,11 +1644,11 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt, TAssoc_array & const TPartita& p = arrpart.partita(pagsca); const TRiga_partite& rp = p.riga(nrigp); - datapag = rp.get(PART_DATAPAG); + datapag = rp.get(PART_DATAREG); if (!datapag.ok()) datapag = rp.get(PART_DATADOC); if (!datapag.ok()) - datapag = rp.get(PART_DATAREG); + datapag = rp.get(PART_DATAPAG); if (datapag < datafat) datapag = datafat; } @@ -2922,10 +2922,10 @@ void TLiquidazione_app::recalc_att(int month, const char* codatt, TAssoc_array & // Somma i vari prorata calcolati per gli anni precedenti prorata += prorata_precedente1 + prorata_precedente2; - acquisti_iva -= prorata; // Rettifica acquisti_iva prorata += prorata_diff; if (!lia.get_bool("B7")) - prorata = ZERO; + prorata = ZERO; + acquisti_iva -= prorata; // Rettifica acquisti_iva fdiffinc_iva_acq -= prorata_diff; // Rettifica acquisti_iva differiti incassati } look_plm(month, codatt, true); @@ -4237,43 +4237,53 @@ void TLiquidazione_app::write_liq(int month, const char* codatts) { const TString8 att = tmpatt; const int tipoatt = att.right(1)[0] - '0'; - if (tipoatt == 1) // su PLA l'attivita' e' sempre 1 - { - if (!look_pla(att)) - continue; - - const real vf1 = _pla->get_real("R14"); - const real vf2 = _pla->get_real("S1"); - const real iaq = _pla->get_real("R11"); // IVA acquisti - const real ppg = _pla->get_real("R12"); // pro-rata pagato - - vol_aff_1 += vf1; - vol_aff_2 += vf2; - vol_aff_l += _pla->get_real("R0"); // volume affari lordo - - real es_c1 = _pla->get_real("R1"); // Tipo esenzione B1 - real es_c2 = _pla->get_real("R2"); - real es_c3 = _pla->get_real("R3"); - real es_c1a = _pla->get_real("R15"); - real es_c3_am = _pla->get_real("R16"); - real es_c1a_am = _pla->get_real("R17"); - real csamm = _pla->get_real("R4"); - real ven_rev = _pla->get_real("R18"); - real prorata; - real conguaglio; - real topay; - const real ris = vf1 + vf2; // gia' esclusi: NS, B3, cess. amm - - // calcola nuovo prorata dal 1998 per ogni attivita' (miste: 1+2) - const real rsa = ris - (es_c1a-es_c1a_am) - (es_c3-es_c3_am) - ven_rev; - const real rsn = rsa - es_c1; - if (!rsa.is_zero()) - { - prorata = CENTO - (rsn * CENTO / rsa); // Percentuale di indetraibilitā: reciproco della detraibilitā - prorata.round(0); - } - - // calcolo conguaglio -- se positivo e' a debito + if (tipoatt == 1) // su PLA l'attivita' e' sempre 1 + { + if (!look_pla(att)) + continue; + + const real vf1 = _pla->get_real("R14"); + const real vf2 = _pla->get_real("S1"); + const real iaq = _pla->get_real("R11"); // IVA acquisti + const real ppg = _pla->get_real("R12"); // pro-rata pagato + + vol_aff_1 += vf1; + vol_aff_2 += vf2; + vol_aff_l += _pla->get_real("R0"); // volume affari lordo + + real es_c1 = _pla->get_real("R1"); // Tipo esenzione B1 + real es_c2 = _pla->get_real("R2"); + real es_c3 = _pla->get_real("R3"); + real es_c1a = _pla->get_real("R15"); + real es_c3_am = _pla->get_real("R16"); + real es_c1a_am = _pla->get_real("R17"); + real csamm = _pla->get_real("R4"); + real ven_rev = _pla->get_real("R18"); + + real prorata; + real conguaglio; + real topay; + + // calcola nuovo prorata dal 1998 per ogni attivita' (miste: 1+2) + if (_prorata_nd) + { + const real rsd = _pla->get_real("R20"); + const real rsn = _pla->get_real("R19"); + + if (rsd != ZERO) + prorata = CENTO - (rsn * CENTO / rsd); // Percentuale di indetraibilita: reciproco della percentuale di detraibilita' + } + else + { + const real ris = vf1 + vf2; // gia' esclusi: NS, B3, cess. amm + const real rsd = ris - (es_c1a - es_c1a_am) - (es_c3 - es_c3_am) - ven_rev; + const real rsn = rsd - es_c1; + + if (!rsd.is_zero()) + prorata = CENTO - (rsn * CENTO / rsd); // Percentuale di indetraibilitā: reciproco della detraibilitā + } + prorata.round(0); + // calcolo conguaglio -- se positivo e' a debito if (prorata > ZERO && lia.get_bool("B7")) { topay = (iaq + ppg) * prorata / CENTO; @@ -4590,20 +4600,20 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) { // viene chiamata 2 volte per le att. miste; PLA e' stata // azzerata dove serve da update_firm se siamo all'annuale - real es_c1 = 0.0; - real es_c2 = 0.0; - real es_c3 = 0.0; - real es_c1a = 0.0; - real es_c3_am = 0.0; - real es_c1a_am= 0.0; - real cess_amm = 0.0; - real vendite = 0.0; - real pro_pag = 0.0; - real iva_acq = 0.0; - real ven_lrd = 0.0; - real volaff1 = 0.0; - real volaff2 = 0.0; - real ven_rev = 0.0; + real es_c1; + real es_c2; + real es_c3; + real es_c1a; + real es_c3_am; + real es_c1a_am; + real cess_amm; + real vendite; + real pro_pag; + real iva_acq; + real ven_lrd; + real volaff1; + real volaff2; + real ven_rev; TString4 codiva,reg,tiva; TToken_string va7("",'!'); @@ -4634,53 +4644,65 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) TAssoc_array corr_ann; _CorrItem *cc; bool is_key; + real num_pro_rata; + real den_pro_rata; _pim->zero(); _pim->put("CODTAB", _year); // 24-02-2014 Partiamo dall'anno giusto - for (int err = _pim->read(_isgteq); err == NOERR; err = _pim->next()) - { - if (_year != *_pim_anno || _month != atoi(*_pim_mese)) // In questo caso _month vale sempre 13 - continue; - - const int tipocr = atoi(*_pim_tipocr); - codiva = *_pim_codiva; - reg = *_pim_codreg; - look_iva(codiva); look_reg(reg); - tiva = _iva->get("S1"); - const tiporeg treg = (tiporeg)_reg->get_long("I0"); - const bool corrisp = _reg->get_bool("B0"); - const tipo_sospensione simp = _reg->get_bool("B1") ? (tipo_sospensione) _reg->get_int("I9") : nessuna; + for (int err = _pim->read(_isgteq); err == NOERR; err = _pim->next()) + { + if (_year != *_pim_anno || _month != atoi(*_pim_mese)) // In questo caso _month vale sempre 13 + continue; - if ( // ESCLUSI: - strcmp(att,*_pim_codatt) != 0 || - treg != vendita || // non vendite - tipocr == 4 || // cessioni beni ammortizzabili - tiva == "NS" || // non soggetti - simp == normale || - simp == liquidazione) // sospensione di imposta - continue; - real imp_ifs = _pim->get("R0"); // Imponibile - real imp_af = _pim->get("R7"); // Autofatture - va7 = _pim->get("S0"); - real imp_va7 = va7.get(0); // operazioni VA7 - imp_ifs -= imp_af + imp_va7; // Toglie le autofatture e le op. VA7 + const int tipocr = atoi(*_pim_tipocr); + codiva = *_pim_codiva; + reg = *_pim_codreg; + look_iva(codiva); look_reg(reg); + tiva = _iva->get("S1"); + const tiporeg treg = (tiporeg)_reg->get_long("I0"); + const bool corrisp = _reg->get_bool("B0"); + const tipo_sospensione simp = _reg->get_bool("B1") ? (tipo_sospensione)_reg->get_int("I9") : nessuna; - if (corrisp) - { - imp_ifs += _pim->get_real("R5"); // Se corrisp. aggiunge le FS - is_key = corr_ann.is_key(codiva); - if (!is_key) // Aggiunge se non esiste - corr_ann.add(codiva, (_CorrItem*) new _CorrItem,is_key); - _CorrItem& ca = (_CorrItem&) corr_ann[codiva]; - ca._totale += _pim->get_real("R3"); - if (!is_key) // se non c'e' lo aggiunge - ca._aliquota = _iva->get_real("R0")/CENTO; // Se č nuovo setta l'aliquota - } - if (tipoatt == 1) - volaff1 += imp_ifs; - else - volaff2 += imp_ifs; - } + if ( // ESCLUSI: + strcmp(att, *_pim_codatt) != 0 || + treg != vendita || // non vendite + tipocr == 4 || // cessioni beni ammortizzabili + tiva == "NS" || // non soggetti + simp == normale || + simp == liquidazione) // sospensione di imposta + continue; + + real imp_ifs = _pim->get("R0"); // Imponibile + real imp_af = _pim->get("R7"); // Autofatture + va7 = _pim->get("S0"); + real imp_va7 = va7.get(0); // operazioni VA7 + imp_ifs -= imp_af + imp_va7; // Toglie le autofatture e le op. VA7 + + if (corrisp) + { + imp_ifs += _pim->get_real("R5"); // Se corrisp. aggiunge le FS + is_key = corr_ann.is_key(codiva); + if (!is_key) // Aggiunge se non esiste + corr_ann.add(codiva, (_CorrItem*) new _CorrItem, is_key); + _CorrItem& ca = (_CorrItem&)corr_ann[codiva]; + ca._totale += _pim->get_real("R3"); + if (!is_key) // se non c'e' lo aggiunge + ca._aliquota = _iva->get_real("R0") / CENTO; // Se č nuovo setta l'aliquota + } + if (tipoatt == 1) + volaff1 += imp_ifs; + else + volaff2 += imp_ifs; + if (_prorata_nd) + { + TCodiceIVA ci(codiva); + + if (ci.numeratore_pro_rata()) + num_pro_rata += imp_ifs; + if (ci.denominatore_pro_rata()) + den_pro_rata += imp_ifs; + } + } // Ora si scorporano i corrispettivi raggruppati per codice IVA e si totalizzano gli imponibili // calcolati, da aggiungere poi a volaff1 o volaff2 @@ -4692,6 +4714,15 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) volaff1 += imp; else volaff2 += imp; + if (_prorata_nd) + { + TCodiceIVA ci(codiva); + + if (ci.numeratore_pro_rata()) + num_pro_rata += imp; + if (ci.denominatore_pro_rata()) + den_pro_rata += imp; + } } // calcola esenti, cessioni, lordo vendite, prorata pagato @@ -4757,8 +4788,9 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) const int tipomov = id.get(ID_TIPOMOV).as_int(); const int annoliq = id.get(ID_ANNOLIQ).as_int(); const TDate dataregp = id.get(ID_DATAREGP).as_date(); - const TImporto imp(sezione, id.get(RMI_IMPONIBILE).as_real()); + TImporto imp(sezione, id.get(RMI_IMPONIBILE).as_real()); + imp.normalize('D'); key = id.get(ID_NUMREG).as_string(); key.add(id.get(ID_NUMRIG).as_string()); codiva = cache().get(LF_RMOVIVA, key, RMI_CODIVA); @@ -4774,6 +4806,15 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) } if ((annoliq == year) && (tipoiva == 1)) tot1 += imp; + if (_prorata_nd) + { + TCodiceIVA ci(codiva); + + if (ci.numeratore_pro_rata()) + num_pro_rata += imp.valore(); + if (ci.denominatore_pro_rata()) + den_pro_rata += imp.valore(); + } } } first = false; @@ -4795,6 +4836,11 @@ void TLiquidazione_app::recalc_annual(const char* att, bool & first) _pla->put("R14", volaff1); _pla->put("S1", volaff2.string()); _pla->put("R18", ven_rev); - _pla->rewrite(); + if (_prorata_nd) + { + _pla->put("R19", num_pro_rata); + _pla->put("R20", den_pro_rata); + } + _pla->rewrite(); } diff --git a/src/cg/cg4304.cpp b/src/cg/cg4304.cpp index 031668bf5..4823753a1 100755 --- a/src/cg/cg4304.cpp +++ b/src/cg/cg4304.cpp @@ -1095,7 +1095,7 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt, const bool // calcolo del prorata o del nuovo plafond o .... if (look_pla(codatt)) { - real v1 = _pla->get_real("R14"); // Totale imponibile vendite + real v1 = _pla->get_real("R14"); // Volume d'affari I attivitā real v2 = _pla->get_real("S1"); // Volume d'affari II attivitā real ris = v1 + v2; real e1 = _pla->get_real("R1"); // Totale vendite esenti C1 @@ -1108,32 +1108,44 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt, const bool real vrc = _pla->get_real("R18"); // Vendite reverse charge real iaq = _pla->get_real("R11"); // IVA acquisti real ppg = _pla->get_real("R12"); // pro-rata pagato - real ven_rev = _pla->get_real("R18"); - // calcola nuovo prorata per ogni attivita' (miste: 1+2) - real pr; - const real rsa = ris - (e3-e5) - (e4-e6) - ven_rev; - const real rsn = rsa - e1; + real prorata; + real rsd; + real rsn; - if (!rsa.is_zero()) - { - pr = CENTO - (rsn * CENTO / rsa); // Percentuale di indetraibilita: reciproco della percentuale di detraibilita' - pr.round(0); - } - + if (_prorata_nd) + { + rsd = _pla->get_real("R20"); + rsn = _pla->get_real("R19"); + + if (!rsd.is_zero()) + prorata = CENTO - (rsn * CENTO / rsd); // Percentuale di indetraibilita: reciproco della percentuale di detraibilita' + } + else + { + rsd = ris - (e3 - e5) - (e4 - e6) - vrc; + rsn = rsd - e1; + + if (!rsd.is_zero()) + prorata = CENTO - (rsn * CENTO / rsd); // Percentuale di indetraibilita: reciproco della percentuale di detraibilita' + } + prorata.round(0); + real co = 0.0; real topay = 0.0; - //if (pr != _prorata.current()) - { - // calcolo conguaglio -- se positivo e' a debito - if (pr > ZERO) - { - topay = (iaq + ppg) * pr / CENTO; - round_imposta(topay); - } - co = topay - ppg; - round_imposta(co); - } + + // calcolo conguaglio -- se positivo e' a debito + const TRectype & lia = get_lia(); + + if (prorata > ZERO && lia.get_bool("B7")) + { + topay = (iaq + ppg) * prorata / CENTO; + round_imposta(topay); + } + else + prorata = ZERO; + co = topay - ppg; + round_imposta(co); _DescrItem* dd = new _DescrItem(ANNUAL); @@ -1156,7 +1168,7 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt, const bool } dd->_r0 = ris; dd->_r1 = e1; - dd->_r2 = pr > ZERO ? pr : ZERO; + dd->_r2 = prorata; dd->_r3 = co; dd->_r4 = e2; dd->_r5 = e3; @@ -1165,8 +1177,9 @@ void TLiquidazione_app::describe_pims(int month, const char* codatt, const bool dd->_r8 = e5; dd->_r9 = e6; dd->_r10 = vrc; - dd->_ra0 = rsa; - dd->_ra1 = rsn; + dd->_ra0 = rsn; + dd->_ra1 = rsd; + dd->_ra2 = vrc; t->_arr.add(dd); } } @@ -2792,7 +2805,7 @@ bool TLiquidazione_app::set_annual(_DescrItem& d) int row = get_maxrow()+1; if (row == 1) row = 4; - if (d._f0 & IS_PRORATA) + if ((d._r2 > ZERO) && (d._f0 & IS_PRORATA)) { // non lo ha stampato prima se annuale, perche' Vladimiro il nefido pretende l'assurdo aggiornamento della perc. a quella nuova const int year_int = atoi(_year); @@ -2817,20 +2830,46 @@ bool TLiquidazione_app::set_annual(_DescrItem& d) set_row(row++, FR("%% PRO-RATA (%s%%) ed IVA non detraibile (%s%%)@69g%r"), (const char*)s1, (const char*)s2, &(d._r6)); else set_row(row++, FR("%% PRO-RATA (%s%%)"), (const char*)s1); - set_row(row++, FR("Numeratore pro-rata @69g%r"), &(d._ra1)); - set_row(row++, FR("Denominatore @69g%r"), &(d._ra0)); -#ifdef DBG - set_row(row++, FR("Numeratore pro-rata 1 @69g%r"), &(d._ra3)); - set_row(row++, FR("Denominatore 1 @69g%r"), &(d._ra2)); -#endif - set_row(row++,FR("Detraibilitā @69g%r%%"), &perc_det); + set_row(row++, FR("Detraibilitā @69g%r%%"), &perc_det); row++; - set_row(row++,FR("C1 - Operazioni esenti escluse da nr. 1 a 9 e 11 art. 10 @69g%r"), &(d._r1)); - set_row(row++,FR("C2 - Operazioni esenti di cui nr. 11 art. 10 @69g%r"), &(d._r4)); - set_row(row++,FR("C3 - Operazioni esenti da nr. 1 a 9 art. 10 @69g%r"), &(d._r5)); - set_row(row++,FR("@6gdi cui cessione beni ammortizzabili @69g%r"), &(d._r8)); - set_row(row++,FR("C1A - Operazioni esenti di cui all'art.10 n. 27 quinquies @69g%r"), &(d._r7)); - set_row(row++,FR("@6gdi cui cessione beni ammortizzabili @69g%r"), &(d._r9)); + if (_prorata_nd) + { + set_row(row++, FR("Numeratore pro-rata @69g%r"), &(d._ra0)); + set_row(row++, FR("Denominatore @69g%r"), &(d._ra1)); + } + else + { + set_row(row++, FR(" - Volume d'affari @69g%r"), &(vol_aff)); + set_row(row++, FR("C1 - Operazioni esenti escluse da nr. 1 a 9 e 11 art. 10 @69g%r"), &(d._r1)); + set_row(row++, FR("C2 - Operazioni esenti di cui nr. 11 art. 10 @69g%r"), &(d._r4)); + set_row(row++, FR("C3 - Operazioni esenti da nr. 1 a 9 art. 10 @69g%r"), &(d._r5)); + set_row(row++, FR("@6gdi cui cessione beni ammortizzabili @69g%r"), &(d._r8)); + + const real diff1 = d._r5 - d._r8; + + if (diff1 != ZERO) + { + set_row(row++, FR("@69g----------------")); + set_row(row++, FR("6g Differenza @69g%r"), &(diff1)); + row++; + } + set_row(row++, FR("C1A - Operazioni esenti di cui all'art.10 n. 27 quinquies @69g%r"), &(d._r7)); + set_row(row++, FR("@6gdi cui cessione beni ammortizzabili @69g%r"), &(d._r9)); + + const real diff2 = d._r7 - d._r9; + + if (diff2 != ZERO) + { + set_row(row++, FR("@69g----------------")); + set_row(row++, FR("6g Differenza @69g%r"), &(diff2)); + row++; + } + set_row(row++, FR(" - Vendite Reverse Charge @69g%r"), &(d._ra2)); + set_row(row++, FR("Numeratore pro-rata @69g%r"), &(d._ra0)); + set_row(row++, FR(" Volume d'affari - C3(senza beni amm.) - C1A(senza beni amm.) - vendite reverse charge ")); + set_row(row++, FR("Denominatore @69g%r"), &(d._ra1)); + set_row(row++, FR(" Denominatore - C1 ")); + } // set_row(row++, FR("Volume d'affari @69g%r"), &vol_aff); // set_row(row++, FR("Totale vendite al fine del calcolo del pro-rata @69g%r"), &vol_aff); diff --git a/src/cg/cg5000a.h b/src/cg/cg5000a.h index e4ddd1de0..acf6b758a 100755 --- a/src/cg/cg5000a.h +++ b/src/cg/cg5000a.h @@ -19,4 +19,5 @@ #define FLD_DESAGV 119 #define CHK_RICACQ 120 #define CHK_NOIDRG 121 -#define CHK_02GESCOMPCR 122 \ No newline at end of file +#define CHK_02GESCOMPCR 122 +#define CHK_PRORATAND 123 \ No newline at end of file diff --git a/src/cg/cg5000a.uml b/src/cg/cg5000a.uml index 194ae2177..a5980775d 100755 --- a/src/cg/cg5000a.uml +++ b/src/cg/cg5000a.uml @@ -6,7 +6,7 @@ ENDPAGE PAGE "Parametri contabilitā" 0 0 0 2 -GROUPBOX DLG_NULL 74 10 +GROUPBOX DLG_NULL 74 11 BEGIN PROMPT 1 1 "@bParametri IVA" END @@ -76,10 +76,10 @@ BEGIN DISPLAY "%@5" R0 DISPLAY "Vent." S6 DISPLAY "Sospeso" B2 - OUTPUT FLD_CODAGV CODTAB - OUTPUT FLD_DESAGV S0 - CHECKTYPE NORMAL - FIELD CodAgv + OUTPUT FLD_CODAGV CODTAB + OUTPUT FLD_DESAGV S0 + CHECKTYPE NORMAL + FIELD CodAgv VALIDATE ZEROFILL_FUNC 2 END @@ -98,28 +98,34 @@ BEGIN CHECKTYPE NORMAL END +BOOLEAN CHK_PRORATAND +BEGIN + PROMPT 3 10 "Calcolo Pro rata con numeratore e denominatore" + FIELD ProRataNumDen +END + GROUPBOX DLG_NULL 74 5 BEGIN - PROMPT 1 13 "@bStampa registri" + PROMPT 1 14 "@bStampa registri" END BOOLEAN CHK_STIREG BEGIN - PROMPT 3 14 "Stampare l'intestazione sui registri bollati" + PROMPT 3 15 "Stampare l'intestazione sui registri bollati" HELP "Indicare se stampare l'intestazione della ditta sui registri" FIELD StiReg END BOOLEAN CHK_NODTRG BEGIN - PROMPT 3 15 "Non stampare la data di operazione" + PROMPT 3 16 "Non stampare la data di operazione" HELP "Indicare se non stampare la data dell'operazione sui registri IVA" FIELD NoDtRg END BOOLEAN CHK_NOIDRG BEGIN - PROMPT 3 16 "Non stampare il prospetto IVA differita o per cassa" + PROMPT 3 17 "Non stampare il prospetto IVA differita o per cassa" HELP "Indicare se non stampare il prospetto dell'IVA differita o per cassa" FIELD NoIdRg END diff --git a/src/cg/cg5200.h b/src/cg/cg5200.h index 764e6a4eb..404e93e54 100755 --- a/src/cg/cg5200.h +++ b/src/cg/cg5200.h @@ -1,12 +1,12 @@ -#define F_ANNO 101 -#define F_TIPOCF 102 -#define F_GRUPPO 103 -#define F_CONTO 104 -#define F_SOTTOCONTO 105 -#define F_SOTTOC_CLIENTE 106 -#define F_SOTTOC_FORN 107 -#define F_DESCR_CONTO 108 -#define F_DESCR_CLIENTE 109 -#define F_DESCR_FORN 110 -#define F_SHEET_SALDI 111 -#define F_SCARICATO 112 +#define F_ANNO 201 +#define F_TIPOCF 202 +#define F_GRUPPO 203 +#define F_CONTO 204 +#define F_SOTTOCONTO 205 +#define F_SOTTOC_CLIENTE 206 +#define F_SOTTOC_FORN 207 +#define F_DESCR_CONTO 208 +#define F_DESCR_CLIENTE 209 +#define F_DESCR_FORN 210 +#define F_SHEET_SALDI 211 +#define F_SCARICATO 212 diff --git a/src/cg/cg5300a.uml b/src/cg/cg5300a.uml index f922d23d3..66d4ec941 100755 --- a/src/cg/cg5300a.uml +++ b/src/cg/cg5300a.uml @@ -103,6 +103,12 @@ BEGIN FIELD B4 END +BOOLEAN F_PRORATAC +BEGIN + PROMPT 47 6 "Calcolo Pro rata" + FIELD B7 +END + BOOLEAN F_GESIC BEGIN PROMPT 4 7 "Gestione IVA per cassa" @@ -151,12 +157,6 @@ BEGIN FIELD B6 END -BOOLEAN F_PRORATAC -BEGIN - PROMPT 50 9 "Calcolo Pro rata" - FIELD B7 -END - GROUPBOX DLG_NULL 78 6 BEGIN PROMPT 1 11 "@bCredito" diff --git a/src/cg/cglib02.cpp b/src/cg/cglib02.cpp index 97077f6ba..7f4698da6 100755 --- a/src/cg/cglib02.cpp +++ b/src/cg/cglib02.cpp @@ -872,7 +872,7 @@ void TTab_conti::aggiorna_conto(const TBill& tcon, /////////////////////////////////////////////////////////// TSaldo_agg::TSaldo_agg() : _anno_es(0), _data_ulmov(""), _num_ulmov(0l), - _movap(normale), _provv(false), _movimentato(false) + _movap(normale), _provv(' '), _movimentato(false) {} void TSaldo_agg::aggiorna(const TBill& tc, const TImporto& imp, bool somma, bool scaricato)