Re: RPG II Program Reference Issue

Let's board the Wayback machine for a trip down RPG II (not my choice, just
my job).



I'm doing maintenance on a couple of programs which have the same name in
separate libraries. I copied the source for one into my project library as
"GL0211" and the other one as "GL0211OE" and compiled each. Both programs
use a workstation file named GL0211FM (FGL0211FMCP F 1920
WORKSTN) there are no continuation lines in the F-specs.



When I push them to my test libraries I use the CRTDUPOBJ command such that
GL0211OE gets created as GL0211 (no CMS here). The CL to do the push is:



RMVM FILE(&OE/QS36SRC) MBR(GL0211)

CPYSRCF FROMFILE(PROJ0055/QS36SRC) +

TOFILE(&OE/QS36SRC) FROMMBR(GL0211OE) +

TOMBR(GL0211)

DLTPGM PGM(&OE/GL0211)

CRTDUPOBJ OBJ(GL0211OE) FROMLIB(PROJ0055) +

OBJTYPE(*PGM) TOLIB(&OE) NEWOBJ(GL0211)



where &OE represents the library (in this case a test library).



When I tried to test this program, though, I got an error:



RPG9027 Options ( 23F)

Attempt to open file GL0211FM failed.



A higher-level message is:



File GL0211OEFM in library *LIBL not found



Notice the name. I did a DSPPGMREF on the program in both the project and
test libraries (after the push), but they both show:



Object . . . . . . . . . . . . . . . . . . : GL0211FM

Library . . . . . . . . . . . . . . . . . : *LIBL

Object type . . . . . . . . . . . . . . . : *FILE

File name in program . . . . . . . . . . : GL0211FM

File usage . . . . . . . . . . . . . . . : Input

Output



Does anyone have the faintest idea why the program is trying to find
GL0211OEFM instead of the GL0211FM as defined in the program? Other than
possibly using an OVRDSPF in the OCL procedure, which may or may not work,
is there any way to overcome this issue? I did think about putting the
second program (GL0211OE) into a separate project library and using its real
name. Is that my only option? More than anything I'm trying to understand
why the program is looking for a file that it does not even reference (see
above).



Thanks.



Jerry C. Adams

IBM i Programmer/Analyst

--

A&K Wholesale

Murfreesboro, TN

615-867-5070



--
This is the RPG programming on the IBM i / System i (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.