Getting DB status code as XC

anirudh1985 · Posted: Fri Apr 11, 2008 2:56 pm Post subject: Getting DB status code as XC

Hi all,
We are having a load program whill load the IMS database(OSAM). The input is a flat file. When we execute the batch JCL we are getting DB status code as XC. Please help us to proceed. its a batch program.

anirudh1985 · Posted: Fri Apr 11, 2008 4:17 pm Post subject:

Can somebody please help me....

Sandy Zimmer · Posted: Fri Apr 11, 2008 7:02 pm Post subject:

What does your PSB look like? I don't think you are using a "load" PSB. This status code is for message processing.

XC
Explanation:
The program inserted a message that has some bits in the Z1 field set. The Z1 field is reserved for IMS.

Programmer response:
Correct the program to prevent it from setting those bits.

http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.ims9.doc.mc/p0hexpl.htm

anirudh1985 · Posted: Mon Apr 14, 2008 10:11 am Post subject:

Thanx a lot for your reply can you tell me how a load PSB looks like..

This is how our psb looks like...:

PCB TYPE=DB,DBDNAME=YJEPU,PROCOPT=A,KEYLEN=23
SENSEG NAME=EPROOT,PARENT=0
PSBGEN LANG=COBOL,PSBNAME=YEPPSB,CMPAT=YES
END

Since we are new to ims we are finding this a lil difficult kindly guide us thru

Sandy Zimmer · Posted: Mon Apr 14, 2008 4:48 pm Post subject:

Can you do some research? That is the best way to learn. But, first of all, for a load, the databases must be stopped - offline. The only processing option will be PROCOPT=L. Your flat file must be sorted.

Sandy Zimmer · Posted: Mon Apr 14, 2008 5:10 pm Post subject:

TYPE=DB,DBDNAME=YJEPU,KEYLEN=23,PROCOPT=LS
SENSEG NAME=EPROOT,PARENT=0
PSBGEN PSBNAME=YEPPDB,LANG=COBOL
END

Here is an example - assuming that this is truly a root only database.

anirudh1985 · Posted: Mon Apr 14, 2008 6:50 pm Post subject:

Thank you for your reply SANDY We tried changing the PROCOPT too but in vain.....the sysout shows the following:

FUNC ISRT ISRT
DB-PCB-MASK
IN-EPROOT BUF 011as02cs060

SSA EPROOTU EPROOT *--
IN-EPROOT BUF 011as02cs060

DB STATUS CODEXC
PCB STATUS CODE XC YEPPSB
FUNC ISRT ISRT
DB-PCB-MASK XC
IN-EPROOT BUF 021sj02me007

SSA EPROOTU EPROOT *--
IN-EPROOT BUF 021sj02me007

We have done a lot of research but still unable to solve this...Please try to help us:)

Sandy Zimmer · Posted: Mon Apr 14, 2008 7:12 pm Post subject:

Display the PSB - /dis pgm YEPPDB

Sandy Zimmer · Posted: Mon Apr 14, 2008 7:16 pm Post subject:

Try searching the forum for a LOT of very helpful info......for instance...

http://ibmmainframes.com/about9880.html

anirudh1985 · Posted: Tue Apr 15, 2008 10:37 am Post subject:

Sandy Zimmer · Posted: Tue Apr 15, 2008 6:28 pm Post subject:

Your display of the database should indicate that it is stopped.

Compare what you have done with the procedure that works against the procedure that does not work.

anirudh1985 · Posted: Wed Apr 16, 2008 4:47 pm Post subject:

Sandy Zimmer · Posted: Wed Apr 16, 2008 6:55 pm Post subject:

Are you sure that you recompiled your PSB? And, please read this.....

http://ibmmainframes.com/viewtopic.php?t=26538

Bitneuker · Posted: Thu Apr 17, 2008 2:14 am Post subject:

I'm afraid TS only modified the PROCOPT but didn't remove the CMPAT=Y so the first PCB is still the IO/PCB.

anirudh1985 · Posted: Thu Apr 17, 2008 11:16 am Post subject: