Příklady: Krokování v databázi

{ Zobrazte podle jména zaměstnance osobního oddělení } 
StepIdx(dbtO, oJmeno);
if _StartDB(dbtO) then
  repeat
    PrintLn(O[oJmeno]:25)
  until _StepRec(dbtO, 1)=False); 
endif