PCB address in BMP

IMS DB database, DL/I commands etc

Moderator: Moderator Group

Post Reply
mehi1353
Member
Posts: 3
Joined: Sun Aug 14, 2011 1:00 pm
Location: Tehran

PCB address in BMP

Post by mehi1353 » Wed Aug 17, 2011 2:35 pm

Hi all,

In running a BMP program, I encoutered U0476 abend.
I think the problem is "INVALID PCB ADDRESS"

I want to know,how i can pass the pcb number to my cobol program?
my psb just have 1 pcb:

PRINT NOGEN
* PCB NO. 1
PCB TYPE=DB,DBDNAME=RETDTRAN, *
PROCOPT=G,KEYLEN=33
SENSEG NAME=TRANACCT,PARENT=0
SENSEG NAME=TRANNORM,PARENT=TRANACCT
*
PSBGEN LANG=COBOL,PSBNAME=FCSBT888,CMPAT=YES
END

all the best,
Mehrdad
all the best

DikDude
Moderator
Posts: 1001
Joined: Fri Jul 22, 2011 8:39 am
Location: usa

Post by DikDude » Wed Aug 17, 2011 11:56 pm

Your duplicate post in the "other" forum has been locked.

Do not post the same topic/question in multiple forums.

I would have preferred to lock this one, but i'm not a moderator here. . .

dd

Anuj Dhawan
Moderator
Posts: 1625
Joined: Sat Aug 09, 2008 9:02 am
Location: Mumbai, India

Post by Anuj Dhawan » Thu Aug 18, 2011 2:53 pm

It depends on how you are invoking IMS - if you are using DFSRRC00 then U0476 menas, a DL/I call does not include a valid PCB address as you also have said. The PCB address in the DL/I call (second parameter or third, if count is the first parameter) is not one of the PCB addresses passed to the application program at its entry point.

I'm not sure if you've looked for it or not, however for such a generic question I'd say, the DFSRRC00 Parameters differ depending from the execution environment (BMP, DBB, JMP, ...). The symbols in the JCL might be different at different sites, but the meaning remains the same.

Please have a look at the IMS Installation Guide Volume 2: System Definition and Tailering. You can use the following link to get there -

http://publib.boulder.ibm.com/infocente ... /index.jsp

Look for the procedure descriptions, e.g. IMSBATCH is the name for the BMP. Right after the sample JCL in section IMSBATCH Procedure Parameters is a list of all applicable DFSRRC00 symbols for this execution environment, for which the meaning can be looked up in section Parameter Description in the same book.

This applies to IMS V9 or earlier.
Regards,
Anuj

payilagamch
Member
Posts: 12
Joined: Tue Jan 14, 2014 1:20 pm
Contact:

Post by payilagamch » Wed Jan 15, 2014 8:56 am

Hi,

As you are sing CMPAT=YES in PSBGEN, DLI will internally use one PCB for checkpoint restart. You have to have two pcbs in linkage section. First one should be IO-PCB. Seocnd one is the pcb for your DB RETDTRAN. Similary you have to use these two pcbs in DLITCBL or PROCEDURE DIVISION USING IO-PCB,RETDTRAN-PCB statement. If you dont want IO-PCB, remove CMPAT=YES in PSBGEN. Hope this explains

Thanks
Payilagam
Payilagam Chennai
www.payilagam.com

academyindia4

Topic deleted by Admin

Post by academyindia4 » Sat Jan 30, 2016 10:25 pm

<< Content deleted By Admin >>

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others