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

How to communicate with PSB Through Program?


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

Active User


Joined: 03 Dec 2005
Posts: 120
Location: india

PostPosted: Mon Apr 30, 2007 3:28 pm
Reply with quote

hi,

I have a PSB. PSB contains 3 PCB's - PCB1, PCB2, PCB3.

How will my IMS-COBOL prgram communicate with this PSB?

Is there any specific call that needs to be made?

Please give some examples (with syntax)

thanks
Back to top
View user's profile Send private message
rameshfoa

New User


Joined: 05 Apr 2007
Posts: 27
Location: chennai

PostPosted: Mon Apr 30, 2007 5:51 pm
Reply with quote

Whenever the IMS call is executed...for ex

CALL CBLTDLI USING GN
PCB1
IOAREA
SSA

in the above ex...PCB1 will be checked in procedure division and will be looked into the PSB given in the JCL step executing this program. let me know if I answered ur question...
Back to top
View user's profile Send private message
pingte

Active User


Joined: 03 Dec 2005
Posts: 120
Location: india

PostPosted: Tue May 01, 2007 9:07 am
Reply with quote

thanks ramesh for the answer

Will the PSBLIB be part of the STEPLIB?

and i have one more doubt....

while starting the procedure divison....
will the code look like this...

Code:
PROCEDURE DIVISION USING PCB1
                                                      PCB2
                                                      PCB3


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

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Tue May 01, 2007 9:15 am
Reply with quote

Quote:
Will the PSBLIB be part of the STEPLIB?


PSBLIB is not part of STEPLIB, instead the IMS DBDLIB and PSBLIB are given in IMS DD name

Quote:

while starting the procedure divison....


You can either use Procedure division USING PCB List
or the first statement should be ENTRY 'DLITCBL' [/quote]
Back to top
View user's profile Send private message
pingte

Active User


Joined: 03 Dec 2005
Posts: 120
Location: india

PostPosted: Tue May 01, 2007 9:33 am
Reply with quote

thanks ramesh....

it would be nice if you can illustrate with a sample JCL and corresponding program...
Back to top
View user's profile Send private message
ahr

New User


Joined: 24 Apr 2007
Posts: 14
Location: India

PostPosted: Thu May 10, 2007 12:53 pm
Reply with quote

Pingte,

I am trying to answer your question,

When you submit your jcl, there is PARM='DLI,pgmname,psbname,,,,,,,'
The joblib/steplib contains DBDLIB, PSBLIB datasets

The system knows which PSB needs to searched because of the PARM, the PSB contains PCB's and PCB knows/tells which Database needs to be accessed for that application program.

The procedure division using PCB1 PCB2 PCB3 gives addressbility of the PCB's.

When IMS call gets executed in application program, it knows where to look for PCB and corresponding Database.

Hope I answered your question, I feel the best book to refer for IMS is by Steve Echols.

I don't have any jcls to give you for example.
Back to top
View user's profile Send private message
pingte

Active User


Joined: 03 Dec 2005
Posts: 120
Location: india

PostPosted: Thu May 10, 2007 1:15 pm
Reply with quote

Thanks a lot..
Now my doubts are cleared icon_biggrin.gif
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: Thu May 10, 2007 3:19 pm
Reply with quote

ahr wrote
Quote:
The joblib/steplib contains DBDLIB, PSBLIB datasets
.

Please look at what Devzee wrote icon_idea.gif
Back to top
View user's profile Send private message
pingte

Active User


Joined: 03 Dec 2005
Posts: 120
Location: india

PostPosted: Thu May 10, 2007 5:50 pm
Reply with quote

Moderator,

Which one is correct?
Back to top
View user's profile Send private message
ahr

New User


Joined: 24 Apr 2007
Posts: 14
Location: India

PostPosted: Thu May 10, 2007 8:53 pm
Reply with quote

Pinte,

Devzee is correct,

It's quite long time, not any more with programming.
so, any how you got the answer.
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 May 11, 2007 12:13 am
Reply with quote

pingte wrote:
Moderator,

Which one is correct?


My post speakes for itself icon_wink.gif

@ahr: good of you to respond the way you did icon_biggrin.gif
Back to top
View user's profile Send private message
avina

New User


Joined: 04 Dec 2007
Posts: 16
Location: Kolkata

PostPosted: Thu Sep 04, 2008 6:37 pm
Reply with quote

DFSRC000, PARM='DLI,pgmname,psbname,,,,,,,'
The joblib/steplib contains DBDLIB, PSBLIB datasets

The system knows which PSB needs to searched because of the PARM, the PSB contains PCB's and PCB knows/tells which Database needs to be accessed for that application program.

The procedure division using PCB1 PCB2 PCB3 gives addressbility of the PCB's.
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 Error to invoke MPP program through B... IMS DB/DC 3
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
Search our Forums:

Back to Top