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