Sample Subroutine (CLI2CTB)
This program is a COBOL subroutine that may be called by both COBOL and PL/I programs to perform the following functions:
The DBCAREA is actually contained in the working storage (COBOL) or static storage (PL/I) of the calling program.
The address of the DBCAREA is passed to the called program.
The messages (IMS) are sent by the calling program to a terminal.
CLI2CTB must be compiled and linked before executing the sample programs CLI2MCI or CLI2MPI. The JCL for compiling CLI2CTB is described in the next section.