Below I'm answering the question of "How do I call a program w/o a plist
in RPG-Free?" - which isn't exactly what you asked, but seemed like a
good starting point.
You can prototype a program:
D pgmName PR ExtPgm( 'PGMNAME' )
D parm1 3a
D parm2 12a
D parm2 129a
Then you can call it in free form as such:
pgmName( value1whichisparm1: value2: value3 );
This is just a basic example for calling an existing program that wasn't
defined with a Procedure Interface.
Kurt Anderson
Application Developer
Highsmith Inc
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Shore
Sent: Friday, August 24, 2007 1:12 PM
To: RPG programming on the AS400 / iSeries
Subject: 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 my nose and jump into using free-form.
I am sure that I have seen a way to 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
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.
midrange.com
