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:$ CLOSE INFLE

Previous slide

Next slide

Back to first slide

View graphic version

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.