Warum so schrierig,

Jede DB-Datei hat eine relative Satznummer (rrn - relativ record Number), die von der AS/400-Datenbank automatisch vergeben wird, egal ob die Datei geschlüsselt ist oder nicht. Warum verwendest Du nicht diese rrn.

In SQL:
select rrn(a) from lib/table a

In RPG kann man bei Dateidefinition ohne Key direkt auf diese releatve Satznummer zugreifen. Beim sequentiellen Lesen wird diese in spezifischen Dateiinformationsstruktur zurückgeliefert.