FiveTech Software tech support forums

Jimmy,

Equivalents:

Found() --> .not. oRs:Eof()
RecNo() --> oRs:BookMark
DbGoTo( n ) --> oRs:BookMark := n
OrdKeyNo() --> oRs:AbsolutePosition
OrdKeyGoTo( x ) --> oRs:AbsolutePosition := x

Regards,

... DBINFO( DBI_FULLPATH ) ) ) * DEFAULT ::bKeyNo := { |n| ( ::cAlias )->( If( n == nil, OrdKeyRelPos() * ::nLen, ; * If( Empty( OrdSetFocus() ), OrdKeyGoTo( n ), OrdKeyRelPos( n / ::nLen ) ) ) ) } * else ::lRelyOnKeyNo := If( Set( _SET_DELETED ), "DELETED()" $ Upper( DbFilter() ), .t. ...

... set confirm off set wrap on set date french set date format 'dd/mm/yyyy' set century on Request DBFCDX, DBFFPT, OrdCreate, OrdKeyCount, OrdKeyNo, OrdKeyGoto RddSetDefault( 'DBFCDX') set deleted on set autopen off set exclusive on Set optimize on cursorwait() readinsert( .t. ) SetBalloon( .T. ) ...

... DbSkipper #EndIf #ifdef __HARBOUR__ #xtranslate _DbSkipper => DbSkipper #ifdef __HBOLE__ #define __OLE__ #EndIf EXTERN OrdKeyNo, OrdKeyCount, OrdKeyGoto #EndIf

... user drags the scrollbar to say 3/9th position on the scrollbar, then xbrowse will move the record position to the 3rd record from the top using OrdKeyGoTo(). Using this example, please advise us how should xbrowse ascertain 1) The total number of records visible in the DBF 2) What is the serial ...

... Some points to be kept in mind: XBrowse mostly depends on the RDD functions OrdKeyCount(), OrdKeyNo() and OrdKeyGoTo(), which in turn depend on the indexes. So, very large index files, large index key values to some extent impede the performance of xbrowse ...

I have a strange error making index with dbf and ftp on main.prg I set REQUEST DBFCDX REQUEST DBFFPT EXTERNAL ORDKEYNO,ORDKEYCOUNT,ORDCREATE,ORDKEYGOTO FUNCTION Main() PUBLIC oApp RddSetDefault( "DBFCDX" ) SetHandleCount( 100 ) SET DATE FORMAT "dd-mm-yyyy" SET DELETED ON ...

... // like ADO Moves to record whose record number is nRecNo. If the record with nRecNo is deleted, record pointer is not moved. KeyGoTo( nKeyNo ) OrdKeyGoTo( nKeyNo ) // like DBF AbsolutePosition := nKeyNo // like ADO Moves to the nKeyNo position in the apparent sorted order ignoring records filtered ...

Thank´s James

after thinking a lot, put this information in the main.prg and oh yes right gave the upload.

REQUEST DBFNTX
REQUEST DBFDBT

REQUEST DBFCDX
REQUEST DBFFPT

REQUEST ORDKEYNO
REQUEST ORDKEYCOUNT
REQUEST ORDKEYGOTO

REQUEST DESCEND

thank you for your attention

... MovePrevious(), Move( n ) Work similar to DBF and RecordSet, navigating in the sorted order, respecting filters. OrdKeyCount(), OrdKeyNo(), OrdKeyGoTo( nKeyNo ) KeyCount(), KeyNo(), KeyGoTo( nKeyNo ) RecordCount(), AbsoutePosition, AbsolutePosition := n All these methods work exactly the ...

... como un tiro en RED!! Mi configuración en el PRG principal es: REQUEST DBFCDX RddSetDefault("DBFCDX") REQUEST OrdKeyNo, OrdKeyCount, OrdKeyGoto REQUEST ADS,ADSKEYCOUNT,ADSGETRELKEYPOS,ADSKEYNO,ADSSetRelKeyPos,rddsys RDDREGISTER("ADS",1) SET SERVER LOCAL AdsSetFileType( ADS_CDX ...

... I set filter to "!DELETED()". I always use this and recommend this even for DBFCDX. Using this results in OrdKeyCount(), OrdKeyNo() and OrdKeyGoTo() work very accurately. Now if and when you have time, I request you to: 1) You said you were having problem with a particular dbf. Please ...

... Browses viz TWBrowse, TCBrowse and TXBrowse. Out of the three, TXBrowse heavily depends on the RDD supporting OrdKeyCount(), OrdKeyNo() and OrdKeyGoTo(). TXBrowse's navigation works fully as expected when the RDD properly supports these three functions. (Note: For accurate working, we also ...

... sort status of the combobox items. * RDDADS related workarounds in xbrowse.prg and database.prg: It is noticed that when OrdSetFocus() is empty, OrdKeyGoTo() errors out in Harbour version of RDDADS. While the function does not error out in xHarbour version, the function does not work when OrdSetFocus() ...

... extract field len to build a find, filter or query expression because the eval result its the sum of all the numeric fields in the expression. 6) ORDKEYGOTO was not full implemented.