Re: A Basic ILE Question

You're not missing something, it should have worked.

Which means what you think you did isn't what you actually did.

Either, an older version of the module was bound into the service program
(use DSPSRVPGM to see)
or the program does actually have the module bound in instead of calling the
procedure out of the service program (use DSPPGM to see).

Otherwise, perhaps your logic change is in error.

Charles

On Fri, Dec 12, 2008 at 2:35 PM, <Arthur.Marino@xxxxxxxxxxxx> wrote:

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.