Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Getting DB status code as XC

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC
View previous topic :: :: View next topic  
Author Message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Fri Apr 11, 2008 2:56 pm    Post subject: Getting DB status code as XC
Reply with quote

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.
Back to top
View user's profile Send private message

anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Fri Apr 11, 2008 4:17 pm    Post subject:
Reply with quote

Can somebody please help me....icon_sad.gif
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Fri Apr 11, 2008 7:02 pm    Post subject:
Reply with quote

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
Back to top
View user's profile Send private message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Mon Apr 14, 2008 10:11 am    Post subject:
Reply with quote

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
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Apr 14, 2008 4:48 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Apr 14, 2008 5:10 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Mon Apr 14, 2008 6:50 pm    Post subject:
Reply with quote

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:)
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Apr 14, 2008 7:12 pm    Post subject:
Reply with quote

Display the PSB - /dis pgm YEPPDB
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Mon Apr 14, 2008 7:16 pm    Post subject:
Reply with quote

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

http://ibmmainframes.com/about9880.html
Back to top
View user's profile Send private message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Tue Apr 15, 2008 10:37 am    Post subject:
Reply with quote

Sandy Zimmer wrote:
Display the PSB - /dis pgm YEPPDB

We do this every time before we run the run jcl

/DISP PROG YEPPSB
/DISP DB YJEPU OPEN
Inspite of this we are facing the problem.In fact we have tried with our own sample program which loads a sample db..This works correctly however the above program fails...icon_sad.gif
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Tue Apr 15, 2008 6:28 pm    Post subject:
Reply with quote

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.
Back to top
View user's profile Send private message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Wed Apr 16, 2008 4:47 pm    Post subject:
Reply with quote

Sandy Zimmer wrote:
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.


We are still not able to solve the XC please help us.
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Wed Apr 16, 2008 6:55 pm    Post subject:
Reply with quote

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

http://ibmmainframes.com/viewtopic.php?t=26538
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Thu Apr 17, 2008 2:14 am    Post subject:
Reply with quote

I'm afraid TS only modified the PROCOPT but didn't remove the CMPAT=Y so the first PCB is still the IO/PCB.
Back to top
View user's profile Send private message
anirudh1985
Currently Banned

New User


Joined: 22 Aug 2007
Posts: 66
Location: bangalore

PostPosted: Thu Apr 17, 2008 11:16 am    Post subject:
Reply with quote

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



But when we change the procopt to L or LS The PSB terminates and we need to restart....we are getting NOTINIT status in IMS region
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10203
Location: italy

PostPosted: Thu Apr 17, 2008 12:30 pm    Post subject: Reply to: Getting DB status code as XC
Reply with quote

Just my 2€ worth...
for what reason are You running the load as a BMP,
wouldn' t it be faster and safer to run it as a standalone batch IMS job.

I might be wrong, since it has been a long time since I played with IMS, but... meditate
Back to top
View user's profile Send private message
Sandy Zimmer

Active Member


Joined: 13 Jun 2007
Posts: 826
Location: Wilmington, DE

PostPosted: Thu Apr 17, 2008 4:27 pm    Post subject:
Reply with quote

You need to REMOVE the CMPAT=Y - recompile the PSB - stop the database.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IMS DB/DC All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm
This topic is locked: you cannot edit posts or make replies. Need to code a Rexx PGM sundaram.naveen CLIST & REXX 18 Thu Oct 06, 2016 6:45 pm
No new posts Need Help in understanding what is th... mainakdalal PL/I & Assembler 9 Mon Oct 03, 2016 8:03 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us