RE: *INLR and *SRVPGM

["DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx>]

A service program itself has no concept of the cycle.  Therefore, it cannot
know that it needs to clean itself up when the caller terminates.  *INLR
means nothing to a *nomain program.  That's where activation groups come in
to play.  When the activation group is destroyed, then resources are freed.


I would compile the application (not the service program) as ACTGRP(*NEW)
and see if this corrects the problem you're having.  This topic has been
covered many times, and the FAQ has many tips and pointers for the
newcomers.  There's a lot of help to be had in the archives too.  Good luck.

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: ile rpg [mailto:ile_rpg_guy@xxxxxxxxxxx]
Sent: Saturday, February 21, 2004 9:24 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: *INLR and *SRVPGM


   Using V5R1, I compile a service program using ACTGRP(*CALLER).  When I
   call an application program (also in *CALLER), I access the service
   program, set *INLR on in the *SRVPGM, and return...but the files remain
   open (I have file closes in the *SRVPGM but not executed).  When I close
   the files, everything works as expected.  I suspected *INLR would have
   closed the files, or has the activation group boat departed without me?
    
   -irg

     ----------------------------------------------------------------------

   Watch high-quality video with fast playback at MSN Video. Free!
_______________________________________________
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.