This tutorial uses COBOL data structures to describe the IMS transaction input and output messages. The input and the output messages are identical, and they contain an array of customer elements, followed by a single field containing a function code. The array can have a maximum of eight elements, but for this tutorial only three elements are input to the IMS application program and only four elements are returned by the IMS application program.
The IMS transaction that is used by this tutorial is not one of the IMS Installation Verification Programs. It uses DFSDDLT0, an IMS application program that issues calls to IMS based on control statement information. The DFSDDLT0 control statements for this tutorial are provided below. However, you must configure your environment for DFSDDLT0 and provide the necessary JCL if you want to run the tutorial. This tutorial uses SKS2 as the transaction code for the DFSDDLT0 application.
S11 1 1 1 1 TP 1
L GU
E OK
E Z0088 DATA SKS2 03CN001Cathy Tang CN002Haley Fung X
CN003Steve Kuo 123456
WTO IC4JINOU: Single segment received from JITOC
L GN
E QD
WTO IC4JINOU: End of input segments from JITOC
L ISRT JITOC53
L Z0113 DATA TRNCD04CN001Cathy T. CN002Haley F. X
CN003Steve K. CN004Kevin F. 65432X
1
E OK
WTO IC4JINOU: Single segment inserted - 3 elements !!!!!!!!!!!!!
L GU
Connecting to the IMS server