Have you reclaimed the activation group? For me, when the behavior
doesn't change during a test, it usually means the old version is still
activated in that job. Reclaiming the activation group and/or invoking
the changed *SRVPGM in a new job activates the new version.
HTH,
Roger Mackie
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Arthur.Marino@xxxxxxxxxxxx
Sent: Friday, December 12, 2008 1:36 PM
To: RPG programming on the IBM i / System i
Subject: A Basic ILE Question
Hi All,
I was just surprised to find that, after changing and re-compiling my
*SRVPGM (where I changed only the logic, not the signature), the calling
program did NOT invoke the new *srvpgm procedure. (I was in debug and
set breakpoints in both the caller and at the first *srvpgm statement.)
In other words, it ran as if the procedure had been bound by copy.
I thought that *srvpgm modules were bound by reference to the caller and
that meant that, as long as I don't change the procedures' signatures,
the caller should invoke the new *srvpgm code without needing to
re-compile the caller (which hasn't changed). If this is the way it
works, what's the benefit of bind by reference. Or am I missing
something?
These are my compile statements:
CRTRPGMOD MODULE(RSLIB/RSSRVPGM) SRCFILE(RSLIB/QRPGLESRC) DLTSRVPGM
SRVPGM(RSLIB/RSSRVPGM) CRTSRVPGM SRVPGM(RSLIB/RSSRVPGM) EXPORT(*SRCFILE)
SRCFILE(RSLIB/QSRVSRC) TEXT('Rollstock - Service program')
BNDDIR(SOUTHERN/SCBNDDIR)
ACTGRP(*CALLER)
DLTMOD MODULE(RSLIB/RSSRVPGM)
Also, as long as we're at it, there's 20 bucks in it for anyone who can
tell me how you create/maintain the WDWTITLE field in SDA. I can't find
it anywhere. Was it added after IBM stopped enhancing SDA?
Thanks.
Arthur J. Marino
RockTenn Corporation
--
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.
midrange.com
