Entry Statement in IMS DB

sudip · New User Joined: 10 Mar 2006 Posts: 2

Hi,
i have a doubt please help me in it. The ENTRY (ENTRY 'DLITCBL' using PCB-MASK) statement provides a mechanism for DL/I to transfer control to the application program. Some programs do not have this statement instead there is directly PROCEDURE DIVISION USING PCB-MASK. What is the difference between these two? please help

Thanks
Sudip

itssreehere · New User Joined: 10 Jan 2006 Posts: 65 Location: chennai

Hi Sudip,

programs using older versions of IMS had separate entry statements.From IMS version7(not sure about the version number) onwards this is changed and no specific entry statement is required. But to maintain the compatibility with older programs it supports both. Hope this answers your question.

Regards,
Sreejith

sudip · New User Joined: 10 Mar 2006 Posts: 2

Thanks Sreejith this perfectly answers my question but can you provide me the source of the information so that i can verify the Version number too.

Thanks
Sudip

kesavarao · New User Joined: 16 Apr 2006 Posts: 2

IMS Program may call another IMS program.

Main ims program will have entry statement and subprogram will not have entry statement.

main program looks like below :-
------------------------------------
Linkage section.
pcb-mask

procedure division.
entry 'dlitcbl' pcb-mask

call 'subprogram' pcb-mask

goback.

subprogram looks like below :-
---------------------------------
Linage section
pacb-mask -----> (received from main program)

procedure division pcb-mask
-----> Here you don't find entry statement

Regards
Devoji Kesavarao

Sandy Zimmer · Posted: Tue Aug 04, 2009 6:11 pm

When you see PROCEDURE DIVISION USING......it indicates that your program is not talking DIRECTLY to IMS - it is a sub task. Some installations had all of their IMS programs running as a subtask. They had a "main" module that talked to IMS.

GREAT example kesavarao!