diff --git a/ba/ba1500.cpp b/ba/ba1500.cpp index 68112cf65..1a443de81 100755 --- a/ba/ba1500.cpp +++ b/ba/ba1500.cpp @@ -20,7 +20,7 @@ TInformazione_moduli::TInformazione_moduli() : _unassigned_modules(0) { const TDongle& d = dongle(); - for (word mod = CTAUT; mod < ENDAUT; mod++) + for (word mod = BAAUT+1; mod < ENDAUT; mod++) { TToken_string t = d.module_code2desc(mod); if (t.len() > 2 && !t.starts_with("Modulo vario", true)) // Scarta moduli ignoti diff --git a/ba/ba2800.cpp b/ba/ba2800.cpp index b1ae2179e..6d4a5a51d 100644 --- a/ba/ba2800.cpp +++ b/ba/ba2800.cpp @@ -689,7 +689,8 @@ void Tdninst_mask::merge_sheet() int changed = 0; FOR_EACH_SHEET_ROW(sheet, r, row) { - const int key = row->get_int(_c_key); + const int key = row->get_int(_c_key); + c1 = row->get(_c_owner); c2 = row->get(_c_dbowner); c3 = row->get(_c_xmlowner); @@ -711,8 +712,8 @@ void Tdninst_mask::merge_sheet() row->add(c1, _c_owner); changed++; - msg = TR("Inserito cliente "); - msg << c1; + msg.cut(0) << key << " : "; + msg << TR("Inserito cliente ") << c1; log.log(0, msg); } } @@ -727,8 +728,8 @@ void Tdninst_mask::merge_sheet() row->add(o2, _c_oem); changed++; - msg = TR("Aggiornato agente del cliente "); - msg << c1; + msg.cut(0) << key << " : "; + msg << TR("Aggiornato agente del cliente ") << c1; log.log(0, msg); } } @@ -741,8 +742,9 @@ void Tdninst_mask::merge_sheet() if (xvt_str_fuzzy_compare_ignoring_case(c1, c2) < 0.7) { - msg = TR("Aggiornata ragione sociale da '"); - msg << c1 << "' a '" << c2 << "'"; + msg.cut(0) << key << " : "; + msg << TR("Aggiornata ragione sociale da '") + << c1 << "' a '" << c2 << "'"; log.log(0, msg); } } @@ -754,8 +756,9 @@ void Tdninst_mask::merge_sheet() { row->add(d2, _c_suspend); changed++; - msg = TR("Sospensione del cliente "); - msg << c1 << TR(" dal ") << d2; + msg.cut(0) << key << " : "; + msg << TR("Sospensione del cliente ") + << c1 << TR(" dal ") << d2; log.log(1, msg); } @@ -765,8 +768,9 @@ void Tdninst_mask::merge_sheet() { row->add(d2, _c_killed); changed++; - msg = TR("Disattivazione del cliente "); - msg << c1 << TR(" dal ") << d2; + msg.cut(0) << key << " : "; + msg << TR("Disattivazione del cliente ") + << c1 << TR(" dal ") << d2; log.log(2, msg); } } @@ -915,29 +919,8 @@ bool Tdninst_mask::on_field_event(TOperable_field& o, TField_event e, long jolly } break; case DLG_ELABORA: - if (e == fe_button) - { - TMask q(TR("Elaborazione"), 1, 50, 10); - TToken_string options = TR("Aggiornare il DNINST in base al DB|Aggiornare il DB in base al DNINST"); - q.add_radio(101, 0, TR("Operazione di aggiornamento"), 1, 1, 48, "0|1", options); - q.add_button(DLG_OK, 0, "", -12, -1, 10, 2); - q.add_button(DLG_CANCEL, 0, "", -22, -1, 10, 2); - if (q.run() == K_ENTER) - { - const int i = q.get_int(101); - if (yesno_box(options.get(i))) - { - switch (i) - { - case 1: - break; - default: - merge_sheet(); - break; - } - } - } - } + if (e == fe_button && yesno_box(TR("Aggiornare il DNINST in base al DB"))) + merge_sheet(); break; case DLG_SAVEREC: if (e == fe_button) diff --git a/ba/batbiva.h b/ba/batbiva.h index 9b316ccb8..c083a73ea 100755 --- a/ba/batbiva.h +++ b/ba/batbiva.h @@ -21,3 +21,4 @@ #define FLD_TABIVA_I1 122 #define FLD_DETRAZIONE 123 #define CHK_SERVIZI 124 +#define FLD_DESCR_I1 125 diff --git a/ba/batbiva.uml b/ba/batbiva.uml index 19046d6dd..1e03528f5 100755 --- a/ba/batbiva.uml +++ b/ba/batbiva.uml @@ -103,15 +103,41 @@ BEGIN HELP "Inserire la percentuale teorica dell'imposta" END +NUMBER FLD_TABIVA_I1 4 +BEGIN + PROMPT 2 4 "Tipo CEE " + FIELD I1 + FLAGS "UZ" + USE %TIC + INPUT CODTAB FLD_TABIVA_I1 + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + DISPLAY "Sospeso@C" B2 + OUTPUT FLD_TABIVA_I1 CODTAB + OUTPUT FLD_DESCR_I1 S0 + CHECKTYPE NORMAL +END + +STRING FLD_DESCR_I1 50 +BEGIN + PROMPT 26 4 "" + USE %TIC KEY 2 + INPUT S0 FLD_DESCR_I1 + DISPLAY "Descrizione@50" S0 + DISPLAY "Codice" CODTAB + DISPLAY "Sospeso@C" B2 + COPY OUTPUT FLD_TABIVA_I1 + CHECKTYPE NORMAL +END GROUPBOX DLG_NULL 78 4 BEGIN - PROMPT 1 5 "@bComunicazione operazioni rilevanti ai fini dell'IVA" + PROMPT 1 6 "@bComunicazione operazioni rilevanti ai fini dell'IVA (Spesometro)" END LIST FLD_TABIVA_S7 1 35 BEGIN - PROMPT 2 6 "Cessioni " + PROMPT 2 7 "Cessioni " FIELD S7 ITEM " |Non rilevante" ITEM "1|1 - Imponibile" @@ -123,7 +149,7 @@ END LIST FLD_TABIVA_S8 1 35 BEGIN - PROMPT 2 7 "Acquisti " + PROMPT 2 8 "Acquisti " FIELD S8 ITEM " |Non rilevante" ITEM "1|1 - Imponibile" @@ -133,17 +159,6 @@ BEGIN ITEM "5|5 - Imponibile con IVA a Margine" END -/* Reso obsoleto da ultime specifiche Spesometro di Settembre 2011 -RADIOBUTTON CHK_SERVIZI 20 -BEGIN - PROMPT 59 6 "Cessione / Acquisto" - ITEM " |Beni" - ITEM "X|Servizi" - FLAGS "Z" - FIELD B5 -END -*/ - STRING FLD_TABIVA_I3 3 BEGIN PROMPT 3 10 "Riga vendite IVA11 per op.esenti e non imp. " diff --git a/ba/batbtic.uml b/ba/batbtic.uml new file mode 100644 index 000000000..3569ed602 --- /dev/null +++ b/ba/batbtic.uml @@ -0,0 +1,49 @@ +#include "batbiva.h" + +TOOLBAR "topbar" 0 0 0 2 +#include +ENDPAGE + +PAGE "Tipo IVA CEE" -1 -1 78 19 + +NUMBER FLD_TABIVA_CODTAB 4 +BEGIN + PROMPT 1 1 "Codice " + KEY 1 + USE %TIC + FLAGS "UZ" + INPUT CODTAB FLD_TABIVA_CODTAB + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + DISPLAY "Sospeso@C" B2 + OUTPUT FLD_TABIVA_CODTAB CODTAB + OUTPUT FLD_TABIVA_S0 S0 + CHECKTYPE REQUIRED + FIELD CODTAB +END + +STRING FLD_TABIVA_S0 50 +BEGIN + PROMPT 1 2 "Descrizione " + FIELD S0 + KEY 2 + USE %TIC KEY 2 + INPUT S0 102 + DISPLAY "Descrizione@50" S0 + DISPLAY "Codice" CODTAB + DISPLAY "Sospeso@C" B2 + COPY OUTPUT FLD_TABIVA_CODTAB + CHECKTYPE REQUIRED +END + +BOOLEAN FLD_SOSPESO_B2 +BEGIN + PROMPT 1 -2 "Codice sospeso non pił utilizzabile" + FIELD B2 +END + + +ENDPAGE + +ENDMASK +