FiveTech Software tech support forums

Saved me a few keystrokes
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))

If you use database objects then you can just do:

oCustomer:goBottom()

Not only DBSEEK,
You can use any (x)Harbour function as if it is a METHOD.

Thanks Rao,
Saved me a few keystrokes
I normally would type as (oDbf:cAlias)->(dbSeek(cSeek, nil, .t.))

Please try oDbf:DbSeek( cSeek, nil, .T. ) This works with FWH1912 also, Don't bother if you can not find the method DbSeek() With database class we call use any (x)Harbour function as if it is a method, if that function is ...

Looking at TDatabase of FWH1912, I don't see support for 3rd param for dbSeek(). It is the equivalent of SEEK LAST
Is this rectified in latest version of FWH?

A ver lo que he hecho para resolverlo, que no se porque ya funciona pero es lo que hecho y ha funcionado, He copiado : dbseek(transform(year(Var(4)),"9999")) He borrado todas las líneas que habia puesto para la comprobación de porque no me funcionaba, la he vuelto a poner, ...

... en en registro adecuado, por que con el el msgalert() me indica el registro y es el correcto. El problema esta en que usando tu ejemplo: etiq->(dbseek( STR(n+1,4))) //Busco el proximo año al que quiero averiguar cual nro le corresponde if etiq->(found()) -----> SIEMPRE ME DEVUELVE .F. ...

... The script for the .hbp says to use hbfoxpro.ch In it, we have this redefine: #xtranslate SEEK( <x>, <wa> ) => (<wa>)->( dbSeek( <x> ) ) Removing that file solves the compile problem. However, there are other issues and I will email you on those.

... dToday, .T. ) becomes: o:seek( dToday, .T. ) in the PPO In my application, oARhistory:seek( dBegDate, .t. ) . becomes: oARhistory:(.T.)->( dbSeek( dBegDate ) ) Clearly a #translate is active here. I have looked at: + All source code I have written + All FWH source in classes, functions, ...

... change you suggested and have the same error. I did a search of ALL .ch files in FWH, Harbour, and my program. I looked for instances of SEEK and DBSEEK There were no re-defines in any of those It is strange that clearly, as shown by the PPO, that :seek is being redefined, but just how seems to ...

Also, please comment this line in fwstd.ch

// #command SEEK <xpr> => dbSeek( <xpr> )

just in case the error comes from here

Dear Tim,

It seems as

oARhistory:seek( dBegDate, .t. )

is preprocessed into:

oARhistory:(.T.)->( dbSeek( dBegDate ) )

Please search in all your used CH files and look for dbSeek

I am seeing this:

        oARhistory := TARhistory():New( 2 )

       oARhistory:(.T.)->( dbSeek( dBegDate ) )

        while ! oARhistory:eof( )

... aadd(TablaMnu,{Orden,Tipo,Opcion,Mensaje,Accion,Imagen}) }; ,{|| !deleted() }; ,{|| !eof() })) elseif PERFILFW->(DbSetOrder(1),dbseek(cript(Usuari))) // aca lleno la tabla TablaMnu con las opciones permitidas PERFILFW->(DbEval({|| if( OpcMenu->(DbSetOrder(1),Dbseek(PERFILFW->Clave)),; ...

... in Maria Db and then also the seek command with DBF Es. Index ON COD_CLI + STR(COD_NUM,2) ... with MARIA DB .......................... CLIENT->(dbseek(COD_CLI+str(COD_NUM,2))) with MARIA DB oRS:seek(COD_CLI, COD_NUM) correct ? tia We are thinking of sorting and seek on compound expressions. ...