DBUTIL - Interactive DB Calls | Assembler Programs |
This chapter lists the statements supported by the EXEC DLI preprocessor.
Listed here are the EXEC DLI statements and options which are supported by the preprocessor. These statements are translated internally into a call to CBLTDLI.
For all of these EXEC DLI statements, both the OSVS and VS COBOL II dialects are supported.
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 | GU GET NEXT | GN GET NEXT IN PARENT | GNP
[ USING PCB(expression) ]
[ KEYFEEDBACK(area) [ FEEDBACKLEN(expression) ] ] INTO(reference)
For each parent segment (optional)
[ 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) ] ]
For the object segment ( optional for GN and 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) ]
For each parent segment (optional)
[ VARIABLE ] [ FIRST | LAST | CURRENT ] SEGMENT(name) | SEGMENT((area)) [ SEGLENGTH(expression) ] [ OFFSET(expression) ] [ FROM(area) ] [ WHERE(qualification statement) [ FIELDLENGTH(expression) ] ] [ KEYS(area) [ KEYLENGTH(expression) ] ]
For the object segment (required)
[ 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) ]
For each parent segment (optional)
[ VARIABLE ] SEGMENT(name) | SEGMENT((area)) [ SEGLENGTH(expression) ] [ FROM(area) ]
For each object segment (required)
[ 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) ]
Some EXEC DLI statements might not be supported, but the EXEC DLI preprocessor processes the statement and checks for valid syntax. When these statements are executed, by using either Run or Debug, they execute but they do not do anything meaningful and therefore do not disturb program execution.
A maximum of 400 input lines can be specified for one EXEC DLI/END-EXEC statement. This maximum does not include comments or blank lines that may be placed within an EXEC DLI/END-EXEC statement.
Copyright © 1999 MERANT International Limited. All rights reserved.
This document and the proprietary marks and names
used herein are protected by international law.
DBUTIL - Interactive DB Calls | Assembler Programs |