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:
parent
a947a1c109
commit
f114c65d04
@ -7,10 +7,13 @@ extern bool gest_vend();
|
|||||||
|
|
||||||
|
|
||||||
TClifoVI::TClifoVI():TRelation(LF_CLIFO), _oldindirizzi(0)
|
TClifoVI::TClifoVI():TRelation(LF_CLIFO), _oldindirizzi(0)
|
||||||
|
{
|
||||||
|
if (gest_vend())
|
||||||
{
|
{
|
||||||
add(LF_CFVEN,"TIPOCF=TIPOCF|CODCF=CODCF");
|
add(LF_CFVEN,"TIPOCF=TIPOCF|CODCF=CODCF");
|
||||||
add(LF_INDSP,"TIPOCF=TIPOCF|CODCF=CODCF");
|
add(LF_INDSP,"TIPOCF=TIPOCF|CODCF=CODCF");
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
|
||||||
void TClifoVI::destroy_rows()
|
void TClifoVI::destroy_rows()
|
||||||
{
|
{
|
||||||
@ -130,14 +133,14 @@ int TClifoVI::rewrite(bool force, TDate&)
|
|||||||
int TClifoVI::remove(TDate&)
|
int TClifoVI::remove(TDate&)
|
||||||
{
|
{
|
||||||
TLocalisamfile* c=lfile(LF_CLIFO);
|
TLocalisamfile* c=lfile(LF_CLIFO);
|
||||||
TLocalisamfile* v=lfile(LF_CFVEN);
|
|
||||||
TLocalisamfile* rind=lfile(LF_INDSP);
|
|
||||||
|
|
||||||
c->remove();
|
c->remove();
|
||||||
|
|
||||||
// Put here gest_vend() discrimination
|
// Put here gest_vend() discrimination
|
||||||
if (gest_vend())
|
if (gest_vend())
|
||||||
{
|
{
|
||||||
|
TLocalisamfile* v=lfile(LF_CFVEN);
|
||||||
|
TLocalisamfile* rind=lfile(LF_INDSP);
|
||||||
cancella(rind,1,_oldindirizzi);
|
cancella(rind,1,_oldindirizzi);
|
||||||
v->remove();
|
v->remove();
|
||||||
}
|
}
|
||||||
|
Loading…
x
Reference in New Issue
Block a user