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

2001-11-08 14:53 GMT-3 Horacio Roldan <harbour_ar@yahoo.com.ar>

Browse Source 
* source/rdd/dbfcdx/dbfcdx1.c
     + added support for ordFor()
This commit is contained in:
Horacio Dario Roldan Kasimatis
2001-11-08 18:07:25 +00:00
parent a834b6115c
commit dc613abc4c
2 changed files with 22 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
2001-11-08 14:53 GMT-3 Horacio Roldan <harbour_ar@yahoo.com.ar>
* source/rdd/dbfcdx/dbfcdx1.c
+ added support for ordFor()
2001-11-07 23:00 GMT -3 Luiz Rafael Culik<culik@sl.conex.net>
* utils/hbmake/hbmake.prg
utils/hbmake/hbmake.prg

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

@@ -891,6 +891,24 @@ ERRCODE hb_cdxOrderInfo( CDXAREAP pArea, USHORT uiIndex, LPDBORDERINFO pOrderInf
case DBOI_BAGEXT:
pOrderInfo->itmResult = hb_itemPutC( pOrderInfo->itmResult, CDX_INDEXEXT );
break;
case DBOI_CONDITION:
if ( ! pOrderInfo->itmOrder )
pTag = hb_cdxGetActiveTag( pArea->lpIndexes );
else
{
uiTag = hb_cdxFindTag( pArea, pOrderInfo );
if ( uiTag )
{
pTag = hb_cdxGetTagByNumber(pArea, uiTag );
}
}
if ( pTag )
pOrderInfo->itmResult = hb_itemPutC( pOrderInfo->itmResult, pTag->ForExpr );
break;
case DBOI_EXPRESSION:
if ( ! pOrderInfo->itmOrder )