Xbase++ : DBPOSITION(), DBGOPOSITION()

[AUGE_OHR]

hi

now i have reduce Error to

hbmk2: Error: Referenced, missing, but unknown function(s): THREADINFO(),
ISMETHOD(), XBPEXCEPTION(), DBPOSITION(), DBGOPOSITION(), FEXISTS(),
SETLOCALE(), ISMEMBERVAR(), RANDOMINT(), GRAGRADIENT()

DBPOSITION(), DBGOPOSITION() are used for XbpBrowse which is a GUI TBrowse.

Code: Select all

  oBrowse := XBPBROWSE() :new( oParent,, aPos, aSize, aPP3 )
   oBrowse :create()

   // like TBrowse
   oBrowse:skipBlock := { | n | DbSkipper( n ) }
   oBrowse:goTopBlock := { | | DBGOTOP() }
   oBrowse:goBottomBlock := { | | DBGOBOTTOM() }
   oBrowse:phyPosBlock := { | | RECNO() }

   // for verticalen Scrollbar
   oBrowse:posBlock := { | | DbPosition() }
   oBrowse:goPosBlock := { | n | DbGoPosition( n ) }
   oBrowse:lastPosBlock := { | | LASTREC() }
   oBrowse:firstPosBlock := { | | 1 }

as you see it is "just" for verticalen Scrollbar Position.

DbPosition() --> nPercent // 1 - 100 %
DbGoPosition( <nPercent> ) --> NIL

it is when use Scrollbar to navigate to new Position.
is there a equivalent in harbour

[AUGE_OHR]

hi,

i think Sixdrive have

Code: Select all

Sx_KeyCount()
Sx_KeyNo()
Sx_KeyGoto()

so i'm search how to do it with NTX, CDX ... or SQL (using Row_Number() => PgSql v.9x ) to get a vertical Scrollbar working.

[AUGE_OHR]

hi,

found in c:\hmg.3.4.4\HARBOUR\include\harbour.hbx

Code: Select all

ordKeyCount()
ordKeyGoto()
ordKeyNo()
ordKeyRelPos()

not sure about 3rd and 4th
i guess it depend if FILTER or SCOPE is set.

found "dbFilter" and "hb_dbGetFilter" ... which to use

[apais]

dbFilter is 100% clipper compatible
hb_ are harbour extentions