DB2 Utility Abend S04E

JESMSGLG:

15.37.57 JOB06268  IEC030I B37-04,IFG0554A,LOADDER,DSNUPROC,SW07WK03,1747,DK1747,0427041D,

SYS10141.T153455.RA000.LOADDER.R0200948
 15.37.57 JOB06268  ICE097I 2 LOADDER .STEP1    SORT RECOVERING FROM B37 ABEND ON SORTWK DATA SET

SYSPRINT:

DSNUGSRP - ERROR FROM SORT COMPONENT RC=16, UTILITY STOPPED         
DSNUGSAT - UTILITY BATCH MEMORY EXECUTION ABENDED, REASON=X'00E40005'

JCL:

...                       
//SYSUT1  DD DSN=B2OSC27.LOADUT1.RSA.PSJRNL.HEADER,
//        DISP=(NEW,DELETE,DELETE),UNIT=3390,     
//         VOL=SER=DK8172,                        
//        SPACE=(TRK,(1500,1000),RLSE)            
//SORTOUT DD DSN=B2OSC27.LOADOUT.RSA.PSJRNL.HEADER,
//        DISP=(NEW,DELETE,DELETE),UNIT=3390,     
//         VOL=SER=DK8173,                        
//        SPACE=(TRK,(1500,1000),RLSE)            
//SYSREC  DD DSN=B2OSC27.RSA.PSJRNL.HEADER.D1,    
//        DISP=OLD                                
...                              

分析：

作业错误码是04E，应该是SORTOUT数据集所在volume的空间不足，上面JCL中DK8173是在我发现这个问题时改的，本来是72.但是这样改过之后还是不行，后来仔细查看了MSG信息中说的是SORTWK数据集不能extend，导致空间不足报了B37错误。

这样在JCL中增加下面几行：

//SORTWK01 DD UNIT=3390,SPACE=(CYL,(100,50),RLSE),
//         VOL=SER=DK8172                        
//SORTWK02 DD UNIT=3390,SPACE=(CYL,(100,50),RLSE),
//         VOL=SER=DK8172                        
//SORTWK03 DD UNIT=3390,SPACE=(CYL,(100,50),RLSE),
//         VOL=SER=DK8172                        
//SORTWK04 DD UNIT=3390,SPACE=(CYL,(100,50),RLSE),
//         VOL=SER=DK8172                        

再次提交后，问题解决。