RE: EOF

Will the test on EOF work correctly ? Will it be on if either of the 3
files is at condition %EOF ? Do I need to check EOF for each file?

Does an indicator EOF exist for all 3 files plus another that indicates
any of the files?

Thanks!

Select
when cond1;
read file1;

when cond1;
read file2;

etc
other;
read file3;

EndSl;

IF %EOF;
etc

This will work today, but as someone pointed out, as soon as someone adds
another I/O, the routine becomes toast.

I prefer to use my own indicator. This will produce a considerably more
stable application. See the semi-pseudo code:

DoU noMoreRecords ;
Select ;
When cond1 ;
Read file1 ;
noMoreRecords = %EOF(file1) ;
when cond2 ;

Etc.
Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"Politics is not a bad profession. If you succeed there are many rewards, if
you disgrace yourself you can always write a book."
-- Ronald Reagan