CMD        PROMPT(' 印刷の出力 ') VLDCKR(QUATTRO/OUTCHK)           
             PARM       KWD(TANCOD) TYPE(*CHAR) LEN(4) MIN(1) +                 
                          PROMPT(' 担当者コード ')                              
             PARM       KWD(OPTION) TYPE(*CHAR) LEN(10) RSTD(*YES) +            
                          DFT(*PRINT) VALUES(*PRINT *OUTFILE) +                 
                          PROMPT(' 出力オプション ')