|
Note that if you follow the recommend practice of putting your prototypes in a separate source member, so other program can /include them in order to call the program. Then you need the EXTPGM keyword. Also, as shown in Juan's post. The "procedure" name on the PR and PI lines, doesn't need to match the actual program name used in the EXTPGM keyword. HTH, Charles > -----Original Message----- > From: Jonathan Mason [mailto:jonathan.mason@xxxxxxxxxxxxxxxx] > Sent: Sunday, October 03, 2004 8:41 AM > To: RPG programming on the AS400 / iSeries > Subject: RE: Replacement for *entry plist > > > Hi Kevin > > Assuming your program is called ABC123 and has two parameters > Company (3a) > and Division (3a), you would define it like: > > D ABC123 pr > D Company 3a > D Division 3a > > D ABC123 pi > D Company 3a > D Division 3a > > Note, the spacing above is as an example, and not the > required spacing on > the actual D spec. > > All the best > > Jonathan > www.astradyne-uk.com > > > -----Original Message----- > From: rpg400-l-bounces+jonathan.mason=astradyne-uk.com@xxxxxxxxxxxx > [mailto:rpg400-l-bounces+jonathan.mason=astradyne-uk.com@midra > nge.com]On > Behalf Of Kevin_J_Forster@xxxxxxxxxxxxxxx > Sent: 03 October 2004 05:04 > To: RPG400-L@xxxxxxxxxxxx > Subject: Replacement for *entry plist > > > > > > > > I've read in a number of articles that I can replace an > *entry plist with a > prototype. Could someone show me how this is done ? > > > Regards > Kevin Forster > > This email is sent by or on behalf of the named sender > identified above. If > you do not wish to receive any email marketing material from > this person in > the future, please forward the contents of this email to > unsubscriptions@xxxxxxxxxxxxxxx with the word "unsubscribe" > in the subject > box. If you do not forward the contents of this email with your > unsubscription then it may not be able to be implemented. If > you wish to > unsubscribe from all central email marketing lists used by > our business, > please forward the contents of this email to > unsubscriptions@xxxxxxxxxxxxxxx with the message "unsubscribe from all > central email marketing lists" in the subject box. If you do > not forward > the contents of this email with your unsubscription then it > may not be able > to be implemented. > > > The information contained in this email communication may be > confidential. > You should only disclose, re-transmit, copy, distribute, act > in reliance on > or commercialise the information if you are authorised to do > so. Any views > expressed in this email communication are those of the > individual sender, > except where the sender specifically states them to be the views of a > member of the National Australia Bank Group of companies. Any advice > contained in this e-mail has been prepared without taking > into account your > objectives, financial situation or needs. Before acting on > any advice in > this e-mail, National Australia Bank Limited recommends that > you consider > whether it is appropriate for your circumstances. If this > e-mail contains > reference to any financial products, the National recommends > you consider > the Product Disclosure Statement (PDS) or other disclosure > document before > making any decisions regarding any products. The National > Australia Bank > Group of companies does not represent, warrant or guarantee that the > integrity of this communication has been maintained nor that the > communication is free of errors, virus or interference. > > -- > 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.