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

Impedita la cancellazione dei conti su un piano conti in comune

Browse Source 
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
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
cg/cg0100.cpp
View File

@ -18,6 +18,7 @@ class CG0100_application : public TRelation_application
TRelation *_rel;
TLocalisamfile* _saldi;
TLocalisamfile* _tabcom;
bool _pcon_com;
bool user_create();
bool user_destroy();
@ -30,10 +31,11 @@ class CG0100_application : public TRelation_application
virtual int write(const TMask& m);
virtual int rewrite(const TMask & m);
virtual int read(TMask& m);
virtual void on_firm_change();
public:
virtual TRelation* get_relation() const {return _rel;}
CG0100_application() {}
CG0100_application() : _pcon_com(FALSE) {}
};
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
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)
{
{
if (_pcon_com ) return TRUE;
TMask* m = get_mask(MODE_MOD);
TLocalisamfile& pconti = _rel->lfile();
const int gruppo = atoi(m->get(FLD_CM1_GRUPPO));