From e5101cb85c421db7367a0869db572a4360f54f1b Mon Sep 17 00:00:00 2001
From: bonazzi <bonazzi@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Mon, 19 Feb 2018 01:00:42 +0000
Subject: [PATCH] Patch level         : 12.0 536 Files correlati     :  
 cg7.exe cg7800a.rep cg7600a.png cg7700a.png cg7800a.png

I recordset non arrivavano mai a settare EOF

git-svn-id: svn://10.65.10.50/branches/R_10_00@24383 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 src/include/recset.cpp | 16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/src/include/recset.cpp b/src/include/recset.cpp
index 48fa2db82..b0b500ca4 100755
--- a/src/include/recset.cpp
+++ b/src/include/recset.cpp
@@ -1615,11 +1615,17 @@ bool TISAM_recordset::move_to(TRecnotype pos)
 {
   TCursor* c = cursor();
   bool ok = c != NULL && pos >= 0 && pos < c->items();
-  if (ok)
-  {
-    *c = pos;
-  }
-  return ok;
+	if (ok)
+	{
+		*c = pos;
+	}
+	else
+		if (pos >= c->items())
+			*c = c->items();
+		else
+			if (pos < 0L)
+				*c = 0L;
+	return ok;
 }
 
 void TISAM_recordset::reset()