From 99e0e2fe3da0f25a8a953e848012061a4e107bc9 Mon Sep 17 00:00:00 2001
From: Horacio Dario Roldan Kasimatis <harbour_ar@yahoo.com.ar>
Date: Fri, 1 Feb 2002 23:55:16 +0000
Subject: [PATCH] 2002-01-31 08:40 UTC-0300 Horacio Roldan
 <harbour_ar@yahoo.com.ar>    * source/rdd/dbf1.c      ! fixed bug with flags
 in hb_dbfGoTo

---
 harbour/source/rdd/dbf1.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/harbour/source/rdd/dbf1.c b/harbour/source/rdd/dbf1.c
index 08b7aeff3b..eae7cf883e 100644
--- a/harbour/source/rdd/dbf1.c
+++ b/harbour/source/rdd/dbf1.c
@@ -703,7 +703,9 @@ ERRCODE hb_dbfGoTo( DBFAREAP pArea, ULONG ulRecNo )
    else /* Out of space */
    {
       pArea->ulRecNo = pArea->ulRecCount + 1;
-      pArea->fBof = pArea->fEof = pArea->fValidBuffer = TRUE;
+      /* pArea->fBof = pArea->fEof = pArea->fValidBuffer = TRUE; */
+      pArea->fBof = (pArea->ulRecCount == 0);
+      pArea->fEof = pArea->fValidBuffer = TRUE;
       pArea->fPositioned = pArea->fDeleted = FALSE;
 
       /* Clear buffer */