fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed problem on adsGoTo() method when using ADT files. Borrowed from xharbour.

Browse Source
This commit is contained in:
Antonio Carlos Pantaglione
2003-06-30 13:46:18 +00:00
parent 862c79156a
commit 4e77117f56
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/contrib/rdd_ads/ads1.c
View File

@@ -489,8 +489,8 @@ static ERRCODE adsGoTo( ADSAREAP pArea, ULONG ulRecNo )
{ /* if it was at eof, and another station or handle added a record, it needs to GoTo or AtEof stays True. */
AdsRefreshRecord(pArea->hTable);
}
else if( ulRecNo > 0 && ulRecNo <= pArea->ulRecCount )
{
else if( ulRecNo > 0 && (pArea->iFileType==ADS_ADT || ulRecNo <= pArea->ulRecCount ) )
{ /* ADTs can have a recno greater than RecCount because it recycles deleted records !!! */
pArea->ulRecNo = ulRecNo;
pArea->fBof = pArea->fEof = FALSE;
ulRetVal = AdsGotoRecord( pArea->hTable, ulRecNo );