MIDRANGE dot COM Mailing List Archive



Home » MIDRANGE-L » January 2014

Re: optional parm in CLLE



fixed

Hi, Gary:

If you issue DSPPGM against a CLLE *PGM you will see that the number of parameters is always set to MIN(0) and MAX(255).

So, yes, it is possible.

You need to monitor for MCH0801 to detect if an optional parameter was not passed, e.g.:

CHGVAR VAR(&LOCALVAL) VALUE(&PARMVAL)
MONMSG MSG(D(MCH0801) EXEC(DO)
RCVMSG PGMQ(*SAME (*)) MSGTYPE(*EXCP) MSGKEY(*NONE) +
WAIT(0) RMV(*YES)
CHGVAR VAR(&LOCALVAL) VALUE(' ') /* or as needed */
ENDDO

Do this for each "optional" parameter when you try to access it in your CLLE *PGM.

Hope that helps,

Mark S. waterbury

> On 1/21/2014 3:09 PM, Gary Thompson wrote:
I am looking at changing a local program used for FTP.

Are optional parameters possible in CLLE ?

The idea is existing programs calling this changed program
will not pass the new parameter and will not need changing.






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