root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corretto passaggio da fisiche a giuridiche tramite bottone.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@248 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-09-15 16:42:31 +00:00
parent 3d2dbf1fe6
commit 113424a344
2 changed files with 308 additions and 307 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
ba/ba4200.cpp
View File

@ -23,6 +23,7 @@ class BA4200_application : public TRelation_application
TLocalisamfile* _comuni; TLocalisamfile* _comuni;
TLocalisamfile* _tabcom; TLocalisamfile* _tabcom;
protected:
virtual bool user_create() ; virtual bool user_create() ;
virtual bool user_destroy() ; virtual bool user_destroy() ;
virtual int read(TMask& m); virtual int read(TMask& m);
@ -35,6 +36,8 @@ class BA4200_application : public TRelation_application
virtual TMask* get_mask(int mode) ; virtual TMask* get_mask(int mode) ;
virtual void write_enable(const bool on = TRUE); virtual void write_enable(const bool on = TRUE);
static bool ba4200_handler(TMask& m, KEY k);
public: public:
virtual int write(const TMask& m); virtual int write(const TMask& m);
virtual TRelation* get_relation() const { return _rel[tip_msk()];} virtual TRelation* get_relation() const { return _rel[tip_msk()];}
@ -52,15 +55,14 @@ public:
virtual ~BA4200_application() {} virtual ~BA4200_application() {}
}; };
bool ba4200_handler(TMask& m, KEY k) bool BA4200_application::ba4200_handler(TMask& m, KEY k)
{ {
BA4200_application* app = (BA4200_application*) MainApp(); BA4200_application& app = (BA4200_application&)main_app();
if (k == K_F10) if (k == K_F10)
{ {
if (app->ana_fis()) app->set_tip_ana(TGIU); if (app.ana_fis()) app.set_tip_ana(TGIU);
else app->set_tip_ana(TFIS); else app.set_tip_ana(TFIS);
m.stop_run(K_ESC); m.stop_run(K_ESC);
return FALSE; return FALSE;
} }
@ -68,29 +70,29 @@ bool ba4200_handler(TMask& m, KEY k)
TToken_string body(16); TToken_string body(16);
body.add(format("%d", FLD_GD1_CODDITTAH)); body.add(format("%d", FLD_GD1_CODDITTAH));
if ( app->tip_ana() == TFIS ) if ( app.tip_ana() == TFIS )
{ {
body.add(format("%d=F", FLD_GD1_TIPOA)); body.add(format("%d=F", FLD_GD1_TIPOA));
body.add(format("%d=%s", FLD_GD1_CODANAGR, (const char*) app->cod_ana())); body.add(format("%d=%s", FLD_GD1_CODANAGR, (const char*) app.cod_ana()));
} }
else else
{ {
body.add(format("%d=G", FLD_GD1_TIPOA)); body.add(format("%d=G", FLD_GD1_TIPOA));
body.add(format("%d=%s", FLD_GD1_CODANAGR, (const char*) app->cod_ana())); body.add(format("%d=%s", FLD_GD1_CODANAGR, (const char*) app.cod_ana()));
} }
#if XVT_OS == XVT_OS_WIN #if XVT_OS == XVT_OS_WIN
TString cmd("ba4b -2"); TString16 cmd("ba4b -2");
#else #else
TString cmd("ba4 -2"); TString16 cmd("ba4 -2");
#endif #endif
TMessage msg(cmd2name(cmd), MSG_FS, (const char*) body); TMessage msg(cmd2name(cmd), MSG_FS, (const char*) body);
TMailbox mb; TMailbox mb;
mb.send(msg); mb.send(msg);
TLocalisamfile* d = app->get_relation()->lfile(); TLocalisamfile* d = app.get_relation()->lfile();
d->setkey(1); d->setkey(1);
d->zero(); d->zero();
d->put(N_TIPOA, app->ana_fis() ? "F" : "G"); d->put(N_TIPOA, app.ana_fis() ? "F" : "G");
d->put(N_CODANAGR, m.get(FLD_CODANAGR)); d->put(N_CODANAGR, m.get(FLD_CODANAGR));
d->read(_isequal, _unlock) ; d->read(_isequal, _unlock) ;
TExternal_app a(cmd); TExternal_app a(cmd);

589
ba/ba4300.cpp
View File

@ -7,7 +7,6 @@
#include <files.h> #include <files.h>
#if XVT_OS == XVT_OS_SCOUNIX #if XVT_OS == XVT_OS_SCOUNIX
// extern "C" int mkdir(char*, int);
#include <sys/stat.h> #include <sys/stat.h>
#else #else
#include <direct.h> #include <direct.h>
@ -52,219 +51,219 @@ const char* COMTRIB = "COMTRIB";
#define TABATT "%ais" #define TABATT "%ais"
#define CODTAB "CODTAB" #define CODTAB "CODTAB"
#define S0 "S0" #define S0 "S0"
#define DESCR "DESCR" #define DESCR "DESCR"
class BA4300_application : public TRelation_application class BA4300_application : public TRelation_application
{ {
TMask* _msk; TMask* _msk;
TRelation *_rel; TRelation *_rel;
TLocalisamfile* _anag; TLocalisamfile* _anag;
TLocalisamfile* _unloc; TLocalisamfile* _unloc;
TLocalisamfile* _attiv; TLocalisamfile* _attiv;
TLocalisamfile* _tabcom; TLocalisamfile* _tabcom;
protected: protected:
bool user_create() ; bool user_create() ;
bool user_destroy() ; bool user_destroy() ;
virtual TMask* get_mask(int) { return _msk;} virtual TMask* get_mask(int) { return _msk;}
virtual bool changing_mask(int) { return FALSE;} virtual bool changing_mask(int) { return FALSE;}
virtual void init_query_mode(TMask& m) ; virtual void init_query_mode(TMask& m) ;
virtual void init_insert_mode(TMask& m) ; virtual void init_insert_mode(TMask& m) ;
virtual void init_modify_mode(TMask& m) ; virtual void init_modify_mode(TMask& m) ;
bool build_firm_data(long cod, bool flagcom); bool build_firm_data(long cod, bool flagcom);
public: public:
BA4300_application(); BA4300_application();
virtual TRelation* get_relation() const { return _rel;} virtual TRelation* get_relation() const { return _rel;}
virtual int write(const TMask& m); virtual int write(const TMask& m);
virtual ~BA4300_application() {} virtual ~BA4300_application() {}
}; };
bool ba4300_handler(TMask& m, KEY k) bool ba4300_handler(TMask& m, KEY k)
{ {
if (k != K_F5 && k != K_F6 && k != K_F7 && k != K_F8) if (k != K_F5 && k != K_F6 && k != K_F7 && k != K_F8)
return TRUE; return TRUE;
if (m.mode() == MODE_MOD || m.mode() == MODE_INS) if (m.mode() == MODE_MOD || m.mode() == MODE_INS)
{ {
BA4300_application* app = (BA4300_application*) MainApp(); BA4300_application* app = (BA4300_application*) MainApp();
if (m.mode() == MODE_INS) if (m.mode() == MODE_INS)
{ {
if (!m.check_fields()) return FALSE; if (!m.check_fields()) return FALSE;
if (app->write(m) != NOERR) return TRUE; if (app->write(m) != NOERR) return TRUE;
m.stop_run(K_ESC); m.stop_run(K_ESC);
} }
TString appname; TString appname;
int fld = 0, fld1 = 0, fldbrowse = 0; int fld = 0, fld1 = 0, fldbrowse = 0;
if (k == K_F5) if (k == K_F5)
{ {
appname = "ba4 -3"; appname = "ba4 -3";
fld = FLD_UL1_CODDITTA; fld = FLD_UL1_CODDITTA;
fld1 = FLD_UL1_CODDITTA_NDITTE_RAGSOC; fld1 = FLD_UL1_CODDITTA_NDITTE_RAGSOC;
fldbrowse = FLD_UL1_CODULC; fldbrowse = FLD_UL1_CODULC;
} }
if (k == K_F6) if (k == K_F6)
{ {
appname = "ba4 -4"; appname = "ba4 -4";
fld = FLD_AT1_CODDITTA; fld = FLD_AT1_CODDITTA;
fld1 = FLD_AT1_PROGD_NDITTE_RAGSOC; fld1 = FLD_AT1_PROGD_NDITTE_RAGSOC;
fldbrowse = FLD_AT1_CODDITTAH; fldbrowse = FLD_AT1_CODDITTAH;
} }
if (k == K_F7) if (k == K_F7)
{ {
appname = "ba4 -5"; appname = "ba4 -5";
fld = FLD_SC1_CODDITTA; fld = FLD_SC1_CODDITTA;
fld1 = FLD_SC1_CODDITTA_NDITTE_RAGSOC; fld1 = FLD_SC1_CODDITTA_NDITTE_RAGSOC;
fldbrowse = FLD_SC1_CODANAGRSOH; fldbrowse = FLD_SC1_CODANAGRSOH;
} }
if (k == K_F8) { appname = "ba3 -0 reg"; fld = 0;fldbrowse = 0;} if (k == K_F8) { appname = "ba3 -0 reg"; fld = 0;fldbrowse = 0;}
if (appname.not_empty()) if (appname.not_empty())
{ {
TString body(16); TString body(16);
TLocalisamfile* d = app->get_relation()->lfile(); TLocalisamfile* d = app->get_relation()->lfile();
#if XVT_OS == XVT_OS_WIN #if XVT_OS == XVT_OS_WIN
if (k != K_F8) appname.insert("a", 3); if (k != K_F8) appname.insert("a", 3);
#endif #endif
if (fldbrowse) if (fldbrowse)
body << fldbrowse << "|"; body << fldbrowse << "|";
if (fld) if (fld)
body << fld << "=" << m.get(FLD_GD1_CODDITTA) ; body << fld << "=" << m.get(FLD_GD1_CODDITTA) ;
if (fld1) if (fld1)
body << "|" << fld1 << "=" ; body << "|" << fld1 << "=" ;
if (fldbrowse || fld) if (fldbrowse || fld)
{ {
TMessage msg(cmd2name(appname), MSG_FS, (const char*) body); TMessage msg(cmd2name(appname), MSG_FS, (const char*) body);
TMailbox mb; TMailbox mb;
mb.send(msg); mb.send(msg);
} }
d->setkey(1); d->setkey(1);
d->zero(); d->zero();
d->put("CODDITTA", m.get(FLD_GD1_CODDITTA)); d->put("CODDITTA", m.get(FLD_GD1_CODDITTA));
d->read(_isequal, _unlock) ; d->read(_isequal, _unlock) ;
TExternal_app a(appname); TExternal_app a(appname);
long oldditta = prefhndl->get_codditta(); long oldditta = prefhndl->get_codditta();
if (k == K_F8) prefhndl->set_codditta(atol(m.get(FLD_GD1_CODDITTA)), TRUE); if (k == K_F8) prefhndl->set_codditta(atol(m.get(FLD_GD1_CODDITTA)), TRUE);
a.run(); a.run();
if (k == K_F8) prefhndl->set_codditta(oldditta, TRUE); if (k == K_F8) prefhndl->set_codditta(oldditta, TRUE);
d->read(_iscurr, _lock) ; d->read(_iscurr, _lock) ;
m.set_focus(); m.set_focus();
return FALSE; return FALSE;
} }
} }
return TRUE; return TRUE;
} }
bool BA4300_application::build_firm_data(long codditta, bool flagcom) bool BA4300_application::build_firm_data(long codditta, bool flagcom)
{ {
const TString ndir(firm2dir(codditta)); const TString ndir(firm2dir(codditta));
const char* ntrrec = "trc.gen"; const char* ntrrec = "trc.gen";
const TFilename s1(format("%s/%s", (const char*) ndir, ntrrec)); const TFilename s1(format("%s/%s", (const char*) ndir, ntrrec));
const char* nd = "dir.gen"; const char* nd = "dir.gen";
const TFilename s2(format("%s/%s", (const char*) ndir, nd)); const TFilename s2(format("%s/%s", (const char*) ndir, nd));
if (fexist(s1) && fexist(s2)) if (fexist(s1) && fexist(s2))
return TRUE; return TRUE;
if (fexist(ndir)) if (fexist(ndir))
{ {
const bool ok = yesno_box("Direttorio %s esistente, lo ricostruisco", (const char*) ndir); const bool ok = yesno_box("Direttorio %s esistente, lo ricostruisco", (const char*) ndir);
if (!ok) return TRUE; if (!ok) return TRUE;
} }
else else
#if XVT_OS == XVT_OS_SCOUNIX #if XVT_OS == XVT_OS_SCOUNIX
if (mkdir(ndir, 0777) == -1) if (mkdir(ndir, 0777) == -1)
#else #else
if (mkdir(ndir) == -1) if (mkdir(ndir) == -1)
#endif #endif
return error_box("non posso creare il direttorio della ditta %ld (%s)", return error_box("non posso creare il direttorio della ditta %ld (%s)",
codditta, (const char*) ndir); codditta, (const char*) ndir);
if (!fexist(s1)) if (!fexist(s1))
if (!fcopy(ntrrec, s1)) if (!fcopy(ntrrec, s1))
return error_box("non posso copiare il file %s della ditta %ld", return error_box("non posso copiare il file %s della ditta %ld",
ntrrec, codditta); ntrrec, codditta);
if (!fexist(s2)) if (!fexist(s2))
if (!fcopy(nd, s2)) if (!fcopy(nd, s2))
return error_box("non posso copiare il file %s della ditta %ld", return error_box("non posso copiare il file %s della ditta %ld",
nd, codditta); nd, codditta);
set_cursor(TASK_WIN, CURSOR_WAIT); set_cursor(TASK_WIN, CURSOR_WAIT);
const long old_firm = get_firm(); const long old_firm = get_firm();
TDir dir, dir1; TDir dir, dir1;
TTrec rec; TTrec rec;
prefhndl->set(""); prefhndl->set("");
dir1.get(LF_DIR, _nolock, _nordir, _sysdirop); dir1.get(LF_DIR, _nolock, _nordir, _sysdirop);
const long maxeod0 = dir1.eod(); const long maxeod0 = dir1.eod();
prefhndl->set_codditta(codditta); prefhndl->set_codditta(codditta);
dir.get(LF_DIR, _nolock, _nordir, _sysdirop); dir.get(LF_DIR, _nolock, _nordir, _sysdirop);
if (dir.eod() == 0) if (dir.eod() == 0)
{ {
dir1.eod() = 1L; dir1.eod() = 1L;
dir1.put(LF_DIR, _nordir, _sysdirop); dir1.put(LF_DIR, _nordir, _sysdirop);
dir.get(LF_DIR, _nolock, _nordir, _sysdirop); dir.get(LF_DIR, _nolock, _nordir, _sysdirop);
} }
const long maxeod1 = dir.eod(); const long maxeod1 = dir.eod();
if (maxeod0 > maxeod1) if (maxeod0 > maxeod1)
{ {
dir.get(LF_DIR, _nolock, _nordir, _sysdirop); dir.get(LF_DIR, _nolock, _nordir, _sysdirop);
dir.eod() = maxeod0; dir.eod() = maxeod0;
dir.put(LF_DIR, _nordir, _sysdirop); dir.put(LF_DIR, _nordir, _sysdirop);
rec.zero(); rec.zero();
} }
for (int i = LF_DIR + 1; i <= maxeod0; i++) for (int i = LF_DIR + 1; i <= maxeod0; i++)
{ {
dir.get(i, _nolock, _nordir, _sysdirop); dir.get(i, _nolock, _nordir, _sysdirop);
if (dir.eod() == 0L && dir.eox() == 0L) if (dir.eod() == 0L && dir.eox() == 0L)
{ {
prefhndl->set(""); prefhndl->set("");
dir.get(i, _nolock, _nordir, _sysdirop); dir.get(i, _nolock, _nordir, _sysdirop);
rec.get(i); rec.get(i);
prefhndl->set_codditta(codditta); prefhndl->set_codditta(codditta);
const char* name = dir.name(); const char* name = dir.name();
dir.flags() = 0L; dir.flags() = 0L;
const bool valid_file = *name && dir.len() > 0; const bool valid_file = *name && dir.len() > 0;
const bool create_now = flagcom ? *name == '%' : *name != '%'; const bool create_now = flagcom ? *name == '%' : *name != '%';
if (valid_file && create_now) if (valid_file && create_now)
{ {
dir.put(i, _nordir, _sysdirop); dir.put(i, _nordir, _sysdirop);
rec.put(i); rec.put(i);
TSystemisamfile f(i); TSystemisamfile f(i);
f.build(30); // cambiare f.build(30); // cambiare
BA4300_application* app = (BA4300_application*) MainApp(); BA4300_application* app = (BA4300_application*) MainApp();
for (int j = 0 ; j < 99 ; j++) for (int j = 0 ; j < 99 ; j++)
{ {
if (app->has_module(j)) if (app->has_module(j))
{ {
const TString s(format("std/f%04d%02d.txt", i, j)); const TString s(format("std/f%04d%02d.txt", i, j));
if (fexist(s)) f.load(s); if (fexist(s)) f.load(s);
} }
} }
} }
else else
{ {
if (!flagcom) if (!flagcom)
{ {
dir.len() = 0; dir.len() = 0;
rec.zero(); rec.zero();
} }
dir.put(i, _nordir, _sysdirop); dir.put(i, _nordir, _sysdirop);
rec.put(i); rec.put(i);
} }
} }
} }
set_firm(old_firm); set_firm(old_firm);
set_cursor(TASK_WIN, CURSOR_ARROW); set_cursor(TASK_WIN, CURSOR_ARROW);
return TRUE; return TRUE;
} }
@ -274,152 +273,152 @@ BA4300_application::BA4300_application()
bool BA4300_application::user_create() // initvar e arrmask bool BA4300_application::user_create() // initvar e arrmask
{ {
_msk = new TMask("ba4300a") ; _msk = new TMask("ba4300a") ;
_msk->set_handler(ba4300_handler); _msk->set_handler(ba4300_handler);
_rel = new TRelation(LF_NDITTE); _rel = new TRelation(LF_NDITTE);
_anag = new TLocalisamfile(LF_ANAG); _anag = new TLocalisamfile(LF_ANAG);
_unloc = new TLocalisamfile(LF_UNLOC); _unloc = new TLocalisamfile(LF_UNLOC);
_attiv = new TLocalisamfile(LF_ATTIV); _attiv = new TLocalisamfile(LF_ATTIV);
_tabcom = new TLocalisamfile(LF_TABCOM); _tabcom = new TLocalisamfile(LF_TABCOM);
set_search_field(FLD_GD1_CODDITTA); set_search_field(FLD_GD1_CODDITTA);
return TRUE; return TRUE;
} }
bool BA4300_application::user_destroy() // releasev e arrmask bool BA4300_application::user_destroy() // releasev e arrmask
{ {
delete _msk; delete _msk;
delete _rel; delete _rel;
delete _anag; delete _anag;
delete _unloc; delete _unloc;
delete _attiv; delete _attiv;
delete _tabcom; delete _tabcom;
return TRUE; return TRUE;
} }
int BA4300_application::write(const TMask& m) int BA4300_application::write(const TMask& m)
{ {
_rel->zero(); _rel->zero();
m.autosave(); m.autosave();
_rel->write(); _rel->write();
if (_rel->bad()) if (_rel->bad())
return _rel->status(); return _rel->status();
TRectype& ditte=_rel->curr(); TRectype& ditte=_rel->curr();
TString codditta(ditte.get(CODDITTA)) ; TString codditta(ditte.get(CODDITTA)) ;
_attiv->zero() ; _attiv->zero() ;
_attiv->put(CODDITTA, (const char*) codditta) ; _attiv->put(CODDITTA, (const char*) codditta) ;
_attiv->put(CODATT, ditte.get(CODATTPREV)) ; _attiv->put(CODATT, ditte.get(CODATTPREV)) ;
TTable* tabatt = new TTable(TABATT); TTable* tabatt = new TTable(TABATT);
tabatt->zero(); tabatt->zero();
tabatt->put(CODTAB, ditte.get(CODATTPREV)) ; tabatt->put(CODTAB, ditte.get(CODATTPREV)) ;
tabatt->read(); tabatt->read();
if (tabatt->good()) _attiv->put(DESCR, tabatt->curr().get(S0)) ; if (tabatt->good()) _attiv->put(DESCR, tabatt->curr().get(S0)) ;
delete tabatt; delete tabatt;
_attiv->write(); _attiv->write();
_anag->zero() ; _anag->zero() ;
_anag->put(TIPOA, ditte.get(TIPOA)); _anag->put(TIPOA, ditte.get(TIPOA));
_anag->put(CODANAGR, ditte.get(CODANAGR)); _anag->put(CODANAGR, ditte.get(CODANAGR));
_anag->read(); _anag->read();
if (_anag->good()) if (_anag->good())
{ {
_unloc->zero() ; _unloc->zero() ;
_unloc->put(CODDITTA, (const char*) codditta) ; _unloc->put(CODDITTA, (const char*) codditta) ;
_unloc->put(CODULC, (int) 1) ; _unloc->put(CODULC, (int) 1) ;
TString s(_anag->get(COMRF)); TString s(_anag->get(COMRF));
if (s.empty()) if (s.empty())
{ {
_unloc->put(COMULC, _anag->get(COMRES)); _unloc->put(COMULC, _anag->get(COMRES));
_unloc->put(INDULC, _anag->get(INDRES)); _unloc->put(INDULC, _anag->get(INDRES));
_unloc->put(CIVULC, _anag->get(CIVRES)); _unloc->put(CIVULC, _anag->get(CIVRES));
_unloc->put(CAPULC, _anag->get(CAPRES)); _unloc->put(CAPULC, _anag->get(CAPRES));
_unloc->put(COMCCIAA, _anag->get(COMRES)); _unloc->put(COMCCIAA, _anag->get(COMRES));
_unloc->put(COMTRIB, _anag->get(COMRES)); _unloc->put(COMTRIB, _anag->get(COMRES));
} }
else else
{ {
_unloc->put(COMULC, (const char*) s); _unloc->put(COMULC, (const char*) s);
_unloc->put(INDULC, _anag->get(INDRF)); _unloc->put(INDULC, _anag->get(INDRF));
_unloc->put(CIVULC, _anag->get(CIVRF)); _unloc->put(CIVULC, _anag->get(CIVRF));
_unloc->put(CAPULC, _anag->get(CAPRF)); _unloc->put(CAPULC, _anag->get(CAPRF));
_unloc->put(COMCCIAA, (const char*) s); _unloc->put(COMCCIAA, (const char*) s);
_unloc->put(COMTRIB, (const char*) s); _unloc->put(COMTRIB, (const char*) s);
} }
_unloc->write(); _unloc->write();
} }
build_firm_data(atol(codditta), FALSE); build_firm_data(atol(codditta), FALSE);
return NOERR; return NOERR;
} }
void BA4300_application::init_query_mode(TMask& m) void BA4300_application::init_query_mode(TMask& m)
{ {
if (filtered()) if (filtered())
{ {
m.show(FLD_GD1_CODDITTAH); m.show(FLD_GD1_CODDITTAH);
m.hide(FLD_GD1_CODDITTA); m.hide(FLD_GD1_CODDITTA);
} }
else else
{ {
m.show(FLD_GD1_CODDITTA); m.show(FLD_GD1_CODDITTA);
m.hide(FLD_GD1_CODDITTAH); m.hide(FLD_GD1_CODDITTAH);
} }
init_insert_mode(m); init_insert_mode(m);
} }
void BA4300_application::init_insert_mode(TMask& m) void BA4300_application::init_insert_mode(TMask& m)
{ {
if (!filtered()) if (!filtered())
{ {
m.enable(FLD_GD1_TIPOA); m.enable(FLD_GD1_TIPOA);
m.enable(FLD_GD1_CODANAGR); m.enable(FLD_GD1_CODANAGR);
m.enable(FLD_GD1_CODANAGR_ANAGR_RAGSOC); m.enable(FLD_GD1_CODANAGR_ANAGR_RAGSOC);
m.show(FLD_GD1_CODDITTA); m.show(FLD_GD1_CODDITTA);
m.hide(FLD_GD1_CODDITTAH); m.hide(FLD_GD1_CODDITTAH);
} }
else else
{ {
m.show(FLD_GD1_CODDITTAH); m.show(FLD_GD1_CODDITTAH);
m.hide(FLD_GD1_CODDITTA); m.hide(FLD_GD1_CODDITTA);
} }
m.disable(DLG_ATT); m.disable(DLG_ATT);
m.disable(DLG_ULC); m.disable(DLG_ULC);
m.disable(DLG_SOC); m.disable(DLG_SOC);
m.disable(DLG_REG); m.disable(DLG_REG);
} }
void BA4300_application::init_modify_mode(TMask& m) void BA4300_application::init_modify_mode(TMask& m)
{ {
m.disable(FLD_GD1_TIPOA); m.disable(FLD_GD1_TIPOA);
m.disable(FLD_GD1_CODANAGR); m.disable(FLD_GD1_CODANAGR);
m.disable(FLD_GD1_CODANAGR_ANAGR_RAGSOC); m.disable(FLD_GD1_CODANAGR_ANAGR_RAGSOC);
if (filtered()) if (filtered())
{ {
m.show(FLD_GD1_CODDITTAH); m.show(FLD_GD1_CODDITTAH);
m.hide(FLD_GD1_CODDITTA); m.hide(FLD_GD1_CODDITTA);
} }
else else
{ {
m.show(FLD_GD1_CODDITTA); m.show(FLD_GD1_CODDITTA);
m.hide(FLD_GD1_CODDITTAH); m.hide(FLD_GD1_CODDITTAH);
} }
m.enable(DLG_ATT); m.enable(DLG_ATT);
m.enable(DLG_ULC); m.enable(DLG_ULC);
m.enable(DLG_SOC); m.enable(DLG_SOC);
m.enable(DLG_REG); m.enable(DLG_REG);
} }
int ba4300(int argc, char* argv[]) int ba4300(int argc, char* argv[])
{ {
BA4300_application a ; BA4300_application a ;
a.run(argc, argv, "Anagrafica Ditta"); a.run(argc, argv, "Anagrafica Ditta");
return 0; return 0;
} }