CLRSCN:     CMD        PROMPT('Clear screen')                                  
                                                                                
             PARM       KWD(MODE) TYPE(*CHAR) LEN(1) RSTD(*YES) +               
                          DFT(*DFT) VALUES('0' '3' '4') +                       
                          SPCVAL((*CUR '0') (*DFT '0') (*NARROW +               
                          '3') (*WIDE '4')) EXPR(*YES) +                        
                          PROMPT('Display mode')                                
                                                                                
             PARM       KWD(CTLOPT) TYPE(*CHAR) LEN(10) DFT(*DFT) +             
                          EXPR(*YES) PROMPT('Control option')