Re: File opens in RPG III

[John McKee <jmmckee@xxxxxxxxxxxxxx>]

Recompiled program.  NO optimization, LSTDBG.

STRDBG update production files, OPMSRC(*YES)

Set breakpoints on every UPDAT.

Stopped on one.  Did F21, DSPLIBL.  Only TST libraries in library list.
Production file modified.

Program ended, and still library list shows only test libraries.

Now what?

The job was submitted to a job queue in the test environment.  I do not
understand this at all.

John McKee


On Tue, Sep 17, 2013 at 9:34 AM, Voris, John <john.voris@xxxxxxxxxxxxx>wrote:

>  On 9/16/2013 10:26 PM, John McKee wrote:
>  > Thanks for reassurance.  No UC.  No OVRDBF.  Maybe something will
>  > make sense tomorrow.
>  > John McKee
>
> Other things to check:
>
> Is CHGCURLIB being used ?  That will put a different library at the top of
> the library list.
> Using DSPLIBL will show this in the Liblist stack.  (It may pay to put a
> DSPLIBL before the RPG call.)
>
> Here is another thing that can get your liblist out of whack.
> See if your program is being invoked by any custom commands.
>
> It might be you are running your bad-RPG within a custom command, which
> was compiled with the keywords NOT being the defaults below.
> (A DSPCMD will show you this)
> Current library  . . . . . . . . CURLIB         *NOCHG
> Product library  . . . . . . . . PRDLIB         *NOCHG
>
> These keywords are for when you build a command that calls a CL and then
> other RPG pgms.
> The builder doesn't want to qualify the subsequent calls, so in building
> the command, he specified the name of the "utility" library where the other
> pieces needed can be found.
> The Product Library is where the command finds the the subsequent pgms -
> and it does this by doing just what CHGCURLIB does - - putting the library
> at the top.
>
> Could that be how your libist is getting whacked ?
>
> - John V.
>
>
> --
> This is the RPG programming on the IBM i (AS/400 and 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.