|
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 offergmagqcy.midrange@xxxxxxxxx>
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 <
wrote:that
we have several "generic prompt/select" programs ("F4 programs")
areknow
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
timeswhy)have
looking at a users job, which has been running for several hours, they
260 open data paths, and the same file is listed as being open many
QILE,in the same activation group, (and in different activation groups aswell).
we only have 3 or so named activation groups, along with *CALLER,
Openand *DFTACTGRP in our environment. However, looking at the Display
another,Files screen, I see files open from one activation group, then
affiliatethen another, then back to the first, then another, etc.programs
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
compiled as the same activation group?related questions.
--
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
Help support midrange.com by shopping at amazon.com with our
link: https://amazon.midrange.com
related
--
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
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
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
