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
 

 

ABEND=S04E U0000 REASON=00E40009

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DB2
View previous topic :: :: View next topic  
Author Message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Thu Nov 06, 2008 2:05 pm    Post subject: ABEND=S04E U0000 REASON=00E40009
Reply with quote

Hi all,

I am facing this abend from last 2 days.

S020 - ABEND=S04E U0000 REASON=00E40009

and on checking the log i can see this.

DSNT500I DSNUGBAC - RESOURCE UNAVAILABLE
REASON 00C200EA
TYPE 00000201
NAME BBDD501 .BBDI501


The Step S020 is using an utility to upload records in to the some table BBDT501.

How can i solve the abend?

Any help would be much appreciated.
Back to top
View user's profile Send private message

nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Thu Nov 06, 2008 2:06 pm    Post subject: Reply to: ABEND=S04E U0000 REASON=00E40009
Reply with quote

Forgot to add...BBDT501 is a DB2 Table.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Thu Nov 06, 2008 2:15 pm    Post subject: Reply to: ABEND=S04E U0000 REASON=00E40009
Reply with quote

look at the manual to see the resource type,
and take the appropriate action to make it available to Your process
Back to top
View user's profile Send private message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Thu Nov 06, 2008 2:20 pm    Post subject:
Reply with quote

is it possible? I checked the manuals and they were talking about the using Reorg utility.

This abend i feel is related to Tablespace or Indexspace.
Back to top
View user's profile Send private message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Fri Nov 07, 2008 10:33 am    Post subject:
Reply with quote

I checked the reason codes in the manual..

The manual says:-
This abend reason code is issued by the following CSECTs: DSNUGACC,
DSNUGAGS, DSNUGUTC, DSNURLOG

But the log is talking about DSNUGBAC ?

Am i searching rightly?

Is there any way else to sought out this abend?
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Nov 07, 2008 10:41 am    Post subject:
Reply with quote

Hello,

It may help if you post the jcl and control statements from this job.

It may also help if you post all of the diagnostic info presented - do not pick and choose, but most all od the messages including the message id.

One possibility is that you are trying to load too much data.
Back to top
View user's profile Send private message
anandinmainframe

Active User


Joined: 31 May 2007
Posts: 171
Location: India

PostPosted: Fri Nov 07, 2008 12:16 pm    Post subject: Reply to: ABEND=S04E U0000 REASON=00E40009
Reply with quote

Hi,
Save you member if it it is in PDS and refresh it and again run the same one it will work
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Fri Nov 07, 2008 12:22 pm    Post subject: Reply to: ABEND=S04E U0000 REASON=00E40009
Reply with quote

the resource type 201 as the manual says is related to the index space
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dsnm1k12/3.2?ACTION=MATCHES&REQUEST=resource+type&TYPE=FUZZY&SHELF=DSNSHKA2.bks&DT=20080204020214&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT

look at the manual for the meanng of the reason code as explained for the
dsnt500i and dsnt501i
Back to top
View user's profile Send private message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Fri Nov 07, 2008 12:40 pm    Post subject:
Reply with quote

JCL :

//S010 EXEC PGM=IDCAMS
//SYSUDUMP DD SYSOUT=A,HOLD=YES
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
REPRO IFILE(DD1) OFILE(DD2)
//DD1 DD DSN=W5.KSHSS1,DISP=SHR,
//DD2 DD DSN=&&W761010A,
// UNIT=DISK,DISP=(NEW,PASS),
// SPACE=(CYL,(6,1),RLSE),
// DCB=(RECFM=FB,LRECL=0110,BLKSIZE=09900)
//S011 EXEC AUTOABND,CODE=1212,COND=(0,EQ,S010)
//S020 EXEC Y2ZPUT0,UID=W761
//SYSREC DD DSN=&&W761010A,DISP=(OLD,DELETE)
//SYSDISC DD DSN=&&W761020A,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(1,1),RLSE)
//SYSERR DD DSN=&&W761020B,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(1,1),RLSE)
//SYSMAP DD DSN=&&W761020C,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(1,1),RLSE)
//SORTWK01 DD DSN=&&W761020D,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(8,2),RLSE)
//SORTWK02 DD DSN=&&W761020E,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(8,2),RLSE)
//SORTWK03 DD DSN=&&W761020F,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(5,1),RLSE)
//SORTWK04 DD DSN=&&W761020G,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(5,1),RLSE)
//SYSUT1 DD DSN=&&W761020H,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(25,2),RLSE)
//SORTOUT DD DSN=&&W761020I,
// UNIT=DISK,DISP=(NEW,DELETE),
// SPACE=(CYL,(25,2),RLSE)
//SYSIN DD DSN=USER.SYSIN1(LBBDT501),DISP=SHR
//
--------------------------------------------------------------------

