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
PCB address in BMP
Moderator: Moderator Group
PCB address in BMP
all the best
-
- Moderator
- Posts: 1625
- Joined: Sat Aug 09, 2008 9:02 am
- Location: Mumbai, India
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.
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
Anuj
-
- Member
- Posts: 12
- Joined: Tue Jan 14, 2014 1:20 pm
- Contact:
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
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
www.payilagam.com
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
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page