FiveTech Software tech support forums

... aRecord,nRecord   local aRecordUp,nRecordUp   if NetRecLock(, nRecord:=RECNO() )      aRecord := FieldsToArray()      if DbSkipper(-1)=-1 .and. NetRecLock(, nRecordUp:=RECNO() )         aRecordUp := FieldsToArray()         ArrayToFields(aRecord)  ...

Antonio, I follow your advice and try with Harbour 3.4 and now I have this errors: the same: _hb_vmProcessSymbolsEx from adordd.lib and added the follows: _hb_fun_loadlibrary, _hb_fun_freelibrary and _hb_fun_dbskipper, from fiveh.lib I need to upgrade something else, isn't it.? FW9.12, is compatible...

... index condition. All this without adding or changing keys being filtered. So in xbrowse what is your bskip ? ::bSkip := {| n | ( ::cAlias )->( DbSkipper( IfNil( n, 1 ) ) ) },; adordd should be treated as any dbf rdd.

Mr. Nages, Thank you for the reply. I understand your use of 1) & 2) in your response, but not in the context of my above attached compileable sample. How would 1) or 2) apply to configuring the excerpt from compilable sample supplied above           WITH OBJECT oBrw    ...

Añade este fichero de cabecera:

#include <hbapiitm.h>

Y prueba a añadir esta función:

function DBSKIPPER( x )

return __DBSkipper( x )

Con lo que dice Antonio queda arreglado ese error. Pero ahora me da otros nuevos en el linkado: call to function hb_itemRelease with no prototipe call to function hb_itemReturn with no prototipe call to function hb_itemArrayNew with no prototipe call to function hb_itemPutC with no prototipe unresol...

Adrian, Prueba a añadir esta función a tu PRG principal: function _DbSkipper( ... ) // escribe esos puntos tal cual return DbSkipper( ... ) // igual aqui Gracias Antonio Linares por tu interes, pero creo que me dedicare todo este fin de semana a pasar de ...

Adrian,

Prueba a añadir esta función a tu PRG principal:

function _DbSkipper( ... ) // escribe esos puntos tal cual

return DbSkipper( ... ) // igual aqui

Adrian en que te falla, yo lo estoy utilizando con harbour 3.2 la librería que está en el enlace y no hay fallos. Luis Hola Luis, gracias de nuevo por contestar, es que me indica el error: que no existe la funcion _DbSkipper, y yo uso igual Harbour 3.20 y Bcc582 con fivewin 10.6,no se si tendra que...

Hola,
Para dbskipper trata insertando la siguiente funcion:

Code: Select all  Expand view

FUNCTION DbSkipper( n ) ; RETURN __DbSkipper( n )

Si te funciona habria que hallar el equivalente para "_HB_FUN___CLS_PARAM"

Saludos,

George

Hola :-) Parece que ya estoy logrando migrar mi proyecto de FHW rpe-release a la última versión. Gracias a vuestra ayuda. Este es el último error que aparece (y creo que el último). Resulta que uso la librería twbrw32.lib. Con FWH pre-release ha funcionado correctamente, pero aquí es como si no se i...

Hi I have any time this error on my application How to resolve it ??? Error DBCMD/2001 Workarea non in use: __DBSKIPPER Stack-List ========== Called from: => __DBSKIPPER(0) Called from: fiveh\xbrowse.prg => (b)TXBROWSE_SETRDD(3936) Called from: fiveh\xbrowse.prg => (b)TXBROWSE(436) Called f...

try this

#ifndef __XHARBOUR__
FUNCTION DbSkipper( n ) ; RETURN __DbSkipper( n )
FUNCTION DbPack() ; RETURN __DbPack()
FUNCTION DbZap() ; RETURN hb_DbZap()
FUNCTION CurDrive( x ) ; RETURN hb_CurDrive( x )
#EndIf

Hth

Richard

Try

#ifdef __HARBOUR__
#ifndef __XHARBOUR__
#xtranslate DbSkipper => DbSkip
#endif
#endif

... from C:\FWH13\LIB\TWBRW32H.LIB|WBROWSE I Have tbrowse.prg includes the following: #ifdef __HARBOUR__   #ifndef __XHARBOUR__      #xtranslate _DbSkipper => DbSkipper   #endif#endif But not solved ... Does anyone have this working class to harbour 3.2/FWH 13/08?