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
This commit is contained in:
angelo 1996-05-10 14:00:35 +00:00
parent 30eadf726c
commit 032b6b4f38

View File

@ -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);