diff --git a/ba/bacnv.cpp b/ba/bacnv.cpp index 9ca7aad58..a25b28bf1 100755 --- a/ba/bacnv.cpp +++ b/ba/bacnv.cpp @@ -26,7 +26,7 @@ #include "..\cg\cglib02.h" -#define usage "Errore - uso : bacnv [1|2|3|4|5|6|7|8|9|10|11|12|13|14|15] ditta" +#define usage "Errore - uso : bacnv [1|2|3|4|5|6|7|8|9|10|11|12|13|14|15|16] ditta" /////////////////////////////////////////////////////////////////////////////////////////////////////// // Applicazione di conversione archivi XBase, valida per tutti e 4 i tipi di DLL @@ -323,7 +323,7 @@ bool TConversione_archivi::menu(MENU_TAG) convert_ucc(); } break; - case 15: + case 16: if (_codditta == 0) convert_uue(); convert_cap(); @@ -1429,16 +1429,21 @@ void TConversione_archivi::convert_uue() const { TProgind pi(0, "Caricamento tabella Uffici Unici", FALSE, FALSE); TSystemisamfile uue(LF_TABCOM); - uue.load("bacnv15a.txt"); + TFilename lf; + + lf.format("%sstd/bacnv16a.txt", __ptprf); + uue.load(lf); pi.set_text("Caricamento Uffici Unici nei comuni"); TLocalisamfile comuni(LF_COMUNI); - TScanner scan15b("bacnv15b.txt"); + + lf.format("%sstd/bacnv16b.txt", __ptprf); + TScanner scan16b(lf); TToken_string line; TString16 cod, uff; - for (line = scan15b.line(); line.not_empty(); line = scan15b.line()) + for (line = scan16b.line(); line.not_empty(); line = scan16b.line()) { cod = line.get(0); comuni.put("COM", cod); @@ -1471,22 +1476,25 @@ void TConversione_archivi::convert_uue() const error_box("Impossibile aggiornare l'ufficio unico del comune %s: errore %d", (const char*)cod, err); } - scan15b.close(); + scan16b.close(); } // Effettua conversioni per nuovi cap void TConversione_archivi::convert_cap() const { TLocalisamfile comuni(LF_COMUNI); + TFilename lf; + + lf.format("%sstd/bacnv16c.txt", __ptprf); - TScanner scan15c("bacnv15c.txt"); + TScanner scan16c(lf); TToken_string line; TString16 cod, oldcod, newcod; TAssoc_array cap; TProgind pi(0, "Aggiornamento CAP sui comuni", FALSE, FALSE); - for (line = scan15c.line(); line.not_empty(); line = scan15c.line()) + for (line = scan16c.line(); line.not_empty(); line = scan16c.line()) { cod = line.get(0); oldcod = line.get(); @@ -1507,14 +1515,19 @@ void TConversione_archivi::convert_cap() const (const char*)cod, err); } } - scan15c.close(); + scan16c.close(); TString msg; - TScanner scan15d("bacnv15d.txt"); - for (line = scan15d.line(); line.not_empty(); line = scan15d.line()) + lf.format("%sstd/bacnv16d.txt", __ptprf); + TScanner scan16d(lf); + for (line = scan16d.line(); line.not_empty(); line = scan16d.line()) { TString16 cod = line.get(0); const int logicnum = atoi(cod); + if (_codditta == 0L && logicnum == LF_OCCAS) // Il file degli occasionali non puo' essere comune + continue; + if (_codditta > 0L && logicnum <= LF_UNLOC) // Una volta iniziata la conversione ditte si possono saltare i files comuni + continue; TLocalisamfile* file = NULL; if (logicnum > 0) file = new TLocalisamfile(logicnum); @@ -1554,7 +1567,7 @@ void TConversione_archivi::convert_cap() const delete file; } } - scan15d.close(); + scan16d.close(); } @@ -1566,7 +1579,7 @@ int main(int argc,char** argv) { const int r = (argc > 1) ? abs(atoi(argv[1])) : 0; - if (r < 0 || r > 15) + if (r < 0 || r > 16) { error_box(usage); return 100; diff --git a/ba/bacnv15a.txt b/ba/bacnv16a.txt similarity index 100% rename from ba/bacnv15a.txt rename to ba/bacnv16a.txt diff --git a/ba/bacnv15b.txt b/ba/bacnv16b.txt similarity index 100% rename from ba/bacnv15b.txt rename to ba/bacnv16b.txt diff --git a/ba/bacnv15c.txt b/ba/bacnv16c.txt similarity index 100% rename from ba/bacnv15c.txt rename to ba/bacnv16c.txt diff --git a/ba/bacnv15d.txt b/ba/bacnv16d.txt similarity index 100% rename from ba/bacnv15d.txt rename to ba/bacnv16d.txt diff --git a/ba/baprassi.men b/ba/baprassi.men index 92baaf0dc..5f234d286 100755 --- a/ba/baprassi.men +++ b/ba/baprassi.men @@ -76,7 +76,8 @@ Item_03 = "Uffici concessioni", "ba3 -0 %ucc", "" Item_04 = "Uffici imposte dirette", "ba3 -0 %uid", "" Item_05 = "Uffici IVA", "ba3 -0 %uiv", "" Item_06 = "Uffici registro", "ba3 -0 %ure", "" -Item_07 = "Centri servizio", "ba3 -0 %ucs", "" +Item_07 = "Uffici unici entrate", "ba3 -0 %uue", "" +Item_08 = "Centri servizio", "ba3 -0 %ucs", "" [PRASSI_012] Caption = "Stampa tabelle ministeriali" @@ -88,7 +89,8 @@ Item_02 = "Uffici concessioni", "ba3 -1 %ucc", "" Item_03 = "Uffici imposte dirette", "ba3 -1 %uid", "" Item_04 = "Uffici IVA", "ba3 -1 %uiv", "" Item_05 = "Uffici registro", "ba3 -1 %ure", "" -Item_06 = "Centri servizio", "ba3 -1 %ucs", "" +Item_06 = "Uffici unici entrate", "ba3 -1 %uue", "" +Item_07 = "Centri servizio", "ba3 -1 %ucs", "" [PRASSI_015] Caption = "Manutenzione" diff --git a/ba/bastuue.uml b/ba/bastuue.uml index 8276e1bdc..57c052e13 100755 --- a/ba/bastuue.uml +++ b/ba/bastuue.uml @@ -1,6 +1,6 @@ #include "ba3200.h" -PAGE "Stampa uffici concessione" -1 -1 50 8 +PAGE "Stampa uffici unici entrate" -1 -1 50 8 NUMBER F_INIZIO1 3 BEGIN diff --git a/ba/fconv.ini b/ba/fconv.ini index 972170032..c7d56c488 100755 --- a/ba/fconv.ini +++ b/ba/fconv.ini @@ -33,5 +33,7 @@ BCNV(70)=77cnv 5 ACNV(100)=77cnv 4 ACNV(118)=77cnv 6 ACNV(119)=77cnv 1 +[199516] +ACNV(13)=bacnv 16 [EOF] diff --git a/ba/level.dir b/ba/level.dir index 5360568e7..7ce2f2b8f 100755 --- a/ba/level.dir +++ b/ba/level.dir @@ -1 +1 @@ -199515 +199516