CMD        PROMPT('C 関数による読取り ')                           
             PARM       KWD(FILE) TYPE(FILE) MAX(1) +                           
                          PROMPT(' ファイル ')                                  
 FILE:       QUAL       TYPE(*NAME) LEN(10) MIN(1)                              
             QUAL       TYPE(*NAME) LEN(10) DFT(*LIBL) +                        
                          SPCVAL((*LIBL) (*CURLIB '*CURLIB   ')) +              
                          EXPR(*YES) PROMPT(' ライブラリー ')                   
             PARM       KWD(MEMBER) TYPE(*NAME) LEN(10) DFT(*FIRST) +           
                          SPCVAL((*FIRST) (*LAST) (*ALL)) +                     
                          PROMPT(' メンバー ')