Here is my post#1 if you miss it. Below are the DLI CALLs commonly use in IMS DB with GSAM programs.

Entry call:

Entry 'DLITCBL'   Using   TPPCB
GSam-file-Input
Gsam-file-output

Open call:

Call 'CBLTDLI'  Using OPEN
GSam-file-Input
GSam-file-Output

Read call:

Call 'CBLTDLI'  Using GN
GSam-file-Input

Insert call:

Call 'CBLTDLI'  Using Insert
GSam-file-Record

Close call:

Call 'CBLTDLI'  Using Close
GSam-file-Input
GSam-file-Output

Finally, how do you know if the file is input or output? In PSB, look for the below syntax to know.

Indataset= GSam-file-Input
outdataset=GSam-file-Output.

You no need to give a SELECT statement in the COBOL program because of the above PSB definitions.

Don’t forget to share this post!