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

Jerry,

My guess is that your interactive maintenance program is running in the
default activation group.  I know this can cause a problem when a service
program that it uses is reclaimed.  I think the problem is caused because
the service program is being reclaimed and the interactive program isn't
being reactivated as that is when it gets a pointer to the service program.

Scott Mildenberger

> -----Original Message-----
> From: Jerry Jewel [SMTP:jerryjewel@email.com]
> Sent: Thursday, October 03, 2002 2:43 PM
> To:   rpg400-l@midrange.com
> Subject:      How do I reclaim service program activation group and reuse
>
>
> --
>
>
> How do I reclaim a named Activation Group (AG) containing a service
> program and then reuse the service program in
>
> the same job?  Other suggestions?
>
> Here's my situation...
>
> I am working on a service program (myXrefCache) that currently runs in a
> named AG.  This service program
>
> loads/returns Cross Reference "table" information.  The specified data is
> loaded from a cross-reference database
>
> file, as needed, if not already in memory.
>
> Several batch/server programs use procedures in myXrefCache service
> program to retrieve some complex mappings.
>
> Some sample exported procedures are:  PosToSeg, PosFirstSegXItm,
> PosNextSegXItm, PosPrevSegXItm, RtvCurSegXItm,
>
> HasNexSegXItm, and so on.  Some sample local service program procedures:
> FindSegX, AddSeg, and so on.  When the
>
> cross-reference database is updated, the batch/server programs have to be
> bounced for them to see the changes.
>
> Not a problem.
>
> All the above is working well, just dandy, but here's my problem...
>
> The interactive Maintenance program that updates the database
> (myMaintXrefDB) has an option to demo/test the Cross
>
> Reference mappings.  This also utilizes the same caching service program.
> Unfortunately, I have to end my job to
>
> clean out the old cached mappings.  I'd like to be able to just run
> RCLACTGRP (Reclaim Activation Group) from the
>
> interactive job.  But this results in "MCH3402 - Tried to refer to all or
> part of an object that no longer exists"
>
> the next time I run one of the exported procedures.
>
> I don't think ACTGRP(*NEW) will help me.  I must be missing something.  My
> brain hurts.
>
> Regards,
> Jerry
>
>
> Better living through fine code and hot coffee!
> mailto:jerryjewel@email.com
>
>
>
> --
>
> --
>