MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » January 2014

Re: optional parm in CLLE



fixed

Are optional parameters possible in CLLE ?

Absolutely. The main thing you need to do is check for MCH3601
whenever you attempt to use the optional parameter.

So, for example, the top of your program could be

PGM PARM(&OPTPARM)
DCL &OPTPARM *CHAR 10

And later, you have something like

CHGVAR VAR(&MYVAR) VALUE(&OPTPARM)
MONMSG MSGID(MCH3601) EXEC(DO)
RCVMSG MSGTYPE(*EXCP) RMV(*YES)
CHGVAR VAR(&MYVAR) VALUE(' ')
ENDDO

(The above sets &MYVAR to blank when &OPTPARM is not present.)

John





Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2014 by MIDRANGE dot 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 here. If you have questions about this, please contact