From 3feccfd63e9a71f42e7fa28d3bca25357f48f14c Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Thu, 1 Sep 1994 13:31:24 +0000
Subject: [PATCH] Corretta la lunghezza del campo CODTAB nella filtercursor

git-svn-id: svn://10.65.10.50/trunk@119 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 include/relation.cpp | 14 +++++++++++---
 1 file changed, 11 insertions(+), 3 deletions(-)

diff --git a/include/relation.cpp b/include/relation.cpp
index cf9eb2aa7..6ac6ecefe 100755
--- a/include/relation.cpp
+++ b/include/relation.cpp
@@ -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;
 }