Re: RPG-ILE Service Pgm and Opening/Closing Files

[Adam Glauser <adamglauser@xxxxxxxxxxxx>]

rob@xxxxxxxxx wrote:
> I think his question was why not just do a 
> if %open(myfile);
>   close myfile;
>
> instead of 
> open myfile;
> myfileOpen=*on;
> ...
> if myfileOpen;
>   close myfile;

You've missed an important point in David's code.  He has
if not %open();

before opening the file.  If I followed him correctly, the idea is that 
if another procedure in the module already had the file open, the file 
should not be closed when this procedure finishes.

To put it another way, %open() is local to the module, but the 
myfileOpen flag is local to the procedure.