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
 
How to relate PCB &PCB mask in a program?

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

New User


Joined: 08 Feb 2010
Posts: 1
Location: bangalore

PostPosted: Sun Feb 14, 2010 10:43 pm    Post subject: How to relate PCB &PCB mask in a program?
Reply with quote

As I'm totally new to IMS, kindly forgive if my question is so stupid & do clarify the below.

Normally the PCB declaration will be done as below.

PCB TYPE=DB, NAME=HOSPDBD, KEYLEN=26
SENSEG NAME=HOSPITAL, PARENT=0, PROCOPT=K
SENSEG NAME=WARD, PARENT=HOSPITAL, PROCOPT=K
SENSEG NAME=PATIENT, PARENT=WARD, PROCOPT=G
PSBGEN LANG=COBOL, PSBNAME=PATRETRV
END


And in the IMS-Cobol pgm we used to refer the PCB-mask as below.

LINKAGE SECTION
01 PCB-MASK
05 DBDNAME PIC X(8)
05 STATUS-CODE PIC X(2)
05 PROC-OPTIONS PIC X(4)
05 JCB-ADDRESS PIC X(4)

.
.
PROCEDURE DIVISION
ENTRY 'DLITCBL' USING PCB-MASK
.
.
.
CALL 'CBLTDLI' USING function code
PCB mask
I-O Area
SSA's


Now please let me know how & where the PCB will be related with the PCB-mask in a IMS program? Or in other words
where do we refer the PCBname HOSPDBD inside the pgm?
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Mon Feb 15, 2010 5:51 pm    Post subject: Reply to: How to relate PCB &PCB mask in a program?
Reply with quote

Quote:
Or in other words where do we refer the PCBname HOSPDBD inside the pgm?
You pass it from the JCL, check the JCL which executes this program.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


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

PostPosted: Tue Feb 16, 2010 1:56 am    Post subject:
Reply with quote

In addition to what Anuj posted, you will see your database in your JCL if you are running DLI. If you are running BMP, you will not.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Feb 16, 2010 3:46 pm    Post subject:
Reply with quote

Thanks Sandy...icon_smile.gif.

P kumaran - Suggest you spend some time with this sticky of IMS DB/DC part of the Forum.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2445
Location: Netherlands, Amstelveen

PostPosted: Tue Feb 16, 2010 3:52 pm    Post subject:
Reply with quote

Maybe the next link gives some clarification :

http://www.sysed.com/DnLoads/QualityContents/IMSControlBlock/05_Chapter02_IPB1-us.pdf
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


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

PostPosted: Tue Feb 16, 2010 5:29 pm    Post subject:
Reply with quote

That is a great link Peter!
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 The same REXX program doesnt work for... jackzhang75 CLIST & REXX 5 Wed Dec 06, 2017 2:51 am
No new posts Calling IKJEFT01 program from Rexx upendrasri CLIST & REXX 8 Wed Nov 15, 2017 4:27 pm
No new posts How to write Rexx program to size and... sreejeshcs CLIST & REXX 14 Thu Oct 12, 2017 7:26 am
No new posts Accessing CICS tran with map from JCL... navdeepaggarwal CICS 5 Tue Oct 03, 2017 6:15 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm

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