CMD        PROMPT('Display Stored Procedures')

             PARM       KWD(PROC) TYPE(*CHAR) LEN(128) +
                          SPCVAL((*ALL)) MIN(1) PROMPT('Procedure +
                          Name')

             PARM       KWD(SCHEMA) TYPE(*CHAR) LEN(128) DFT(*ALL) +
                          SPCVAL((*ALL)) PROMPT('Schmea/Library Name')