RPG ILE and *INLR

["Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>]

AGH!  I DIDN'T CHANGE THE STUPID HEADER!

I apologize.

> -----Original Message-----
> From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
> Behalf Of Joe Pluta
> Sent: Friday, December 28, 2001 1:30 PM
> To: rpg400-l@midrange.com
> Subject: RE: Official language of midrange.com (was RE: SQL)
>
>
> Here's a question: in good old RPG III, I often used the technique of
> calling a program repeatedly without setting on LR.  I usually
> had a control
> program that, at the end of its processing, then called each of the
> subprograms and told them to shut down.  Each subprogram then seton LR and
> ended.
>
> This was excellent for performance, and at the same time cleaned up the
> subprograms between calls to the control program.
>
> In my move to RPG ILE, I'm wondering how to handle this.  I'd
> like to change
> the called programs to bound calls (CALLB), and then bind them
> all in.  If I
> do a CALLB to a program, what are the effects of *INLR?
>
> 1. If the called program does not set on LR, I assume that
> subsequent calls
> do not go through the initialization, just like in the old OPM CALL
> situation.
>
> 2. If the calling program sets on LR and then ends, does this in
> effect set
> LR on in all the called programs, clearing them from the PAG?
> That is, the
> next time I call the control program and it in turn does a CALLB to the
> subprogram, does the subprogram go through initialization again?
>
> 3. If I set on LR in a called program and it returns, does that in effect
> set on LR in the calling program?
>
> Just wondering.  I'm going to do some tests to confirm all the
> above, but I
> wondered if anyone else had run into this and could provide some insight.
>
> Joe
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.