EXEC DLI 文

ここに示す EXEC DLI 文およびオプションは EXEC DLI プリプロセッサでサポートされます。このプリプロセッサはこれらの文を CBLTDLI 呼び出しに変換します。すべての EXEC DLI 文がサポートされるとは限りませんが、EXEC DLI プリプロセッサは有効な構文をチェックします。サポートされない EXEC DLI 文は、デバッグ中またはランタイムで実行されません。Enterprise Developer は、OSVS および VS COBOL II 方言の両方をサポートします。

注: EXEC DLI/END-EXEC 文に埋め込まれるコメントまたは空白行を含まず、1 つの EXEC DLI/END-EXEC 文に対して 400 までの入力行を指定できます。

ACCEPT
            STATUSGROUP(A)

CHECKPOINT | CHKP 
            ID(area)  |  ID("literal")

DELETE | DLET
          [ USING  PCB(expression) ]
          [ VARIABLE ] 
            SEGMENT(name)  |  SEGMENT((area))
          [ SEGLENGTH(expression) ] 
            FROM(area)

DEQ
            LOCKCLASS(data_value)

GET UNIQUE  |  GUGET NEXT  |  GNGET NEXT IN PARENT  |  GNP
	       [ USING  PCB(expression) ]
          [ KEYFEEDBACK(area) [ FEEDBACKLEN(expression) ] ] 
            INTO(reference)

各親セグメントの場合 (オプション)

               [ VARIABLE ] 
               [ FIRST  |  LAST  |  CURRENT ]
                 SEGMENT(name)  |  SEGMENT((area))
               [ SEGLENGTH(expression) ]
               [ OFFSET(expression) ]
               [ INTO(area) ]
               [ LOCKED ]
               [ SETPARENT ] 
               [ WHERE(qualification statement) 
               [ FIELDLENGTH(expression) ] ] 
               [ KEYS(area) [ KEYLENGTH(expression) ] ]

オブジェクトセグメントの場合 (GN および GNP ではオプション)

               [ VARIABLE ] 
               [ FIRST  |  LAST ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ OFFSET(expression) ] 
               [ INTO(area) ] 
               [ LOCKED ] 
               [ SETPARENT ] 
               [ WHERE(qualification statement) 
               [ FIELDLENGTH(expression) ] ] 
               [ KEYS(area) [ KEYLENGTH(expression) ] ]

INSERT  |  ISRT
          [ USING  PCB(expression) ]

各親セグメントの場合 (オプション)

               [ VARIABLE ] 
               [ FIRST  |  LAST  |  CURRENT ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ OFFSET(expression) ] 
               [ FROM(area) ] 
               [ WHERE(qualification statement) 
               [ FIELDLENGTH(expression) ] ] 
               [ KEYS(area) [ KEYLENGTH(expression) ] ]

オブジェクトセグメントの場合 (必須)

               [ VARIABLE ] 
               [ FIRST  |  LAST ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ OFFSET(expression) ] 
               [ FROM(area) ]

LOAD
          [ USING  PCB(expression) ]
               [ VARIABLE ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ OFFSET(expression) ] 
               [ FROM(area) ]

LOG
            FROM(area)
                 LENGTH(expression)

QUERY
            PCB(expression)

REFRESH
            DBQUERY

REPLACE | REPL
          [ USING  PCB(expression) ]

各親セグメントの場合 (オプション)

               [ VARIABLE ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ FROM(area) ]

各オブジェクトセグメントの場合 (必須)

               [ VARIABLE ] 
                 SEGMENT(name)  |  SEGMENT((area)) 
               [ SEGLENGTH(expression) ] 
               [ FROM(area) ]

RETRIEVE
            USING  PCB(expression)
                 KEYFEEDBACK(area) 
                 FEEDBACKLEN(expression)

ROLB

ROLL

ROLS
            TOKEN(token)
            AREA(data_area)

SCHEDULE | SCHD
            PSB(name)  |  PSB((area))

SETS
            TOKEN(token)
            AREA(data_area)

SETU
            TOKEN(token)
            AREA(data_area)

STATISTICS | STAT
          [ USING PCB(expression) ]
                 INTO(area) 
               [ LENGTH(expression) ] 
               [ VSAM | NOVSAM ] 
               [ FORMATTED | UNFORMATTED | SUMMARY ]

SYMBOLIC CHECKPOINT | SYMCHKP
            ID(chkptid)  |  ID("literal")
               [ AREA1(area1)  LENGTH1(expression1) ] 
               [ AREA2(area2)  LENGTH2(expression2) ] 
               [ AREA3(area3)  LENGTH3(expression3) ] 
               [ AREA4(area4)  LENGTH4(expression4) ] 
               [ AREA5(area5)  LENGTH5(expression5) ] 
               [ AREA6(area6)  LENGTH6(expression6) ] 
               [ AREA7(area7)  LENGTH7(expression7) ]

TERMINATE | TERM

XRST
          [ ID(chkpid)  |  ID("literal") ]
               [ MAXLENGTH(expression) ] 
               [ AREA1(area1)  LENGTH1(expression1) ] 
               [ AREA2(area2)  LENGTH2(expression2) ] 
               [ AREA3(area3)  LENGTH3(expression3) ] 
               [ AREA4(area4)  LENGTH4(expression4) ] 
               [ AREA5(area5)  LENGTH5(expression5) ] 
               [ AREA6(area6)  LENGTH6(expression6) ] 
               [ AREA7(area7)  LENGTH7(expression7) ]