How IMS picks up PSB at run time

umasankar · New User Joined: 01 Dec 2006 Posts: 4

HI,
i have a doubt regarding IMS psb's .

there is a IMS PROGRAM 'A'

A calls another IMS program 'B'. (dynamic call)

while running Batch job ,
i have mentioned the PSB FOR 'A' in dfsrrc00 parms.

I gave the PSBLIB library for 'A' .

This PSBLIB doesnt contain PSB for 'B'.
what will happen.........

thanks in advance

Sandy Zimmer · Posted: Thu Jul 05, 2007 10:29 pm

Tell us what your linkage section looks like.....

umasankar · New User Joined: 01 Dec 2006 Posts: 4

Thanks for reply,

I got the answer ..

program 'A' linkage section will have program 'B' PCB's as well...

am i right?

Sandy Zimmer · Posted: Fri Jul 06, 2007 12:01 am

Try it......the other thing is that why are you dynamically calling pgm B? Is it a date routine that gets updated frequently? Otherwise, it is much more IMS efficient to link statically. However, you must consider the trade-off.....

Sometimes, you just do not have the background to ask a question. That is exceptionally frustrating. Other times, you have exhausted your research options and are literally banging your head against the wall. Mostly, you learn from your mistakes and these are lessons that you will never forget. Do not be afraid to experiment - except in production - you will learn a lot.

For instance - can you tell me how you would get a GE (not found) on an ISRT call? Years and years ago, when people were teching me - this is a question I would ask them in return.

If you understand that where you are in the database is essential, then you will have the answer. Don't just learn to do calls - learn how IMS works!

vihv · New User Joined: 01 Mar 2010 Posts: 4 Location: usa

umasankar: this is a very old post..anyways I hope you get this question. How does the IMS allocates the memory for all the PCB's in the PSB. is that positional...eg:

if you remove pcb2 from the program in the entry but you dont remove it from the psb.... does the address(pointer) for the allocated memory for pcb2 gets assigned to pcb3 since we removed pcb2 in the program.

thank you.

PSB-A
PRINT NOGEN
pcb1 ....................
pcb2 ....................
pcb3 ....................
pcb4 ....................
PSBGEN LANG=COBOL,PSBNAME=CTP593,CMPAT=YES
END

Program A
Linkage
pcb1 ....................
pcb2 ....................
pcb3 ....................
pcb4 ....................

procedure
.
.
ENTRY 'DLITCBL' USING pcb1,
pcb1
pcb2
pcb3
pcb4
.
.
.