|
Hi,that
The magic word is prototyping.
You need a procedure interface that replaces the *ENTRY PLIST
And a prototype that is an exact match of the procedure interface and
must be embedded in the programm and in each module from which theprogram
will be called:them
Prototype:
D MyPGM PR EXTPGM('MYPGM)
D Par1 10A
D Par2 Like(Field2)
Procedure Interface
D MyPgm PI
D Par1 10A
D Par2 Like(Field2)
Call in free format:
/Free
MyPGM(MyPar1: MyPar2);
/End-Free
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training
and keeping them!"Im
-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
Auftrag von Alan Shoremy
Gesendet: Friday, August 24, 2007 20:12
An: RPG programming on the AS400 / iSeries
Betreff: PLIST in free form
Afternoon all
At the moment I'm having trouble with the internet so I am hoping someone
can help me out Now that we are on V5R4, I have finally decided to hold
nose and jump into using free-form. I am sure that I have seen a way tolist
introduce parameters into a program without using PLIST
Thanks in advance
Alan Shore
NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe,or
change list options,list
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
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.