Re: Program runs once correctly, not again until signoff/signon

John,
Just a suggestion, but instead of ACTGRP(*NEW) for the RPGLE pgm, use a
named activation group. This way, the activation group is created once
when the pgm is first launched and stays active until the job ends.
With ACTGRP(*NEW), the system has to create the activation group when the
pgm starts, then destroy it when the pgm ends.


On Thu, Jun 13, 2013 at 12:15 PM, John McKee <jmmckee@xxxxxxxxxxxxxx> wrote:

CLLE is activation group *CALLER

RPGLE changed to AG *NEW. This program utilizes a service program,
which apparently has RCLRSC in it.

Works with AG *NEW on RPGLE, now. Initially RPGLE had AG *CALLER.

John McKee

On Thu, Jun 13, 2013 at 10:55 AM, DeLong, Eric <EDeLong@xxxxxxxxxxxxxxx>
wrote:

Ok, so your CLLE is running a named AG, which calls an RPGLE program

(Presumably AG *NEW), which then calls the proc (presume AG *CALLER)? I'd
suggest reviewing the RPG program to see its AG definition.

-Eric DeLong

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:

rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of John McKee

Sent: Tuesday, June 11, 2013 4:18 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Program runs once correctly, not again until signoff/signon

No.

Programs written by another person. CLLE does parameter checking,
then calls RPGLE to run a procedure. It is that procedure which is no
longer available
after one call.

John McKee

On Tue, Jun 11, 2013 at 3:52 PM, Monnier, Gary <Gary.Monnier@xxxxxxxxx>

wrote:

John,

Are you creating and deleting objects?


-----Original Message-----

On 6/11/2013 3:25 PM, John McKee wrote:

A CLLE calls an RPGLE. Works perfectly the first time. The CLLE
takes parameters. Of interest is the second, which determines what
the program does. The program has two functions. If I run it with
one function, trying to run it with the second function results in
MCH3402 "Tried to refer to all or part of an object that no longer
exists"

Log out and back in, and the function works.

Program does turn on *INLR immediately before a Return.

I have not seen this error before and do not know how to debug it.

John McKee

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
This is the RPG programming on the IBM i (AS/400 and 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.

--
Jeff Young
Sr. Programmer Analyst
--
This is the RPG programming on the IBM i (AS/400 and 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.