RE: override scope in a procedure

Charles,

Yeah, I know that it's best not to use the default activation group, and that bad things can happen. It's just that Dftactgrp(*no) actgrp(*caller), when the caller is in the default activation group, seemed like a loop. Sort of like the instructions on shampoo bottles: Lather, rinse, repeat.

I guess IBM put in "That's the dumbest thing I've seen today" error checks for these kinds of things.

Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Charles Wilt
Sent: Monday, October 13, 2008 8:19 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: override scope in a procedure

Nope, it will run. You'll simply be running an ILE program in the
default activation group.

This can lead to what is technically known as "bad things".

For example, RCLRSC doesn't correctly handle the resources of a ILE
program in the default activation group. If I remember correctly, the
program's files get closed but the program remains active and as far
as the program knows, its files are still open.

HTH,
Charles

On Mon, Oct 13, 2008 at 8:39 AM, Jerry Adams <Jerry@xxxxxxxxxxxxxxx> wrote:

Jon,

A curiosity question: If one calls an RPG IV program with compile options of Dftactgrp(*no) actgrp(*caller) from an RPG II program (which, of course, runs in the default activation group), would the RPG IV program blow off - or what?

Thanks.

Jerry C. Adams
IBM System i Programmer/Analyst
B&W Wholesale
office: 615-995-7024
email: jerry@xxxxxxxxxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jon Paris
Sent: Friday, October 10, 2008 12:34 PM
To: Rpg400 Rpg400-L
Subject: Re: override scope in a procedure

On 10-Oct-08, at 12:41 PM, rpg400-l-request@xxxxxxxxxxxx wrote:

Yes the program was compiled with Dftactgrp(*no) actgrp(*caller). It
is running in the default activation group. We will probably be in
"compatibility mode" for a long time.

I hope I'm not being overly pedantic, but I think it is important to
note that you are NOT running in compatibility mode. You are
running real ILE programs in the default Activation Group - and that
is not the same thing at all.

Compatibility mode was designed to make RPG IV programs run safely
alongside OPM programs in the default AG and is specified by
DFTACTGRP(*YES).

Running real ILE programs in the default AG is just an accident
waiting to happen. If you want to know why, search the archives for
"seven deadly sins of ILE" and you'll find the discussion and link
to the article of that title.

Jon Paris

www.Partner400.com
www.SystemiDeveloper.com

--
This is the RPG programming on the AS400 / 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 AS400 / 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 AS400 / 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.