diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 92a5be8172..27345c117a 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,11 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2003-12-03 17:28 UTC-0800 Luis Krause Mantilla + * 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 * include/hbapirdd.h * source/rdd/dbcmd.c diff --git a/harbour/source/rdd/dbcmd.c b/harbour/source/rdd/dbcmd.c index 91e56d6fa4..dcf729b347 100644 --- a/harbour/source/rdd/dbcmd.c +++ b/harbour/source/rdd/dbcmd.c @@ -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 ) );