Re: Open/close files in an RPG module

No.

Files referenced in a module with USROPN are only closed when you
explicitly close them, or the activation group and/or job ends.

Is this module bound into the *PGM or a *SRVPGM.

If a *SRVPGM, does the *SRVPGM by chance have ACTGRP(*NEW) specified?

Charles


On Fri, Aug 22, 2008 at 9:54 AM, Mike Cunningham <mcunning@xxxxxxx> wrote:

We have a module that we bind into multiple programs that needs to open a file to do it's job. One of the applications that uses this module reads through a 10,000+ record file and calls the module. The module has USROPN on the files needed and does a test to see if the file is open using NOT %OPEN and will open it if needed. It never closes the files. The journals for this application show that the file used in the module is being opened/closed for every record processed. The module does not reference *INLR at all. Do modules, by deault, always close their files when the RETURN is executed?
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.