Re: ILE, Activation groups, and files staying open.

This program had DFTACTGRP(*NO) ACTGRP('PRMPOLOG') // the program name
was the actgrp name...

now, this program does many CALLS (prototype calls), and I would guess
that some of those may indeed be *CALLER or *DFTACTGRP,
and looking upstream, there may be programs calling this prompt handling
program that are *CALLER or *DFTACTGRP.

I just did a scan on our RPG programs, and I do have 46 programs that have
DFTACTGRP(*NO) ACTGRP(*CALLER)



On Wed, Jun 2, 2021 at 3:17 PM Mark Waterbury <
mark.s.waterbury@xxxxxxxxxxxxx> wrote:

Gerald,

With "ILE" the old saying "A little knowledge is a dangerous thing" comes
to mind.

What is specified for ACTGRP when the "free standing" programs are created
... was it
ACTGRP(*CALLER)? If it is *CALLER they can get activated into many
different activation groups, probably NOT what you intended ...

What was specified for DFTACTGRP? *YES or *NO?

*INLR does not necessarily do what you think it does, depending on answers
to the above. If DFTACTGRP(*NO) was specified, and ACTGRP(*CALLER) was
specified, then *INLR is probably almost "useless."

A "quick fix" might be to create a new named activation group,
ACTGRP(FREESTND), and ensure all the "free-standing" programs are created
with that activation group specified. That way, they should all stay there,
rather than getting copies activated all over the place.

Worst case is when ACTGRP(*CALLER) programs get invoked in the
*DFTACTGRP... then you have much bigger problems to deal with!

Hope that helps,

Mark S. Waterbury








On Wednesday, June 2, 2021, 04:00:42 PM EDT, Gerald Magnuson <
gmagqcy.midrange@xxxxxxxxx> wrote:





the prompt programs are free standing rpgle programs. they seton LR
before each return statement, and at the bottom of the main line.



On Wed, Jun 2, 2021 at 2:56 PM Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

I'd need to know more about the actual call sequence to be able to offer
any real suggestions. Also are you using free-standing programs as the
helpers in that separate AG or are these Service Program routines. If
programs do they set on LR or ... ??


Jon Paris

On Jun 2, 2021, at 3:06 PM, Gerald Magnuson <

gmagqcy.midrange@xxxxxxxxx>

wrote:

we have several "generic prompt/select" programs ("F4 programs") that

are

called to allow a user to select a value, and return it back to it's
calling program. Currently it is in its own activation group (don't

know

why)

looking at a users job, which has been running for several hours, they

have

260 open data paths, and the same file is listed as being open many

times

in the same activation group, (and in different activation groups as

well).

we only have 3 or so named activation groups, along with *CALLER,

QILE,

and *DFTACTGRP in our environment. However, looking at the Display Open
Files screen, I see files open from one activation group, then another,
then another, then back to the first, then another, etc.

Questions (sorry, I am just not understanding ILE...):
As we enter these prompt programs, exit, and later return to them,
shouldn't the opens be reused, and not opened again?
Is this a symptom of us having a mix of named, QILE, *CALLER, and
*DFTACTGRP programs?
Would I not have as many open data paths if we had most ALL of our

programs

compiled as the same activation group?
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related questions.

Help support midrange.com by shopping at amazon.com with our affiliate

link: https://amazon.midrange.com

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com