Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
What are the changes needed to call an independant IMS cobol

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
sri_code

New User


Joined: 20 Nov 2006
Posts: 19
Location: india

PostPosted: Fri Oct 26, 2007 12:14 pm    Post subject: What are the changes needed to call an independant IMS cobol
Reply with quote

I have a requirement according to that, I have to call an existing IMS cobol program from a new cobol program.

The IMS program is having DLITCBL entry point.

One important thing to remember is, i should not make any changes in the sub program (IMS cobol), even if i made any changes, the program should work independently as it is working currently.

In Simple words the program should work as sub module as well as main module.

please try to provide all possible ways to do this.

I need it urgently.... Thank you.
Back to top
View user's profile Send private message

Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Fri Oct 26, 2007 1:41 pm    Post subject:
Reply with quote

You write a COBOL progam and call your existing IMS Submodule, and in the CALL parameter pass all the PCB Masks and any other parameters as required by your submodule.
Back to top
View user's profile Send private message
sri_code

New User


Joined: 20 Nov 2006
Posts: 19
Location: india

PostPosted: Fri Oct 26, 2007 6:48 pm    Post subject: Reply to: What are the changes needed to call an independant
Reply with quote

As i already mentioned the IMS program is having ENTRY 'DLITCBL' statement.

Can a called module have ENTRY statement.
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Fri Oct 26, 2007 6:50 pm    Post subject:
Reply with quote

Does this new program have access to other segments than accessed by the submodule? If so don't forget to adjust your PSB. And, what type of program is it; batch, bmp or mpp?
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Fri Oct 26, 2007 11:37 pm    Post subject:
Reply with quote

Also think about the way you will call it - you will need to call it dynamically - not statically.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Fri Oct 26, 2007 11:42 pm    Post subject:
Reply with quote

Oh, all STOP RUN statements should be changed to GOBACK. What is the purpose of calling the existing module?
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Sat Oct 27, 2007 9:28 am    Post subject:
Reply with quote

Quote:
As i already mentioned the IMS program is having ENTRY 'DLITCBL' statement.
Usually I dont use this ENTRY statement, instead if we use procedure division using PCB list etc. then any program can call any module.

Quote:
all STOP RUN statements
The best practise is not to code STOP RUN in any program instead use GOBACK.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm
No new posts XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us