COBOL kennt diese Art der Funktionalität überhaupt nicht:

START MYFILE KEY IS NOT > EXTERNALLY-DESCRIBED-KEY
INVALID ...
END-START

READ NEXT MYFILE
AT END ...
END-READ

Die Schlüsselfelder sind dann nur entsprechend zu füllen.