sysin cARD says:-

LOAD DATA INDDN SYSREC
RESUME NO REPLACE LOG YES
SORTDEVT DISK SORTNUM 4
INTO TABLE DB2H00.BBDT501
(YAAC011 POSITION (00001) CHAR(0002),
XZAA013 POSITION (00003) CHAR(0007),
XZAA023 POSITION (00010) CHAR(0015),
XZAA024 POSITION (00025) CHAR(0015))

-----------------------------------------------------------------
SYSOUT message

-JOBNAME STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SE
-W761000T S010 00 723 708 .00 .00 .3 19
-W761000T S011 IOATEST FLUSH 0 0 .00 .00 .0
IEF450I W761000T U S020 - ABEND=S04E U0000 REASON=00E40009 577
TIME=00.21.47
-W761000T S020 U *S04E 46 72 .00 .00 5.1 5

DSNU000I DSNUGUTC - OUTPUT START FOR UTILITY, UTILID = W761
DSNU050I DSNUGUTC - LOAD DATA INDDN SYSREC RESUME NO REPLACE LOG YES
DSNU650I -RDB1 DSNURWI - INTO TABLE DB2H00.BBDT501
DSNU650I -RDB1 DSNURWI - (YAAC011 POSITION(1) CHAR(2),
DSNU650I -RDB1 DSNURWI - XZAA013 POSITION(3) CHAR(7),
DSNU650I -RDB1 DSNURWI - XZAA023 POSITION(10) CHAR(15),
DSNU650I -RDB1 DSNURWI - XZAA024 POSITION(25) CHAR(15))

DSNT500I DSNUGBAC - RESOURCE UNAVAILABLE
REASON 00C200EA
TYPE 00000201
NAME BBDD501 .BBDI501



---------------------------------------------------------------------------
S011 is autoabend step,which run based on the return code from previous step.

I hope these details will suffice you.
Back to top
View user's profile Send private message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Fri Nov 07, 2008 12:51 pm    Post subject:
Reply with quote

Y2ZPUT0 will be loading the records from input file to the DB [ mentioned in SYSIN Card ]
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Fri Nov 07, 2008 12:52 pm    Post subject: Reply to: ABEND=S04E U0000 REASON=00E40009
Reply with quote

all the info needed to find out about the abend was right under Your eyes... and of Your support

the message ... DSNT0500I
-- in the messages and codes manual for db2

the resource type ... 201
-- I gave You the link to the table

the reason code 00C200EA
why did not try to help Yourself a bit
I googled with it and the answer war right there
http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.db29.doc.codes/00c200ea.htm

now....
work with Your support to find out why the resource is owned by somebody else !!

easy wasn' t it
Back to top
View user's profile Send private message
nartcr

New User


Joined: 06 Jun 2007
Posts: 78
Location: anada

PostPosted: Fri Nov 07, 2008 2:36 pm    Post subject:
Reply with quote

Thanks Enrio for the prompt answer.
The help is much appreciated..Its only i am not used to these kind.
Thanks once again.
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 -> DB2 All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 pm
No new posts Job failing with USER = 4093 REASON C... Pradeepa S ABENDS & Debugging 1 Wed May 17, 2017 3:35 pm
No new posts IMS region inactive - User abend code... gthmrj IMS DB/DC 5 Tue Mar 07, 2017 12:29 pm
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm


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