CMD        PROMPT(' テスト・ページ ')                              
             PARM       KWD(PAGEINFO) TYPE(PAGEINFO) +                          
                          PROMPT(' 印刷の範囲 ')                                
 PAGEINFO:   ELEM       TYPE(*DEC) LEN(6 3) DFT(1) +                            
                          PROMPT(' 開始ページ ')                                
             ELEM       TYPE(*DEC) LEN(6 3) DFT(*ENDPAGE) SPCVAL((*ENDPAGE +    
                          -1)) PROMPT(' 終了ページ ')