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

2001-10-19 18:42 GMT-3 Horacio Roldan <harbour_ar@yahoo.com.ar>

Browse Source 
* source/rdd/dbfcdx/dbfcdx1.c
     ! fixed ordSetFocus related, if the previos order was 0, it did nothing
     ! fixed ordSetFocus related, was comparing case sensitive
This commit is contained in:
Horacio Dario Roldan Kasimatis
2001-10-19 21:44:38 +00:00
parent 955247c211
commit c69ab9cfc0
2 changed files with 10 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -1,3 +1,8 @@
2001-10-19 18:42 GMT-3 Horacio Roldan <harbour_ar@yahoo.com.ar>
* source/rdd/dbfcdx/dbfcdx1.c
! fixed ordSetFocus related, if the previos order was 0, it did nothing
! fixed ordSetFocus related, was comparing case sensitive
2001-10-19 07:50 GMT -3 Luiz Rafael Culik<culik@sl.conex.net>
*source/compiler/harbour.c
*Fixed some warings reported by Dave Person

8
harbour/source/rdd/dbfcdx/dbfcdx1.c
View File

@@ -3699,7 +3699,8 @@ static USHORT hb_cdxFindTag( CDXAREAP pArea, LPDBORDERINFO pOrderInfo )
pTag = pArea->lpIndexes->TagList;
for( uiTag = 0; pTag; uiTag++ )
{
if ( !strcmp( pTag->szName, hb_itemGetCPtr( pOrderInfo->itmOrder ) ) )
//if ( !strcmp( pTag->szName, hb_itemGetCPtr( pOrderInfo->itmOrder ) ) )
if ( !hb_stricmp( pTag->szName, hb_itemGetCPtr( pOrderInfo->itmOrder ) ) )
break;
pTag = pTag->pNext;
}
@@ -4181,10 +4182,11 @@ ERRCODE hb_cdxOrderListFocus( CDXAREAP pArea, LPDBORDERINFO pOrderInfo )
//HB_SYMBOL_UNUSED( pArea );
//HB_SYMBOL_UNUSED( pOrderInfo );
if ( ! pTag )
if ( ! pArea->lpIndexes )
return SUCCESS;
pOrderInfo->itmResult = hb_itemPutC( pOrderInfo->itmResult, pTag->szName );
if ( pTag )
pOrderInfo->itmResult = hb_itemPutC( pOrderInfo->itmResult, pTag->szName );
if ( pOrderInfo->itmOrder )
{