Re: Sanity check: RTVOBJD *LIBL/ABCMONRG RTNLIB(&LIBNAM), then CALL &LIBNAM/ABCMONRG???

[Charles Wilt <charles.wilt@xxxxxxxxx>]

Possibly the original developer thought a CL CALL command worked like
RPG's.  Assuming that this is called repeatedly (in a loop possibly) and
that the LIBL could change between calls...

But a CL CALL is always dynamic, and always resolves the name at run time
AFAIK.

Charles

On Tue, Feb 4, 2025 at 9:27 PM Dan Bale <dan.bale@xxxxxxxxxxxxxxxxxxxxx>
wrote:

> Code snippet of a production CLP program I am currently modifying:
>
> DCL        VAR(&LIBNAM) TYPE(*CHAR) LEN(10)
> RTVOBJD    OBJ(ABCMONRG) OBJTYPE(*PGM) RTNLIB(&LIBNAM)
> CALL       PGM(&LIBNAM/ABCMONRG)
>
> Is there *any* scenario where "CALL ABCMONRG" without the first two
> statements doesn't always call the program from the same library?
>
> &LIBNAM is not used anywhere else in the program.
> There are no intervening statements between the RTVOBJD and CALL commands.
>
> There is enough complexity in other parts of the program that tells me the
> original programmer was no dummy.  Am I the dummy?
> *** CONFIDENTIALITY NOTICE: The information contained in this
> communication may be confidential, and is intended only for the use of the
> recipients named above. If the reader of this message is not the intended
> recipient, you are hereby notified that any dissemination, distribution, or
> copying of this communication, or any of its contents, is strictly
> prohibited. If you have received this communication in error, please return
> it to the sender immediately and delete the original message and any copy
> of it from your computer system. If you have any questions concerning this
> message, please contact the sender. ***
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/midrange-l.
>
> Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> questions.