FiveTech Software tech support forums

With ads.ch and linking rddads.lib I have no unresolved externals. Can I see the batch are you using to compile? I use FWH\samples\Buildx.bat and Buildh.bat Did you uncomment this line? rem echo %hdir%\lib\rddads.lib + >> b32.bc Yes, some error below: Turbo Incremental Link 6.97 Copyright (c)...

See fwh\samples\testads.prg and xbradt.prg where i can found ads.ch ? exist a free ads ? Turbo Incremental Link 6.80 Copyright (c) 1997-2017 Embarcadero Technologies, Inc. Error: Unresolved external '_HB_FUN_ADSSETSERVERTYPE' referenced from C:\WORK\ERRORI\BO_FILE_ADT\OBJ\TEST.OBJ Error: Unresolved...

... archivos DBF con un proveedor y con el ADS tiene problemas para abrir tales archivos. en mi programa principal tengo: REQUEST ADS EXTERNAL AdsKeyNo, AdsKeyCount, AdsGetRelKeyPos, AdsSetRelKeyPos // --- Activacion de RDD ADS function ActivaRDD() RDDREGISTER("ADS",1) RDDSETDEFAULT("ADS") ...

... REQUEST ADS static hAds, oConn, lOk function main() local cPath := "D:\projects\fwh1706\pos6\LocalDB\POS4.add" EXTERN ADSKeyNo EXTERN ADSKeyCount EXTERN ADSSetRelKeyPos EXTERN ADSGetRelKeyPos AdsSetFileType( ADS_ADT ) lOk := .F. RddRegister("Ads", 1) RddSetDefault("Ads") ...

Hi Nages,

I have removed the ADSKEYNO error by adding the following EXTERN commands:
EXTERN ADSKeyNo
EXTERN ADSKeyCount
EXTERN ADSSetRelKeyPos
EXTERN ADSGetRelKeyPos

but still the error on xbrowse:ldrag persists.

Best regards,
ryugarai27

... an error: Time from start: 0 hours 0 mins 0 secs Error occurred at: 09/01/18, 13:26:36 Error description: Error BASE/1001 Undefined function: ADSKEYNO Args: [ 1] = U [ 2] = U [ 3] = N 1 Stack Calls =========== Called from: => ADSKEYNO( 0 ) Called from: .\source\classes\XBROWSE.PRG => ...

... #include "fivewin.ch" REQUEST DBFCDX REQUEST DBFFPT REQUEST ADS, ADSKeyno, ADSKeycount, ADSGETRELKEYPOS, ADSSETRELKEYPOS static aSecurity[06] function Main( cComp, cUid ) local oWnd , ; oFont, oFont2, oFont3, oMenu ...

... ADSKeyCount([<xTag>],<cIgnoredIndexFile>,[<nFilterOption>])->nKeyCount ADSKeyNo([<xTag>],[<nFilterOption>])->nKeyNo ADSLocking(<lMode>)->lPriorSetting ADSRefreshAOF()->Nil ADSRightsCheck(<lMode>)->lPriorSetting ...

... ADSCustomizeAOF AdsDDRemoveTable ADSEvalAOF ADSFile2Blob ADSGetAOF ADSGetAOFnoOpt ADSGetAOFoptLevel ADSGetRelKeyPos ADSIsRecordInAOF ADSKeyCount ADSKeyNo ADSLocking ADSRefreshAOF ADSRightsCheck ADSSetAOF ADSStmtSetTableReadOnly AEval AFields AFill AfterAtNum AIns ALenAlloc Alert Alias AllTrim ...

nageswaragunupudi wrote:Please add ADSKEYNO also to the list of EXTERNAL symbols

Nages,

Alright. That solves the AdsKeyNo error.

However, when the xbrowse window pops up, the application crashes giving no detail information. It just says that the xxx.exe has stopped working.

How do I debug this? Thanks.

Please add ADSKEYNO also to the list of EXTERNAL symbols

... to xHarbour include folder. I compiled my program successfully but when I run it, it fails with exception: Error BASE/1001 Undefined function: ADSKEYNO This is my program: #include "fivewin.ch"#include "xbrowse.ch"#include "ads.ch"REQUEST ADSEXTERNAL AdsKeyCount, ...

... 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 ) AdsLocking( .t. ) AdsRightsCheck( .f. ) un ...

... si esto te orienta Uso ADS, y tengo estas declaraciones: En el main ANNOUNCE RDDSYS REQUEST ADS, HB_Lang_ESWIN, HB_CODEPAGE_ESWIN, ; ADSKeyCount,ADSKeyNo,OrdKeyCount,OrdKeyNo,AdsGetRelKeyPos,AdsSetRelKeyPos,DBFCDX,DBFFPT luego HB_LangSelect( "ESWIN" ) HB_SetCodePage( "ESWIN" ...

... porcentaje ) Intenta ese código con un sistema ads en servidor de no muchos registros poniéndole para que respete los filtros ( usando por tanto adskeyno(,,1) ). ...cada movimiento del xbrowse se trasforma en 15 segundos de refresco :D ( y a veces mas ) Añadiendo la data ::nRowZebra y asignándola ...