Application programming for PL/I

Application programs in PL/I use the following format, parameters, and DL/I calls to communicate with the IMS Transaction Manager.

Format

Read syntax diagramSkip visual syntax diagram CALL PLITDLI(parmcount,function,i/o_pcbAB,alt pcbACAIBTDLI(parmcount,function,aibABCCEETDLI(parmcount,function,i/o_pcbAB,alt_pcbAC,aibABC ) ;
A
Read syntax diagramSkip visual syntax diagram , i/o_area ,mod_name,token,options_list,feedback_area
B
Read syntax diagramSkip visual syntax diagram , i/o_area_length , i/o_area ,area_length,area
C
Read syntax diagramSkip visual syntax diagram ,destination_name ,options_list,feedback_area

Parameters

parmcount
Specifies the name of a fixed-binary (31-byte) variable that contains the number of arguments that follow parmcount.
function
Specifies the name of a character (4-byte) variable, left justified, blank padded character string that contains the call function to be used. For example, (GUbb) is a call function.
i/o pcb
Specifies the address of the program communication block (I/O PCB). The I/O PCB address is the first address passed on entry to the application program in the PCB list, given the following circumstances:
  • A program executing in DLI or DBB regions where CMPAT=YES is coded on the PSB.
  • Any program executing in batch message processing program (BMP), message processing program (MPP), or IMS Fast Path (IFP) regions regardless of the CMPAT= value.
alternate pcb
Specifies the structure associated with the I/O PCB or alternate PCB to be used for the call. This structure is based on a PCB address that must be one of the PCB addresses passed on entry to the application program.
aib
Specifies the name of the structure that defines the application interface block (AIB).
i/o area
Specifies the name of the I/O area used for the call. The I/O area must be large enough to contain the returned data.
i/o area length
Specifies the name of a fixed binary (31) variable in user-defined storage that contains the I/O area length (specified in binary).
area length
Specifies the name of a fixed binary (31) variable that contains the length (specified in binary) of the area immediately following it in the parameter list. Up to seven area length/area pairs can be specified.
area
Specifies the name of the area to be checkpointed. Up to seven area length/area pairs can be specified.
token
Specifies the name of a character (4) variable that contains a user token.
options list
Specifies the name of a structure that contains processing options used with the call.
feedback area
Specifies the name of a structure that receives information about options list processing errors.
mod name
Specifies the name of a character (8) variable character string containing the user-defined MOD name used with the call.
destination name
Specifies the name of a character (8) variable character string containing the logical terminal or transaction code to which messages resulting from the call are sent.

Example DL/I call formats

DL/I CEETDLI interface: 
 %INCLUDE CEEIBMAW;
 CALL CEETDLI (function, i/o pcb, i/o area);
DL/I AIBTDLI interface: 
 CALL AIBTDLI (parmcount, function, aib, i/o area);
DL/I language-specific interface: 
 CALL PLITDLI (parmcount, function, i/o pcb, i/o area);