Hi Booth,
You're close on your code. If the Parm1 field is truly optional, you would need the keyword Options(*nopass) on the parameter. As you have it now, Parm1 is always passed so %parms =1 will always be true.
Additional suggestion for your %parms check:
If %parms >= %parmNum( Parm1 )
Instead of
If %parms = 1;
= instead of = for ease of adding additional optional parameters.
%parmNum requires IBM i v7.1 (or possibly a PTF for earlier version if available). This helps your program withstand potential bugs if someone were to add a parameter before Parm1.
Hope this helps,
Kurt
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Thursday, June 20, 2013 12:56 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Converting *ENTRY & PLIST to free format
I just looked for it, with no luck. I have RDp 7.5.0.
Where should I look?
Thanks to all who responded. As usual, it was at the very elementary level that I was confused, and since it is elementary, everyone else assumes it is so obvious as to not need explanation. :)
If anyone one wishes to check and see if I still missed the obvious,
http://www.martinvt.com/Code_Samples/PR___PI/pr___pi.html
On 6/20/2013 9:37 AM, Luis Rodriguez wrote:
Booth,
Do you have WDSc/RDP? There is a nice wizard available that allows you
to create the required D-Specs for either an *ENTRY equivalent or
calling subprocedures.
Regards,
Luis Rodriguez
IBM Certified Systems Expert - eServer i5 iSeries
--
Booth Martin
802-461-5349
http://www.martinvt.com
--
This is the RPG programming on the IBM i (AS/400 and 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
