Discriminazione apertura files indsped e cfven

git-svn-id: svn://10.65.10.50/trunk@196 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1994-09-08 15:06:53 +00:00
parent a947a1c109
commit f114c65d04
2 changed files with 106 additions and 103 deletions

View File

@ -7,10 +7,13 @@ extern bool gest_vend();
TClifoVI::TClifoVI():TRelation(LF_CLIFO), _oldindirizzi(0)
{
if (gest_vend())
{
add(LF_CFVEN,"TIPOCF=TIPOCF|CODCF=CODCF");
add(LF_INDSP,"TIPOCF=TIPOCF|CODCF=CODCF");
}
}
void TClifoVI::destroy_rows()
{
@ -130,14 +133,14 @@ int TClifoVI::rewrite(bool force, TDate&)
int TClifoVI::remove(TDate&)
{
TLocalisamfile* c=lfile(LF_CLIFO);
TLocalisamfile* v=lfile(LF_CFVEN);
TLocalisamfile* rind=lfile(LF_INDSP);
c->remove();
// Put here gest_vend() discrimination
if (gest_vend())
{
TLocalisamfile* v=lfile(LF_CFVEN);
TLocalisamfile* rind=lfile(LF_INDSP);
cancella(rind,1,_oldindirizzi);
v->remove();
}