IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Can I modify the call to an MPP program


IBM Mainframe Forums -> IMS DB/DC
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sandiptcs

New User


Joined: 29 Nov 2006
Posts: 19
Location: amsterdam

PostPosted: Thu Nov 30, 2006 4:59 pm
Reply with quote

I have an MPP program called AB100 and another MPP program AB102 which is called from AB100

The MPP program AB102 does not execute any function (GU/ISRT/CHNG/PURG) on IMS queue but queries a IMS database

The call from AB100 is presently like this
CALL AB102 USING IO-PCB
TP-PCB
DB-PCB
AB102-I-OAREA.
Question is

1. Can I modify this call to
CALL AB102 USING
DB-PCB
AB102-I-OAREA.
since bcoz I dont use either i-o PCB or TP-PCB in AB102. AND

in AB102 , remove the definition of IO-PCB and TP-PCB from the linkage and define it in the working storage
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Fri Dec 01, 2006 6:28 pm
Reply with quote

Depends on the usage of the PSB. Do both programs use the same PSB? Does the PCB for AB102 contain an IO-PCB?
Back to top
View user's profile Send private message
sandiptcs

New User


Joined: 29 Nov 2006
Posts: 19
Location: amsterdam

PostPosted: Fri Dec 01, 2006 10:56 pm
Reply with quote

I found that only the PSB for AB100 exists. No PSB exist for AB102 (i.e in the same name).

AB100 has 2 TP PCBs and DB PCBs defined in the PSB

However the program AB102 has I-O PCB mask, one TP PCB mask and one DB PCB mask defined in the linkage section.

Does that mean AB102 uses the same PSB as AB100 ?
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Mon Dec 04, 2006 3:01 pm
Reply with quote

As I understand it AB102 is a called module. What it takes to operate correctly is that the pointers are passed in the correct order pointing to the right databases. Just pass the pointers that are needed by AB102. If no IO-PCB needed don't pass it. Question: why would you want to modify the stuff icon_question.gif Btw: noticed you're in Amsterdam, so am I. If you'd like to discuss the matter by phone just tell me and I'll send you a PM.
Back to top
View user's profile Send private message
sandiptcs

New User


Joined: 29 Nov 2006
Posts: 19
Location: amsterdam

PostPosted: Mon Dec 04, 2006 3:15 pm
Reply with quote

Thanks Bitneuker, I am interested in discussing this over the phone
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Mon Dec 04, 2006 3:32 pm
Reply with quote

You've got PM
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


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

PostPosted: Mon Dec 04, 2006 6:27 pm
Reply with quote

Sandip; you've got PM
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IMS DB/DC

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts DB2 Event passed to the Application P... DB2 1
No new posts How to pass the PARM value to my targ... COBOL Programming 8
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
No new posts EZT program to build a flat file with... All Other Mainframe Topics 9
Search our Forums:

Back to Top