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
 
PCB MASK

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

New User


Joined: 26 Nov 2008
Posts: 13
Location: UK

PostPosted: Wed Oct 07, 2009 10:00 am    Post subject: PCB MASK
Reply with quote

Hi

In an IMS program a CALL made to CBLTDLI to perform a database function uses the PCB mask (which has been included in the linkage section).

The PCB mask has information like DBD name, Status Code, Seg level etc. E.G.

01 PCB-MASK1
05 DBD-NAME PIC X(8)
05 SEG-LEVEL PIC X(2)
.
.
.
.


I would like to know where in the CBLDLI call do I specify the database the call should go and perform the database function (i.e. read or write or insert etc).

I would have expected one PCB mask for each PCB and the DBD-NAME variable having the corresponding database name or something....

I understand PCB mask as something which holds status of communication between IMS and Application program. But where do I actually specifiy which PCB a call must use?

Please clarify....

Many Thanks
Back to top
View user's profile Send private message

Ranjithkumar

New User


Joined: 10 Sep 2008
Posts: 94
Location: India

PostPosted: Mon Mar 29, 2010 11:52 am    Post subject: Reply to: PCB MASK
Reply with quote

Hi

We will not specify which PCB a call should use, in the program. We will specify only the PCB mask to be used.

Code:
CALL 'CBLTDLI' USING FUNCTION-CODE,PCB-MASK,IO-AREA,SSA


The PCB-Mask will be the mask for the PCB to be used. The order in which the PCBs are defined in a PSB and the order of the PCB-Masks defined in the PROCEDURE DIVIDSION USING statement ( In COBOL) should be the same. This will be the relation between PCB-Mask and PCB. By specifying the PCB-Mask in the call we will specify which PCB is to be used by the application program.

Hope this clears your doubt.
Back to top
View user's profile Send private message
enikhilk

New User


Joined: 20 Mar 2007
Posts: 43
Location: Pune

PostPosted: Mon Mar 29, 2010 3:31 pm    Post subject: Reply to: PCB MASK
Reply with quote

Just want to add, PCB mask area also contains useful information like concatenated parent key, segment level etc in addition to status of DLI call. However, we need not manipulate any fields in PCB mask and data in PCB mask area is maintained by IMS.
Back to top
View user's profile Send private message
manikawnth

New User


Joined: 07 Feb 2007
Posts: 61
Location: Mumbai

PostPosted: Mon Mar 29, 2010 5:19 pm    Post subject:
Reply with quote

My dear comrades,
You ppl are discussing on an out-dated topic.

Moderators,
Kindly freeze edits on such topics
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


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

PostPosted: Mon Mar 29, 2010 5:22 pm    Post subject:
Reply with quote

Never ever move anything to your PCB. You need a PCB for each database and in the case of multiple positioning on the same database. IMS "talks" to your application thru the PCB. Always make sure the order is the same in LINKAGE section too.
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 how to mask the phone number kumarinfy DB2 4 Mon Apr 03, 2017 5:23 pm
No new posts DFHPROTN - to mask the field dharmaraok CICS 2 Thu Apr 09, 2015 4:38 pm
No new posts Mask first 12 positions of PD field w... Niki DFSORT/ICETOOL 3 Fri Oct 05, 2012 9:33 pm
No new posts justification with edit mask? rss0213 DFSORT/ICETOOL 11 Sat Jul 28, 2012 7:33 pm
No new posts How to mask the data by using the sor... somapradeep1 DFSORT/ICETOOL 2 Mon Apr 09, 2012 7:35 pm

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