RE: How do I reclaim service program activation group and reuse

I believe your problem is that you have killed the activation group of the
service program so it no longer exists but your interactive/demo program
doesn't get reinitialized so it never reactivates the service program so
it's old pointer to the old activation of the service program is no longer
any good.  I would echo what others are saying about having a reinitialize
procedure in the service program.  Or, go change something that will trigger
the auto-reinitialize that you already have built in.

Scott Mildenberger

> -----Original Message-----
> From: Jerry Jewel [mailto:jerryjewel@email.com]
> Sent: Friday, October 04, 2002 10:37 AM
> To: rpg400 list
> Subject: Re: How do I reclaim service program activation
> group and reuse
>
>
> Here is a recap of the activation groups in play:
>
>
> Copy/paste from DSPPGM of my interactive database maint program...
> Activation group attribute . . . . . . . . . . :   *NEW
>
>
> (...which CALL's the interactive demo/test program upon
> hitting F14...)
>
>
> Copy/paste from DSPPGM of my interactive demo/test program...
> Activation group attribute . . . . . . . . . . :   QILE
>
>
> (...which 1) executes my service program procedure that
> reclaims my service program activation group (via CEETREC)
> upon hitting ENTER, then 2) trys to execute a PosToSeg
> procedure in my service program, then 3) fails because the
> demo/test program is apparently looking for the service
> program where it was before the reclaim...)
>
> Copy/paste from DSPSRVPGM of my XRefCache service program...
> Activation group attribute . . . . . . . . . . . :   XREF
>
>
> Do I have to do a reclaim of the XREF named AG and then the
> QILE named AG?
>
>
> On explictly reloading my XRefCache or setting a flag to
> reload it on next use...  I was hoping to not have to go
> there for reasons that are... well... er... I'd like to say
> are "the principle of the thing", but probably boil down to
> "I'm tired".
>