Another option is to check if the address of the parameter is *Null or not.

If %addr(optional1) <> *Null;

Alan Addison

-----Original Message-----
From: Jon Paris []
Sent: April-12-12 8:45 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Can RPG procedures in a *SRVPGM have optional parameters?

On 2012-04-12, at 6:57 PM, rpg400-l-request@xxxxxxxxxxxx wrote:

Yes you can have optional'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.

And if you are on V7 or later you should use %ParmNum to check for optional
parms rather than hard code against %Parms.

e.g. If %Parms >= %ParmNum(optional1); Rather than

If %Parms >= 2;

Jon Paris

This thread ...


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

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