|
Wilt, Thanks for looking into this! Here's the PR for Mod2... // copy to QTEMP of source file D BuildQTEMP PR EXTPGM('FTP01C') D 10a CONST D 10a CONST D 10a CONST Here's how I call it... // Place copy of source file in QTEMP BuildQTEMP(Library:File:Member); Mod2 is a CL - Maybe that's my problem? - Here's the CL... PGM PARM(&LIBRARY &FILE &MEMBER) DCL VAR(&LIBRARY) TYPE(*CHAR) LEN(10) DCL VAR(&FILE) TYPE(*CHAR) LEN(10) DCL VAR(&MEMBER) TYPE(*CHAR) LEN(10) Thanks Jeff Stevens Mize, Houser & Co. P.A. 913 451 1882 JStevens@xxxxxxxxxxxxxx "Wilt, Charles" <CWilt@xxxxxxxxxxxx> Sent by: rpg400-l-bounces@xxxxxxxxxxxx 06/28/2005 12:01 PM Please respond to RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> To "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx> cc Subject RE: Binding Directory doesn't include all modules? Are you sure about that? The CRTPGM should have failed if Mod2 was needed and wasn't being bound in. What does you prototype in Mod1 look like for the procedure you think you are calling in Mod2? Charles Wilt -- iSeries Systems Administrator / Developer Mitsubishi Electric Automotive America ph: 513-573-4343 fax: 513-398-1121 > -----Original Message----- > From: rpg400-l-bounces@xxxxxxxxxxxx > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of > jstevens@xxxxxxxxxxxxxx > Sent: Tuesday, June 28, 2005 12:56 PM > To: RPG programming on the AS400 / iSeries > Subject: RE: Binding Directory doesn't include all modules? > > > Makeing a call from Mod1 to Mod2. Not making any calls from Mod2. > > > Jeff Stevens > Mize, Houser & Co. P.A. > 913 451 1882 > JStevens@xxxxxxxxxxxxxx > > > > > > "Wilt, Charles" <CWilt@xxxxxxxxxxxx> > Sent by: rpg400-l-bounces@xxxxxxxxxxxx > 06/28/2005 11:53 AM > Please respond to > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> > > > To > "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx> > cc > > Subject > RE: Binding Directory doesn't include all modules? > > > > > > > Jeff, > > Are you actually calling any procedures in Mod2? > > It won't be bound into the program unless it is being used. > > Charles Wilt > -- > iSeries Systems Administrator / Developer > Mitsubishi Electric Automotive America > ph: 513-573-4343 > fax: 513-398-1121 > > > > -----Original Message----- > > From: rpg400-l-bounces@xxxxxxxxxxxx > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of > > jstevens@xxxxxxxxxxxxxx > > Sent: Tuesday, June 28, 2005 12:23 PM > > To: rpg400-l@xxxxxxxxxxxx > > Subject: Binding Directory doesn't include all modules? > > > > > > I've just read through the 2001 thread "Binding Directories", > > and I think > > I understand how binding directories should work. > > > > Here's my issue, > > > > I have 2 modules, Mod1, Mod2 and want to bind them together using a > > binding directory. Mod1 has the BNDDIR(Library/Pgm1) in the > > H spec. Then > > I've created a binding directory called Pgm1, and added > > entries of Mod1 > > and Mod2. > > > > When I do a CRTPGM PGM(LIB/Pgm1) MODULE(LIB/Mod1), I > > get a program > > with just Mod1 in it. However, I was thinking that because > > of my H spec > > with the binding directory, I would get a program with Mod1 & > > Mod2 in it. > > > > Of, course, I could do a CRTPGM PGM(LIB/Pgm1) MODULE(lib/Mod1 > > lib/Mod2), > > and get a program with both modules in it, but I wanted to > > use the BNDDIR > > H spec keyword. > > > > There are no service programs involved here. Am I missing > something? > > > > Thanks > > > > Jeff Stevens > > Mize, Houser & Co. P.A. > > 913 451 1882 > > JStevens@xxxxxxxxxxxxxx > > > > -- > > 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 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 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. > >
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.