Corretta la creazione della tabella %VER in caso sia inesistente
git-svn-id: svn://10.65.10.50/trunk@2793 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
032b6b4f38
commit
04a7d62b6e
@ -47,18 +47,8 @@ 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. Se non esiste la tabella %VER, la crea.
|
||||
// nei campi disabilitati relativi.
|
||||
{
|
||||
_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);
|
||||
@ -433,7 +423,19 @@ bool TGeneric_table_app::user_create()
|
||||
if (name == "CAM")
|
||||
set_search_field(FLD_TABCAM_D0);
|
||||
if (name == Versamenti_table)
|
||||
{
|
||||
_ver = new TTable(Versamenti_table);
|
||||
_ver->put("CODTAB","199301");
|
||||
if (_ver->read() != NOERR) // Se %VER non esiste la crea
|
||||
{
|
||||
_ver->put("CODTAB","199301");
|
||||
_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());
|
||||
}
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user