d echo pr
d string 65535 const options(*varsize) varying
d tabs 1 const options(*nopass) varying
d NL 1 const options(*nopass) varying

p echo b export
d echo pi
d string 65535 const options(*varsize) varying
d tabs 1 const options(*nopass) varying
d NL 1 const options(*nopass) varying

if %parms >= 2;
localTabs = tabs;
else;
localTabs = '';
endif;

if %parms >= 3;
localNL = NL;
else;
localNL = '';
endif;



On Fri, Apr 13, 2012 at 12:54 AM, <Tommy.Holden@xxxxxxxxxxxxxxxxxxxxx>wrote:

Yes you can have optional parameters...you'll have to check %parms() to
see if the parm was passed. Also all parameters after the first optional
parameter must also be optional/no pass.



From: James Lampert <jamesl@xxxxxxxxxxxxxxxxx>
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>,
Date: 04/12/2012 05:47 PM
Subject: Can RPG procedures in a *SRVPGM have optional parameters?
Sent by: rpg400-l-bounces@xxxxxxxxxxxx



Refresh my memory (assuming it's something I actually knew at some
point): can ILE RPG procedures in a service program have optional
parameters?

And how do I know whether they were passed?

--
JHHL
--
This is the RPG programming on the IBM i / System i (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 IBM i / System i (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 thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 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].