Impedita la cancellazione dei conti su un piano conti in comune

git-svn-id: svn://10.65.10.50/trunk@1687 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1995-08-08 10:16:04 +00:00
parent df2e9fd5c3
commit fe47d5362a

View File

@ -18,6 +18,7 @@ class CG0100_application : public TRelation_application
TRelation *_rel; TRelation *_rel;
TLocalisamfile* _saldi; TLocalisamfile* _saldi;
TLocalisamfile* _tabcom; TLocalisamfile* _tabcom;
bool _pcon_com;
bool user_create(); bool user_create();
bool user_destroy(); bool user_destroy();
@ -30,10 +31,11 @@ class CG0100_application : public TRelation_application
virtual int write(const TMask& m); virtual int write(const TMask& m);
virtual int rewrite(const TMask & m); virtual int rewrite(const TMask & m);
virtual int read(TMask& m); virtual int read(TMask& m);
virtual void on_firm_change();
public: public:
virtual TRelation* get_relation() const {return _rel;} virtual TRelation* get_relation() const {return _rel;}
CG0100_application() {} CG0100_application() : _pcon_com(FALSE) {}
}; };
HIDDEN inline CG0100_application & app() { return (CG0100_application &) main_app();} HIDDEN inline CG0100_application & app() { return (CG0100_application &) main_app();}
@ -105,9 +107,16 @@ int CG0100_application::write(const TMask& m)
} }
// Controlla se puo' essere effettuata la cancellazione di un conto // Controlla se puo' essere effettuata la cancellazione di un conto
void CG0100_application::on_firm_change()
{
TDir d;
d.get(LF_PCON, _nolock, _nordir, _sysdirop);
_pcon_com = d.is_com();
}
bool CG0100_application::protected_record(TRectype &rec) bool CG0100_application::protected_record(TRectype &rec)
{ {
if (_pcon_com ) return TRUE;
TMask* m = get_mask(MODE_MOD); TMask* m = get_mask(MODE_MOD);
TLocalisamfile& pconti = _rel->lfile(); TLocalisamfile& pconti = _rel->lfile();
const int gruppo = atoi(m->get(FLD_CM1_GRUPPO)); const int gruppo = atoi(m->get(FLD_CM1_GRUPPO));