I don't like it.

Consider SRVPGM1, made of MOD1 & MOD2

PGM1 made of MOD3 & MOD4, that will need to call procedures from SRVPGM1 (MOD1).

If you MODDIR contains

And your SRVPGMDIR contains

When you create PGM1, if you happen to specify BNDDIR(SRVPGMDIR:MODDIR), then PGM1 will end up with
MOD1 bound by copy instead of by reference.

Having specific *BNDDIR for a PGM/SRVPGM containing just the modules for that PGM/SRVPGM as Barbara
suggests isn't a really maintenance issue. The only time you'd need to maintain it would be if you
decided to add another module to the PGM/SRVPGM. Which doesn't happen often for PGM, slightly more
often for SRVPGM, but still not a big deal.

Charles Wilt
Software Engineer
CINTAS Corporation - IT 92B


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Mark S. Waterbury
Sent: Thursday, August 07, 2008 2:36 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Question about service programs

How about this?

For each unique application, create one binding directory for all
*MODULEs that ever need to be "bound by copy" (call it MODULES) and one
binding directory listing all *SRVPGMs (call it SRVPGMs).

Then, refer to either the MODULES or SRVPGMS, or both, as needed, either
in the H-spec via the BNDDIR parameter, for ILE RPG IV, or via the
CRTxxx command, or using the technique of "embedded" commands in the
source, such as with Alan Campin's COMPILE command, for all other ILE

Creating many separate binding directories, one for each *PGM or
*SRVPGM, only creates additional objects (of type *BNDDIR) that also
need to be maintained.

That's my opinion. What do you think?
This is the RPG programming on the AS400 / 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.

This e-mail transmission contains information that is intended to be confidential and privileged. If you receive this e-mail and you are not a named addressee you are hereby notified that you are not authorized to read, print, retain, copy or disseminate this communication without the consent of the sender and that doing so is prohibited and may be unlawful. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please delete and otherwise erase it and any attachments from your computer system. Your assistance in correcting this error is appreciated.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 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 [javascript protected email address].