Corretta la lunghezza del campo CODTAB nella filtercursor

git-svn-id: svn://10.65.10.50/trunk@119 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-09-01 13:31:24 +00:00
parent 3cd924e216
commit 3feccfd63e

View File

@ -1,4 +1,4 @@
// $Id: relation.cpp,v 1.5 1994-08-26 14:06:00 alex Exp $
// $Id: relation.cpp,v 1.6 1994-09-01 13:31:24 alex Exp $
// relation.cpp
// fv 12/8/93
// relation class for isam files
@ -760,7 +760,11 @@ int TCursor::filtercursor(int pagecnt, TRecnotype* page)
int np = 0;
TRectype& rec = file()->curr();
const bool tab = file()->tab();
if (tab) file()->filehnd()->r->Fd[0].RecOff += 3;
if (tab)
{
file()->filehnd()->r->Fd[0].RecOff += 3;
file()->filehnd()->r->Fd[0].Len -= 3;
}
// TRecfield* codtab = tab ? new TRecfield(rec, "CODTAB") : NULL;
for (int i = 0; i < pagecnt; i++)
{
@ -773,7 +777,11 @@ int TCursor::filtercursor(int pagecnt, TRecnotype* page)
np++;
}
}
if (tab) file()->filehnd()->r->Fd[0].RecOff -= 3;
if (tab)
{
file()->filehnd()->r->Fd[0].RecOff -= 3;
file()->filehnd()->r->Fd[0].Len += 3;
}
// if (tab) delete codtab;
return np;
}