im mir vorliegenden Code habe ich eine Funktion gefunden die einen interessanten Namen hat und aus der ich aber trotz Kürze nicht schlau werde.
Vielleicht hat jemand eine Idee wofür das gut sein soll?
Code: Alles auswählen
*****************
function Fpos_bug
*****************
local Mrel:=DbRSelect(1),;
Mselect
if Mrel#0
Mselect:=select()
select (Mrel)
if .not. eof()
DbGoto( recno())
endif
select (Mselect)
endif
return (NIL)