|
Overrides supersede, or, well, override the specified settings. The
RPG source code specified PRDLIB but the override says 'Hey, ignore
whatever the other guy tells you. I'm telling you to use *LIBL' So
when the compiler goes looking for MYFILE, the override forces its
hand, it looks in *LIBL and MYFILE isn't there.
--buck
On 3 June 2015 at 07:32, Doug Davie wrote:
Thanks Buck.
There is an override, and that's what causes the RNF2120 in the
compile.
So now the question is why?
I've broken it down to this simple test case.
I put this in a CLLE:
ADDLIBLE PRDLIB
OVRDBF FILE(MYFILE) TOFILE(*LIBL/MYFILE)
RMVLIBLE PRDLIB
CRTBNDRPG PGM(DEVLIB/MYPGM) SRCFILE(DEVLIB/QRPGLESRC) SRCMBR(MYPGM)
where:
DEVLIB/QRPGLESRC(MYPGM) uses
DCL-F MYFILE DISK(*EXT) USAGE(*INPUT) KEYED
EXTDESC('PRDLIB/MYFILE') EXTFILE(*EXTDESC);
When I call the CLLE, I receive the RNF2120 in the compile.
So, I can understand that if I have an override to MYFILE in *LIBL,
and try to use MYFILE when it is not in the *LIBL I would get a
file not found condition.
BUT!
Shouldn't EXTDESC('PRDLIB/MYFILE') trump the override?
I would expect EXTDESC('*LIBL/MYFILE') or EXTDESC('MYFILE') to
cause the RNF2120.
But here I specifically indicate PRDLIB, and would expect the file
to be found regardless of any overrides.
As an Amazon Associate we earn from qualifying purchases.
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 copyright@midrange.com.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.