RE: usropn files and service programs

["Alan G. Campin" <agc@xxxxxxxxxxxxxxxxxxxx>]

> > openfiles(); 

> > dow (xxx);
   ...
> >   action();
   ...
> > enddo;

> > closeFiles();

The only thing that I do different is that I do not use an open file. I
simply do a %Open in the program, and if the file is not open, I open
it. 

You can, also, just use a logical flag and if Not True, open your files.


The only other way I know to handle closes is to hook an activation
group ending and when you see this, close the files.