Re: File opens in RPG III

Yes, it does. I am not sure I understand why this is messed up, but here
goes:

The program references to all the multitude of other programs use *LIBL.
Same thing for the multiple data areas.

All the files are referencing a specific library - the production library.
The program I started with which has a display file mostly references files
in the test environment.

Why would either program work correctly? The program requiring operator
intervention has no OVRDBFs, and neither does mine. I have not checked all
the files. But, I have checked a couple, and they exist in both
environments.

Or, does DSPPGMREF only show how program was compiled?

John McKee


On Mon, Sep 16, 2013 at 11:13 PM, Roger Harman <roger_harman@xxxxxxxxxxx>wrote:

Does DSPPGMREF shed any light?

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of John McKee
Sent: Monday, September 16, 2013 8:27 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: File opens in RPG III

Thanks for reassurance. No UC. No OVRDBF. Maybe something will make
sense
tomorrow.

John McKee


On Mon, Sep 16, 2013 at 9:59 PM, Glenn Gundermann <ggundermann@xxxxxx

wrote:

Hi John,

The library list is used provided there is no override and the F-spec
doesn't specify a library.

A file override doesn't necessarily have to take place in the calling
CL program. The RPG could do the override using QCMDEXC (or similar)
or it could call another program that does an override before it opens

the
file.

Is there a command involved that calls the CL? DSPCMD <command-name>
will show a Current Library and a Product Library.

Could your file(s) in question have a trigger program?

I can't think of anything else at the moment.

Hope this helps.

Glenn Gundermann


Subject: File opens in RPG III
From: "John McKee" <jmmckee@xxxxxxxxxxxxxx>
Date: Mon, September 16, 2013 8:27 pm
To: "RPG programming on the IBM i / System i" <rpg400-l@xxxxxxxxxxxx>
Priority: Normal

I have spent a lot of time trying to modify this vendor program. It
is used to set flags and submit an end-of-day job. We never modify
the parameters it presents on screens. So, purpose is to just have
this

thing

get fired off by the job scheduler for an unattended end-of-day. It
does a lot of questionable stuff, and I am not convinced I have
found all the weirdness buried in this thing.

A CL calls it. I have specifically added libraries to the library

list.

If it is a test run, I add test libraries in front of anything else.
I also change the current library for either production or test.

Testing it today, using the test libraries, and I verified the
library list is correct, the RPG program updated a file in the
production environment, despite that same file existing higher in
the library list (lower number).

I thought that the library list was used when RPG opens files. The
original CL has no OVRDBF commands to change anything. Yet, here I
have

a

production file getting changed.

I have to ask a really stupid question: Am I correct that the
library list is used to locate files when RPG opens them? There is
no ILE in this thing.

Thanks for any assistance.

John McKee

--
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.

--
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.


--
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.