DLIINFO

The DLIINFO call requests information from the last DL/I call or on a specific PCB.

Format

Read syntax diagramSkip visual syntax diagramDLIINFOinfooutpcbid
Call Name DB/DC DBCTL DCCTL DB Batch TM Batch
DLIINFO X X X X X

Usage

The infoout variable name is a REXX variable that is assigned the DL/I information. The pcbid variable name returns the addresses associated with the specified PCB and its last status code.

The format of the returned information is as follows:
Word
Description
1
Last DL/I call ('.' if N/A)
2
Last DL/I PCB name (name or #number, '.' if N/A)
3
Last DL/I AIB address in hexadecimal (00000000 if N/A)
4
Last DL/I PCB address in hexadecimal (00000000 if N/A)
5
Last DL/I return code (0 if N/A)
6
Last DL/I reason code (0 if N/A)
7
Last DL/I call status ('.' if blank or N/A)

Example

Address REXXIMS 'DLIINFO MyInfo'         /* Get Info                  */
Parse Var MyInfo DLI_Cmd DLI_PCB DLI_AIB_Addr DLI_PCB_Addr,
          DLI_RC DLI_Reason DLI_Status .

Always code a period after the status code (seventh word returned) when parsing to allow for transparent additions in the future if needed. Words 3, 4, and 7 can be used when a pcbid is specified on the DLIINFO call.