Using nullrd

[Baxajaun]

Good afternoon !

I'm trying to use Harbour's nullrdd with FWH. I've created a prg called NoRdd.prg

Code: Select all  Expand view

//NoRdd.prg
// Funciones dummy para FWH para no usar RDDs

FUNCTION DBInfo()
RETURN NIL

FUNCTION FieldType()
RETURN NIL

FUNCTION FieldLen()
RETURN NIL

FUNCTION FieldDec()
RETURN NIL

FUNCTION __DbSkipper()
RETURN NIL

FUNCTION OrdKeyRelPos()
RETURN NIL

FUNCTION OrdSetFocus()
RETURN NIL

FUNCTION OrdKeyGoto()
RETURN NIL

FUNCTION OrdKeyNo()
RETURN NIL

FUNCTION OrdKeyCount()
RETURN NIL

FUNCTION OrdBagName()
RETURN NIL

FUNCTION DbRecordInfo()
RETURN NIL

FUNCTION DbRunLock()
RETURN NIL

FUNCTION OrdKeyVal()
RETURN NIL

FUNCTION OrdWildSeek()
RETURN NIL

FUNCTION DbClearFilter()
RETURN NIL

FUNCTION DbSetFilter()
RETURN NIL

FUNCTION OrdNumber()
RETURN NIL

FUNCTION OrdDescend()
RETURN NIL

FUNCTION OrdCount()
RETURN NIL

FUNCTION DbrLockList()
RETURN NIL

FUNCTION DbCommit()
RETURN NIL

FUNCTION OrdCondSet()
RETURN NIL

FUNCTION OrdCreate()
RETURN NIL

FUNCTION __DbLocate()
RETURN NIL

FUNCTION OrdSkipRaw()
RETURN NIL

FUNCTION DbFilterBlock()
RETURN NIL

But i've this error

Code: Select all  Expand view

f:/develop/ccompilers/winlibs/1032/mingw32/bin/../lib/gcc/i686-w64-mingw32/10.1.0/../../../../i686-w64-mingw32/bin/ld.exe: F:\Develop\FWH\LIB\FiveHG.lib(DBFFUNC2.o):DBFFUNC2.c:(.text+0x2d5): undefined reference to `hb_rddGetCurrentWorkAreaPointer'

Any idea ?

Best regards

[Antonio Mart.]

Enlaza hbnulrdd.lib

https://github.com/harbour/core/blob/ma ... s/Makefile

https://github.com/harbour/core/blob/ma ... s/nulsys.c

[Baxajaun]

Hi Antonio,

thanks for answering, but this lib is linked. It is a FWH problem, when you link your application with FWH libs allways use a RDD.
Problem is in source\functions\dbffunc2.prg.

Best regards,

[Antonio Mart.]

Supongo que metiendo la funcion en un pragma te funcione. No se si los parametros de entrada son correctos.

int hb_rddGetCurrentWorkAreaPointer( void )
{
return 0;
}

[Baxajaun]

Thanks, but that doesn't fix the error.

[Antonio Linares]

Felix,

If you can't solve it linking nulrdd then I am afraid that there is no way to get that using FWH

Rdds use is very much related inside FWH libraries, so it is not an easy way to avoid it.

[nageswaragunupudi]

Please add this to nordd.prg

Code: Select all  Expand view

#pragma BEGINDUMP
int hb_rddGetCurrentWorkAreaPointer()
{
   return 0;
}
#pragma ENDDUMP
 

This will solve this error

But i've this error
Code:
f:/develop/ccompilers/winlibs/1032/mingw32/bin/../lib/gcc/i686-w64-mingw32/10.1.0/../../../../i686-w64-mingw32/bin/ld.exe: F:\Develop\FWH\LIB\FiveHG.lib(DBFFUNC2.o):DBFFUNC2.c:(.text+0x2d5): undefined reference to `hb_rddGetCurrentWorkAreaPointer'

[Baxajaun]

Thanks Mr. Rao !

I want to build a Harbour/FWH application without any database rdd, is it possible ?

TIA!

Best regards,

[nageswaragunupudi]

I can not say anything now.
Looks very difficult.
I will keep this in mind.

[Baxajaun]

Mr. Rao !

Thanks again,

King regards,