RE: CALL with optional parameters

You'll remove a lot of your code by protoyping the calls, especially if
you use /free. Then you'll have:

If %parms = 3;
callMyPgm1(parm1:parm2:optionalParm);
else;
callMyPgm2(parm1:parm2);
endif;

Sorry, Joe, but I don't think we can use prototypes with variable-name
procedures. That's why I suggested getting out of the call-by-varname
business.

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"I find television very educating. Every time somebody turns on the set I go
into the other room and read a book."
-- Groucho Marx

Joe

Hi,

I have to add an optional parameter to a program ( *NOPASS). This

program will then do a CALL operation, passing the optional parameter
if it has been received.

So I need to do either :

CALL MyPgm

PARM parm1
PARM parm2

OR

CALL MyPgm

PARM parm1
PARM parm2
PARM optionalParameter

MyPgm is a variable name.

Is there a less clumsyr way than this for the code?
If %parms=3

CALL MyPgm

PARM parm1
PARM parm2
PARM optionalParameter

else

CALL MyPgm

PARM parm1
PARM parm2

endif

--
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.