× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



This is such a badly written piece I would not be confident in saying no,
except that it has >appeared< to have worked correctly within the two
environments over the years.

John McKee


On Tue, Sep 17, 2013 at 9:22 AM, Norm Dennis <nhdennis@xxxxxxxxxxx> wrote:

Are there any calls to other programs, from your modified program, which
may
in turn change the library list?


Norm Dennis

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of John McKee
Sent: Tuesday, 17 September 2013 10:00 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: 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.


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



-----
No virus found in this message.
Checked by AVG - www.avg.com
Version: 2013.0.3408 / Virus Database: 3222/6671 - Release Date: 09/16/13

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



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.