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

2003-12-03 17:28 UTC-0800 Luis Krause Mantilla

Browse Source
This commit is contained in:
Luis Krause
2003-12-04 01:10:08 +00:00
parent a0f252023b
commit 08da7a41fb
2 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2003-12-03 17:28 UTC-0800 Luis Krause Mantilla <lkrausem /*at*/ shaw /*dot*/ ca>
* source/rdd/dbcmd.c
! Fixed OrdKeyNo() bug that set RecNo() to LastRec() + 1
reported by Roberto López - borrowed from xharbour
2003-12-03 14:24 UTC-0800 Luis Krause Mantilla <lkrausem /*at*/ shaw /*dot*/ ca>
* include/hbapirdd.h
* source/rdd/dbcmd.c

2
harbour/source/rdd/dbcmd.c
View File

@@ -2643,7 +2643,7 @@ HB_FUNC( ORDKEYNO )
pOrderInfo.itmOrder = hb_param( 1, HB_IT_NUMERIC );
pOrderInfo.atomBagName = hb_param( 2, HB_IT_STRING );
/* Either or both may be NIL */
pOrderInfo.itmNewVal = NULL;
pOrderInfo.itmResult = hb_itemPutNL( NULL, 0 );
SELF_ORDINFO( ( AREAP ) s_pCurrArea->pArea, DBOI_POSITION, &pOrderInfo );
hb_retnl( hb_itemGetNL( pOrderInfo.itmResult ) );