From d4a9c624d971c8ccc2a210e58f063207f22a2907 Mon Sep 17 00:00:00 2001 From: luca Date: Wed, 10 May 2006 16:41:42 +0000 Subject: [PATCH] Patch level :4.0 411 Files correlati : Ricompilazione Demo : [ ] Commento :riportata modifica dalla 2.1 per la generazione dei files dai nuovi tracciati git-svn-id: svn://10.65.10.50/trunk@13980 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/ba1100.cpp | 113 +++++++++++++++++++++++++------------------------- 1 file changed, 56 insertions(+), 57 deletions(-) diff --git a/ba/ba1100.cpp b/ba/ba1100.cpp index 0230486c5..0629305f4 100755 --- a/ba/ba1100.cpp +++ b/ba/ba1100.cpp @@ -53,7 +53,7 @@ protected: void edit_riga(long, TToken_string&); void edit_riga(const TString&); void delete_riga(); - virtual bool extended_firm() const { return TRUE; } + virtual bool extended_firm() const { return true; } bool recover(TSystemisamfile& f, int err); void update(); @@ -100,7 +100,7 @@ HIDDEN bool browse_file_handler(TMask_field& f, KEY k) f.set_focus(); } - return TRUE; + return true; } TManutenzione_app::TManutenzione_app() : _browse(NULL), _mask(NULL), _firm(0), _level(0), _rec(NULL) @@ -274,7 +274,7 @@ void TManutenzione_app::print() d.get(LF_DIR); int items = (int)d.eod(); TProgind *pi; - pi = new TProgind(items, TR("Stampa tracciati record archivi"), TRUE, TRUE); + pi = new TProgind(items, TR("Stampa tracciati record archivi"), true, true); pi->setstatus(2); @@ -296,7 +296,7 @@ void TManutenzione_app::print() TString_array list; items = list_files("recdesc/d???.des", list); - pi = new TProgind(items,TR("Stampa descrizione tabelle"), TRUE, TRUE); + pi = new TProgind(items,TR("Stampa descrizione tabelle"), true, true); TString16 tab; for (i = 0; !pi->iscancelled() && i < items; i++) @@ -333,39 +333,39 @@ bool TManutenzione_app::create() // initvar e arrmask if (argc() > 2 && sw == "-C") { update(); - return FALSE; + return false; } else { if (sw == "-D") { const int c = argc(); - bool des_too = TRUE; // Anche le descrizioni + bool des_too = true; // Anche le descrizioni long modules = -1; // Tutti i moduli if (c < 4) { error_box("Usage: BA1 -0 -D [0|1] []"); - return FALSE; + return false; } TFilename dir(argv(3)); if (!fexist(dir)) { error_box(FR("Non esiste il direttorio %s"), (const char*)dir); - return FALSE; + return false; } if (c == 5) - des_too = atoi(argv(4)) ? TRUE : FALSE; + des_too = atoi(argv(4)) ? true : false; if (c == 6) modules = atol(argv(5)); prefix().set(""); load_des(); dump_trc(dir,des_too,modules); - return FALSE; + return false; } #ifndef _DEMO_ else if (!set_firm()) - return FALSE; + return false; #endif load_des(); @@ -527,7 +527,7 @@ void TManutenzione_app::dump_trc(const char * dir, const bool des_too, const lon TString s(TR("Scarico dei tracciati standard in ")); s << dir; - TProgind p(items ? items : 1, s, FALSE, TRUE); + TProgind p(items ? items : 1, s, false, true); p.setstatus(1); for (int i=2;i<=items;i++) //Salta il primo (dir.gen) { @@ -734,10 +734,10 @@ void TManutenzione_app::edit_riga (long riga_sel, TToken_string& riga) { TToken_string filter; filter.add("COD"); filter.add(tabella); - f.dump(nout, keyno, fs, fd, rs, TRUE, withdel, filter); + f.dump(nout, keyno, fs, fd, rs, true, withdel, filter); } else - f.dump(nout, keyno, fs, fd, rs, TRUE, withdel); + f.dump(nout, keyno, fs, fd, rs, true, withdel); } } } @@ -871,7 +871,7 @@ void TManutenzione_app::update_dir() prompt << atol(pref) <<"."; } - TProgind p(update_items ? update_items : 1, prompt, FALSE, TRUE); + TProgind p(update_items ? update_items : 1, prompt, false, true); p.setstatus(1); int i; @@ -879,20 +879,16 @@ void TManutenzione_app::update_dir() for (i = 2; i <= update_items; i++) { p.addstatus(1); -// prefix().set(""); + const TDir & ds = (const TDir &) _dirs[i]; const bool is_firm = ds.is_firm(); const bool to_create = (is_com ? ds.is_com() : ds.is_firm()); - -// TString s(ds.name()); TFilename fd(ds.filename()); - bool towrite = FALSE; + bool towrite = false; const long flags = ds.flags(); -// word len = ds.len(); -// prefix().set(pref); d.get(i, _nolock, _nordir, _sysdirop); const bool old_is_firm = d.is_firm(); d.get(i); @@ -948,7 +944,7 @@ void TManutenzione_app::update_dir() if (flags < 10000L && size > 0L && d.len() > 0) { TSystemisamfile b(i); - int err = b.is_valid(TRUE); + int err = b.is_valid(true); if (err == _istrcerr && d.eod() == 0 && yesno_box(FR("Il tracciato record del file %d e' incoerente:\nSi desidera eliminare il file vuoto %s?"), i, d.filename())) { @@ -995,10 +991,10 @@ void TManutenzione_app::update_dir() } d.get(i, _nolock, _nordir, _sysdirop); - bool cmn_file = FALSE; + bool cmn_file = false; bool valid_file = moveable_file(i); if (!is_com && valid_file && d.is_com()) - cmn_file = TRUE; // Salta in questo caso: + cmn_file = true; // Salta in questo caso: // sto aggiornando le ditte, // il file in questione e' uno di quelli che possono essere comuni // il file e' in comune @@ -1010,7 +1006,7 @@ void TManutenzione_app::update_dir() { if (flags < 10000L && flags > -1L && fexist(fs) && (fd != fs)) { - bool ok = TRUE; + bool ok = true; TFilename path(fd.path()); path.rtrim(1); @@ -1037,7 +1033,7 @@ void TManutenzione_app::update_dir() fdi.ext(fsi.ext()); td.add(fdi); if (!fcopy(fsi, fdi)) - ok = FALSE; + ok = false; } if (ok) { @@ -1075,18 +1071,18 @@ void TManutenzione_app::update_dir() } } else - ok = FALSE; + ok = false; if (ok) { d.set(ds.name(), d.eox(), 0L, ds.des(), d.expr()); - towrite = TRUE; + towrite = true; } } if (!fexist(fs) && !valid_file) // Controlla eventali nomi di files non validi (ed es. %.dbf ecc.) { d.set(ds.name(), d.eox(), 0L, ds.des(), d.expr()); - towrite = TRUE; + towrite = true; } } else @@ -1103,7 +1099,7 @@ void TManutenzione_app::update_dir() TString name(d.name()); name[0] = '%'; d.set_name(name); - towrite = TRUE; + towrite = true; } if (towrite) d.put(i, _nordir, _sysdirop); @@ -1116,11 +1112,12 @@ void TManutenzione_app::update_dir() TDir d1((TDir &) _dirs[i]); d1.set_len(0); - d1.eox() = 0; + d1.eox() = 0L; + d1.eod() = 0L; d1.flags() = 0L; d1.put(i, _nordir, _sysdirop); } -// prefix().set(pref); + d.get(LF_DIR, _nolock, _nordir, _sysdirop); d.eod() = orig_items; if (d.eox() < d.eod()) @@ -1152,7 +1149,7 @@ void TManutenzione_app::convert_dir() s << atol (pref) << "."; } - TProgind p(update_items ? update_items : 1, s, FALSE, TRUE); + TProgind p(update_items ? update_items : 1, s, false, true); p.setstatus(1); for (int i = 2; i <= update_items; i++) @@ -1169,8 +1166,9 @@ void TManutenzione_app::convert_dir() { TSystemisamfile b(i); const int module = abs((int)ds.flags()); - int err = b.is_valid(TRUE); - if (err == -60 || err == -64) err=NOERR; // verif. + int err = b.is_valid(true); + if (err == -60 || err == -64) + err=NOERR; // verif. d.get(i, _nolock, _nordir, _sysdirop); if (i > 2 && err != NOERR && ((is_com && d.is_com()) || (!is_com && d.is_firm()))) { @@ -1187,32 +1185,32 @@ void TManutenzione_app::convert_dir() else continue; } - } + } //if (i > 2 && err != NOERR &&... bool to_create = (is_com ? d.is_com() : d.is_firm()); // I files LF_PCON, LF_CAUS, LF_RCAUS, LF_CLIFO, LF_CFVEN, LF_INDSPED // vanno creati comunque nel direttorio COM, vuoti, (se non esistono gia'). - if (is_com && !to_create) - if (moveable_file(i)) - to_create = TRUE; + if (is_com && !to_create && moveable_file(i)) + to_create = true; if (to_create && has_module(module, CHK_DONGLE)) { - d.get(i); - const TFilename s(d.filename()); - if (!s.exist() && d.len() > 0) + TDir df; df.get(i); + const TFilename s(df.filename()); + + //crea il nuovo file in base al tracciato record nuovo! + if (!s.exist() && ds.len() > 0) { TSystemisamfile f(i); - set_autoload_new_files(FALSE); + set_autoload_new_files(false); f.build(0L,rs); - set_autoload_new_files(TRUE); + set_autoload_new_files(true); // Anche se il file non esisteva, prosegue, perche' possono esserci conversioni // specificate in FCONV.INI } } - TSystemisamfile f(i); f.update(rs, false); @@ -1228,8 +1226,8 @@ void TManutenzione_app::convert_dir() } } stop_run(); - } - } + } //if(f.status()... + } //if (flags >= 0L && < 10000L... else // altrimenti se i flags sono oltre i fatidici 10000... { TTrec r(rs); @@ -1238,8 +1236,9 @@ void TManutenzione_app::convert_dir() d.set_len(r.len()); d.put(i, _nordir, _sysdirop); r.put(i); - } - } + } //else di if(flags>=... + + } //if (ds.len() > 0... (la dimensione del tracciato e' > 0) else // altrimenti se la dimensione del tracciato e' zero... { TTrec r(rs); @@ -1249,8 +1248,8 @@ void TManutenzione_app::convert_dir() d.set_len(r.len()); d.put(i, _nordir, _sysdirop); r.put(i); - } - } + } //else di if(ds.len()>0... + } //for (int i = 2; i <= update_items... d.get(LF_DIR, _nolock, _nordir, _sysdirop); d.flags() = _level; @@ -1345,7 +1344,7 @@ void TManutenzione_app::load_des(const int maxfdir) if (prefix().is_com()) s << TR("Caricamento descrizioni archivi comuni"); else s << TR("Caricamento descrizioni archivi della ditta ") << atol (pref); - TProgind p(items ? items : 1, s, FALSE, TRUE); + TProgind p(items ? items : 1, s, false, true); p.setstatus(1); for (int i = 2; i <= items; i++) @@ -1393,7 +1392,7 @@ void TManutenzione_app::load_des(const int maxfdir) void TManutenzione_app::update() { - bool ok = TRUE; + bool ok = true; TIsamfile utenti(LF_USER); utenti.open(_excllock); @@ -1467,7 +1466,7 @@ void TManutenzione_app::update() s = TR("Conversione archivi ditte."); - TProgind p(ditte.items() ? ditte.items() : 1, s, FALSE, TRUE); + TProgind p(ditte.items() ? ditte.items() : 1, s, false, true); p.setstatus(1); TString mxs; @@ -1503,7 +1502,7 @@ void TManutenzione_app::update() else prefix().set(pref); load_des(); - ok = FALSE; + ok = false; while (!ok) { utenti.open(_excllock); @@ -1526,7 +1525,7 @@ void TManutenzione_app::main_loop() { TToken_string riga; long riga_selezionata; - bool done = FALSE; + bool done = false; _browse->rebuild(); @@ -1563,7 +1562,7 @@ void TManutenzione_app::main_loop() case K_DEL: delete_riga(); break; case K_QUIT: - case K_ESC: done = TRUE; close_history(); break; + case K_ESC: done = true; close_history(); break; case K_F7: update(); break;