From 032b6b4f387215feb988162155832ce81b6cb2bc Mon Sep 17 00:00:00 2001 From: angelo Date: Fri, 10 May 1996 14:00:35 +0000 Subject: [PATCH] Aggiunta creazione tabella %VER se non esiste il record base (MI3389). git-svn-id: svn://10.65.10.50/trunk@2792 c028cbd2-c16b-5b4b-a496-9718f37d4682 --- ba/ba3100.cpp | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) diff --git a/ba/ba3100.cpp b/ba/ba3100.cpp index 9044eb802..f5fd70a49 100755 --- a/ba/ba3100.cpp +++ b/ba/ba3100.cpp @@ -47,8 +47,18 @@ HIDDEN inline TGeneric_table_app& app() { return (TGeneric_table_app&) main_app( // - tabella versamenti-specific ------------------------------- void TGeneric_table_app::load_rec_in_disabled_fields(TMask& m) // carica il record del periodo precedente a quello immesso -// nei campi disabilitati relativi +// nei campi disabilitati relativi. Se non esiste la tabella %VER, la crea. { + _ver->put("CODTAB","199301"); + if (_ver->read() != NOERR) // Se %VER non esiste la crea + { + _ver.put("R0","1.5"); _ver.put("R1","1.5"); + _ver.put("R2","1.5"); _ver.put("R3","1.5"); ver.put("R4","1.5"); + _ver.put("R5","50500"); _ver.put("R7","200000"); + _ver.put("R11","88"); _ver.put("R12","88"); + if (_ver.write() != NOERR) error_box("Errore %d in scrittura sulla tabella %VER",_ver->status()); + } + TString key(m.get(F_ANNOES)); key << m.get(F_MESEES);