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

2003-05-07 14:45 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>

Browse Source
This commit is contained in:
Alexander S.Kresin
2003-05-07 10:45:03 +00:00
parent e438b1cf1e
commit e4e6826fc9
3 changed files with 19 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
harbour/ChangeLog
View File

@@ -8,6 +8,13 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2003-05-07 14:45 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/rdd/dbfntx/dbfntx1.c
! OrdkeyCount() and OrdKeyNo() now returns physical records number and
position if there is no index opened or current order is 0
* source/rtl/set.c
! two warnings fixed.
2003-05-06 15:35 UTC+0300 Alexander Kresin <alex@belacy.belgorod.su>
* source/rtl/is.c
! Bug fixed: ISUPPER, ISLOWER and ISALPHA with chr(0) argument

13
harbour/source/rdd/dbfntx/dbfntx1.c
View File

@@ -3808,9 +3808,18 @@ static ERRCODE ntxOrderInfo( NTXAREAP pArea, USHORT uiIndex, LPDBORDERINFO pInfo
switch( uiIndex )
{
case DBOI_KEYCOUNT:
case DBOI_POSITION:
hb_itemPutND( pInfo->itmResult,0 );
{
ULONG ulRecCount = 0;
SELF_RECCOUNT( ( AREAP ) pArea, &ulRecCount );
hb_itemPutND( pInfo->itmResult,ulRecCount );
break;
}
case DBOI_POSITION:
{
hb_itemPutND( pInfo->itmResult,0 );
SELF_RECNO( ( AREAP ) pArea, pInfo->itmResult );
break;
}
case DBOI_ISCOND:
case DBOI_ISDESC:
case DBOI_UNIQUE:

3
harbour/source/rtl/set.c
View File

@@ -158,8 +158,7 @@ static int set_number( PHB_ITEM pItem, int iOldValue )
static char * set_string( PHB_ITEM pItem, char * szOldString )
{
char * szString = NULL;
ULONG ulLen = 0;
char * szString;
HB_TRACE(HB_TR_DEBUG, ("set_string(%p, %s)", pItem, szOldString));