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

Patch level :4.0 608

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :non si devono poter cancellare i gruppi con ancora conti figli esistenti


git-svn-id: svn://10.65.10.50/trunk@14853 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-02-07 09:12:08 +00:00
parent 1b7aa2bde6
commit dab4b0fccf
1 changed files with 15 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
ca/ca0400.cpp
View File

@ -103,6 +103,7 @@ protected:
virtual int write(const TMask& m);
virtual int rewrite(const TMask& m);
virtual bool remove();
virtual bool protected_record(TRectype& rec);
void init_indbil(TMask& mask);
virtual void init_query_mode(TMask& mask);
@ -214,6 +215,20 @@ bool TAnalisi_app::remove()
return err == NOERR;
}
bool TAnalisi_app::protected_record(TRectype& rec)
{
TLocalisamfile pconana(LF_PCONANA);
pconana.curr() = rec;
if (pconana.read() == NOERR && pconana.next() == NOERR)
{
const TString key = rec.get(PANA_CODCONTO);
const TString new_key = pconana.get(PANA_CODCONTO);
return new_key.starts_with(key);
}
return false;
}
void TAnalisi_app::init_indbil(TMask& mask)
{
bool enabled = true;