DLI

Description

The DLI command, in the IMS/DB and IMS/DC environments, issues calls to IMS using the standard IBM CBLTDLI (COBOL), ASMTDLI (Assembler), Data Language One (DL/I, for PL/I or C only), or AIBTDLI interface. Use this command to dynamically invoke IMS DB/DC functions that would normally be coded as CBLTDLI (COBOL), ASMTDLI (Assembler), DL/I (PL/I or C), or AIBTDLI calls in the application program.

Input

The following are the parameter descriptions for the DLI command:

function-code

One of the following codes:

PCB-n

Program communication block, where n is an integer.

IOPCB

I/O program communication block.

ALTPCB-n

Alternate IOPCB, where n is an integer.

dbdname-n

Database descriptor name, where n is an integer.

aib

Application interface block.

parameters

Any of the CBLTDLI (COBOL), ASMTDLI (Assembler), DL/I (PL/I or C), or AIBTDLI parameters.

Usage Notes

1. If PCB-n is specified, Code Debug TSO uses the value to identify the nth database PCB in the list of PCBs normally passed to the main program, as defined by the application program specification block (PSB).
2. If IOPCB is specified, Code Debug TSO uses the message queue PCB.
3. ALTPCB and ALTPCB-1 are equivalent.
4. If dbdname-n is specified, Code Debug TSO searches the current list of PCBs for the nth occurrence of the dbdname to be assigned to the identifier. The -n suffix is not required for the first occurrence of a database in the PSB.
5. Code Debug TSO constructs a CBLTDLI (COBOL), ASMTDLI (Assembler), DL/I (PL/I or C), or AIBTDLI parameter list using the function code, the database or message queue PCB, and any additional parameters specified with the command. Code Debug TSO does not check to see if the resulting parameter list is semantically correct, but passes your request directly to IMS. The return code from IMS is displayed in the message area when the command has been executed.
6. Code Debug TSO supports the basic CHKP, but does not support the symbolic CHKP call.

Examples

1. To get the next record from the database, enter the following on the command line:
      DLI GN INVDB1 SEG_AREA
2. To get the next message for this transaction code, enter the following on the command line:
      DLI GU IOPCB IO_MSG_AREA
3. To roll back the databases updated during the session, enter the following on the command line:
      DLI ROLB IOPCB
4. To perform a basic CHKP, enter the following on the command line:
      DLI CHKP IOPCB IO_AREA
5. To perform a SYNC call in a batch-oriented BMP, enter the following on the command line:
      DLI SYNC IOPCB