last record by key

[Gabriel]

Is there any easy fast way to read the last record in a file by key??

[Susan Smith]

It's been years since I've needed to do this, but can't you just:

READ #fileno1,using form$(fileno),LAST:mat f$,mat f

If you want to traverse the entire file backwards;

RESTORE #fileno,LAST:
Loop:
READ #fileno,using form$(fileno),PRIOR:mat f$,mat f
...

-- Susan