If Program A continues to run, it will maintain the link to the original
Program B object, no matter whether you rename it or put another version
of B higher in the library list.
If program A is a 'Non LR' routine i.e. it does a RETURN statement
without setting LR then program A is still active. The next time you
call it, it will still be the same invocation of program A and it will
still call the original version of B
Once Program A finishes and shuts down with LR, or the job which is
calling Program A ends, the next time Program A is called it should
reference program B in it's new location.
Hope this helps
Dave
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Anupam
Sent: 03 April 2014 03:30
To: rpg400-l@xxxxxxxxxxxx
Subject: Wrong objects called
Hello,
I have this unique situation. Recently, we switched our LPARS and
restored all the BPCS libraries to new LPAR and activated it for users.
We have now started discovering that in some cases programs are not
making call to the objects that are on top of library list. Rather it is
making call to the object in other library, but in library list
e.g.
PgmA in lib LIB1 calls PgmB in LIB2
this is how the lib is setup
QTEMP
LIB1
LIB3
LIB2
LIB4
LIB5
If I re-compile PgmB and place object in QTEMP and then call Pgm A,
ideally PgmB from QTEMP should be picked up. But, it is not the case.
PgmA is referring to object PgmB in LIB2
I tried renaming the PgmB in LIB2 to xxPgmBx and call PgmA, but now PgmA
is referring to xxPgmBx in LIB2
I'm not sure if this is something related to any setting in BPCS or
i-Series setting
Any help on this would be greatly appreciated
Thanks
--
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.
midrange.com
