Re: AW: program won't let go of file

["Mark S. Waterbury" <mark.s.waterbury@xxxxxxxxxxxxx>]

 Hi, David:

Compiling an ILE *PGM with ACTGRP(*CALLER) when you know it will be 
called from an OPM *PGM (e.g. your CLP *PGM) means it will end up 
running in the *DFTACTGRP -- IBM recommends against doing that precisely 
because it cannot be reclaimed with RCLRSC in that case. (Search the 
archives; there are many discussions of this to be found.)

A big reason for ACTGRP(*DFTACTGRP) was to provide a way that customers 
could begin using RPG IV to upgrade their existing RPG III programs, and 
to start taking advantage of many features and improvements in RPG IV, 
without having to convert everything into "pure" ILE first.

Hope that helps,

Mark S. Waterbury

> On 9/7/2010 11:12 AM, David FOXWELL wrote:
> > -----Message d'origine-----
> > De : rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Mark S. Waterbury
> > Envoyé : mardi 7 septembre 2010 16:55
> > À : RPG programming on the IBM i / System i
> > Objet : Re: AW: program won't let go of file
> >
> >    Hi, Birgitta:
> >
> > What you describe for the behavior of LR in RPG IV is true
> > when the RPGLE program was *not* compiled with:
> >
> >       CRTBNDRPG ... ACTGRP(*DFTACTGRP)
> I was just going to reply to Birgitta. I've tried coding PGM5 so it always returns with LR on and then I no longer have the file open.
> Now I am confused.
>
> We use crtpgm actgrp(*caller) with the first caller always in *dftactgrp. Could that make it behave differently? I will try CRTBNDRPG PGM5 ACTGRP(*DFTACTGRP)