File I/O - READ Loops
$ OPEN/READ INFLE MYFILE.DAT
$READ_LOOP:
$ READ/END=EOF_INFLE INFLE P9
$ statement(s)
$ GOTO READ_LOOP
$EOF_INFLE:
Previous slide
Next slide
Back to first slide
View graphic version
Notes:
Here’s an example of a loop to read a file and process its records.
The /END_OF_FILE qualifier is used to direct control to the “EOF_INFLE” label at end of file.