Page 1 of 1

DSNUPROC abend: ABEND=S04E U0000 REASON=00E40345

PostPosted: Mon Jun 29, 2015 8:46 pm
by vxd012
Good day,

Could anyone please assist with this abend code? I found some posts relating to this but none seem to resolve my issue.

I am trying to load 13 Million rows into a table (new version of my database - must carry over all the data). At first I was getting an SB37 but this seemed to be resolved when I changed my temporary work files to tape:

//DSNUPROC.SORTWK01 DD DSN=&&SORT01,
// DISP=(NEW,DELETE,DELETE),
//* SPACE=(CYL,(500,300),RLSE),
//* UNIT=SYSDA
// UNIT=TAPE,VOL=(,,,12)

Now, I am getting the S04E abend and I can't seem to think of any way to get around it. My input file is on tape and I am not familiar with a way to split it in half or in four - if it was on disk I would use file aid.

In my log I have:
IEA848I DUMP SUPPRESSED - ABDUMP MAY NOT DUMP STORAGE FOR KEY 0-7 JOB OAL3A01L
IECTMS9 86C7,131611,** WORK TAPE **
IECTMS9 86C3,132291,** WORK TAPE **
IEC205I SORTOUT,OAL3A01L,DSNUPROC,FILESEQ=1, COMPLETE VOLUME LIST, 331
DSN=SYS15180.T104548.RA000.OAL3A01L.SORTUT.H03,VOLS=132291
IEF450I OAL3A01L DSNUPROC LOAD - ABEND=S04E U0000 REASON=00E40345 332

In the UTPRINT file I have:
SORT FIELDS=(00006.0,00000.4,A,00012.0,00135.0,A,00001.0,00005.0,A),
FORMAT=BI,FILSZ=E000000065327340
RECORD TYPE=F,LENGTH=(00146,00146,00146)
OPTION MSGPRT=ALL,MSGDDN=UTPRINT,MAINSIZE=MAX,NOEQUALS
BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 17
END OF DFSORT

Any suggestions as to how to get my load to complete?

Re: DSNUPROC abend: ABEND=S04E U0000 REASON=00E40345

PostPosted: Mon Jun 29, 2015 8:56 pm
by NicC
Did you:
a) research your reason code = 00E40345?
b) research your "BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 17"?
If you did b) then maybe you might have to rethink your fix for the B37.

Re: DSNUPROC abend: ABEND=S04E U0000 REASON=00E40345

PostPosted: Mon Jun 29, 2015 9:01 pm
by vxd012
NicC wrote:a) research your reason code = 00E40345?

I did - that's where I got that this was related to the sort but not too much on how to resolve it

NicC wrote:b) research your "BLOCKSET REQUIRED BUT COULD NOT BE USED - REASON CODE IS 17"?

I just did as you were replying and this is what I found:

17 - A SORTWKdd data set resided on an unsupported device (such as tape).

Like you said, seems I will have to rethink my solution to the SB37..

Thanks!

Re: DSNUPROC abend: ABEND=S04E U0000 REASON=00E40345

PostPosted: Mon Jun 29, 2015 10:37 pm
by vxd012
For reference to others who might also be having this issue. This is how mine was fixed.

As discovered in my previous post, TAPE is not a valid device for the SORTWKxx datasets. I put these back to SYSDA but I was left with an SB37 abend. A colleague suggested I try the following which worked perfectly. Make sure you have the following in all your datasets and you should be good to go.

//DSNUPROC.SORTWK01 DD DSN=&&SORT01,
// DISP=(NEW,DELETE,DELETE),
// SPACE=(CYL,(500,300),RLSE),
// UNIT=(SYSDA,30)

Thanks NicC for pointing me in the right direction!