Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Identifying a particular PCB used in a Program.

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

New User


Joined: 05 Apr 2007
Posts: 15
Location: india

PostPosted: Wed May 30, 2007 3:01 pm    Post subject: Identifying a particular PCB used in a Program.
Reply with quote

Hi all
Can anybody help me out .
I have a PSB which is having 5 PCB's.I want to know which PCB out of these 5 , my program is using .I am confused as there is no PCB name.
Is there any method of finding that.
Thanks
Back to top
View user's profile Send private message

IQofaGerbil

Active User


Joined: 05 May 2006
Posts: 183
Location: Scotland

PostPosted: Wed May 30, 2007 4:26 pm    Post subject: Re: Identifying a particular PCB used in a Program.
Reply with quote

No PCB name?
Where , in the program, in the PSB?


Be more specific/give examples.
Back to top
View user's profile Send private message
rajat_gupta

New User


Joined: 05 Apr 2007
Posts: 15
Location: india

PostPosted: Wed May 30, 2007 6:03 pm    Post subject:
Reply with quote

Hi IQofaGerbil


There is no PCB name given in PSB declaration llike,


PCB TYPE=DB,DBDNAME=DB9138,KEYLEN=11,PROCOPT=GOT
SENSEG NAME=P118TVL,PARENT=0,PROCOPT=GO

PCB TYPE=DB,DBDNAME=DB0724,KEYLEN=6,PROCOPT=GOTP
SENSEG NAME=P324CMN,PARENT=0,PROCOPT=GOP
SENSEG NAME=P324SDN,PARENT=P324CMN,PROCOPT=GOP

PCB TYPE=GSAM,DBDNAME=GSM5600,PROCOPT=GS

PCB TYPE=GSAM,DBDNAME=GSM0901,PROCOPT=LS

PSBGEN PSBNAME=ES067,LANG=COBOL,CMPAT=YES
END


In Cobol pgm the call is like,

CALL 'CBLTDLI' USING WS30-GET-HOLD-UNIQUE
PCB-mask
seg-IO-AREA

END-CALL

this PCB mask is declared in the linkage section.
now how can i get , which of the above PCB's is refrenced in this call.
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed May 30, 2007 6:20 pm    Post subject:
Reply with quote

In linkage you have 4 PCB-MASK right? then relate as below and identify which one is being used in CBLTDLI call.
PCB1 = DB09138
PCB2 = DB0724
PCB3 = GSM5600
PCB4 = GSM0901
Back to top
View user's profile Send private message
rajat_gupta

New User


Joined: 05 Apr 2007
Posts: 15
Location: india

PostPosted: Wed May 30, 2007 6:58 pm    Post subject:
Reply with quote

Thanks Devzee
Now I understood
Actually in my linkage section there was only 1 PCB-MASK defined, as the PSB was earlier containing only 1 PCB.
Thats why I was confused, now I need to add three more PCB-MASKS.right?
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Wed May 30, 2007 7:00 pm    Post subject:
Reply with quote

If the PSB was changed then you got to make changes in Linkage to include all related PCB masks.
Back to top
View user's profile Send private message
IQofaGerbil

Active User


Joined: 05 May 2006
Posts: 183
Location: Scotland

PostPosted: Wed May 30, 2007 8:45 pm    Post subject: Re: Identifying a particular PCB used in a Program.
Reply with quote

Lets hope thst whoever added the new PCBs in the PSB appended them after the first one.
Otherwise you might be referencing the wrong one!
Worth a quick check just to be sure?
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: Thu May 31, 2007 2:10 am    Post subject:
Reply with quote

In addition to what Devzee wrote: your PSB might have more PCB's now than before. However, if your program doesn't use any of the complementary PCB''s you don't have to define them in your program. But whenever you refer in a DLI-call to any of those additional PCB's you will have a problem. I know sites where a standard PSB containing all PCB's are used in all applications; even senseg/senfield are omitted icon_evil.gif
Back to top
View user's profile Send private message
rajat_gupta

New User


Joined: 05 Apr 2007
Posts: 15
Location: india

PostPosted: Thu May 31, 2007 10:43 am    Post subject:
Reply with quote

Thanks a lot Bitneuker,IQofaGerbil and Devzee for your Input.I appreciate your help.
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 IMS T-Pipe queue counts in a COBOL Pr... Siva NKK Kothamasu IMS DB/DC 0 Tue May 09, 2017 6:31 pm
No new posts Need help in REXX CALL program Raje1002 CLIST & REXX 5 Wed Apr 19, 2017 11:18 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us