Re: raporty handel amhm51pr.dat
Kod:
Limit 65535
int b = Open Katalog()+"AMHM51PR.DAT" for base "PR"
BaseError( b, 4)
SetKey( b, "id")
SetKeySeg( b, "id",0)
int err = GetRec( b, GE)
while !err
buf = GetField( b, "dane")
print buf
print lf
err = GetRec( b, NX)
wend
