Re: Stupey service program thinks file is open -OR- %OPEN iseasi ly f

"DeLong, Eric" wrote:
> ...
> There were threads that explored this topic in depth, at one point.  I think
> some of that was distilled in the Midrange.com FAQ.
> 

It's even in the manual (ILE RPG programmer's guide):

"Reclaim Resources Command

The Reclaim Resources (RCLRSC) command is designed to free the resources
for programs that are no longer active. The command works differently
depending on how the program was created. If the program is an OPM
program or was created with DFTACTGRP(*YES), then the RCLRSC command
will close open files and free static storage.

For ILE programs or service programs that were activated into the OPM
default activation group because they were created with *CALLER, files
will be closed when the RCLRSC command is issued. For programs, the
storage will be re-initialized; however, the storage will not be
released. For service programs, the storage will neither be
re-initialized nor released.

Note: This means that if you have a service program that ran in the
default activation group and left files open (returning with LR off),
and a RCLRSC is issued, when you call the service program again, the
files will still appear to be open, so so any I/O operations will result
in an error. For ILE programs associated with a named activation group,
the RCLRSC command has no effect. You must use the RCLACTGRP command to
free resources in a named activation group."