The issue is with the E37 - I don't see the error code but if is an 8 this is the possible reason:
A multi-volume physical sequential data set was being written on a direct access device. All space was filled on the volume, and an attempt was made to obtain space on the next specified volume. Either the space was not available on that volume, the data set already existed on that volume, or there is no space available in the VTOC or the VTOC index. The message contains the volume serial number of the last volume used. Thank You -----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Ron Thomas Sent: Tuesday, March 26, 2024 12:24 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: DFsort error message CAUTION! EXTERNAL SENDER! STOP, ASSESS, AND VERIFY Do you know this person? Were you expecting this email? If not, report it using the Report Phishing Button! Hi All - We are getting a sort error on a huge file . Below are the details from log Parm cards used SORT FIELDS=COPY Error Log details ICE193I 0 ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED ICE252I 1 PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS ICE088I 0 ITGB9059.STEP02 .SORT , INPUT LRECL = 317, BLKSIZE = 27896, TYPE = ICE093I 0 MAIN STORAGE = (MAX,33554432,33554432) ICE156I 0 MAIN STORAGE ABOVE 16MB = (33497072,33497072) ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y, ICE128I 0 OPTIONS: SIZE=33554432,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ER ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=FULL ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT= ICE130I 0 OPTIONS: RESALL=8192,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT= ICE131I 0 OPTIONS: TMAXLIM=33554432,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=Y,CFW ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE ,EXITC ICE133I 0 OPTIONS: HIPRMAX=0 ,DSPSIZE=2000,ODMAXBF=2097152,SOLRF=N,VLLONG=N ICE235I 0 OPTIONS: NULLOUT=RC0 ICE236I 0 OPTIONS: DYNAPCT=10 ,MOWRK=Y,TUNE=STOR,EXPMAX=2000 ,EXPOLD=MAX ,E ICE084I 0 EXCP ACCESS METHOD USED FOR SORTIN ICE889I 0 CT=MAX , SB=3, L=0, D=0000, CCW=1MAM ICE902I 0 O I PP11 ICE906I 1 ST=ABOVE,SR=33497072,RC=0 ICE907I 1 ST=ABOVE,SA=33497056,NF=1,LF=33497056,SF=33497056 ICE906I 1 ST=BELOW,SR=98320,RC=0 ICE907I 1 ST=BELOW,SA=49152,NF=1,LF=49152,SF=49152 ICE231I 0 STORAGE USED FOR OUTFIL : BELOW 16M = 20480, ABOVE 16M = 2119680 ICE231I 0 STORAGE USED FOR OUTFIL : BELOW 16M = 20480, ABOVE 16M = 2119680 ICE855I 0 SORTOUT : TX=N, R=J, L=J, B=D, BL=0, BR=0, DCT=37, VS=N, RU=X, SB=8 ICE210I 0 SORTOUT : EXCP USED, LRECL = 317, BLKSIZE = 27896, TYPE = FB ICE751I 2 EF-I80638 CB-NONE F0-NONE DA-I76950 ICE185A 0 AN SE37 ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT (PHASE Job Step work file details . Allocated SORTWK50 files XXSORTWK09 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK10 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK11 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK12 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK13 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK14 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK15 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK16 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK17 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK18 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) XXSORTWK19 DD DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(&CYLNO)) IEFC653I SUBSTITUTION JCL - DISP=(NEW,DELETE,DELETE),SPACE=(CYL,(200)) //SORTOUT DD DSN=KGN01.PS.RPCFIL.AMT.ACTV.UNLD.FINAL1.HDR, // SPACE=(CYL,(1200,500),RLSE),VOL=(,,,99), // RECFM=FB,DSORG=PS, // DISP=(NEW,CATLG,DELETE),LRECL=317,BLKSIZE=0 //SYSIN DD DSN=MK.PS.PROD.PARMLIB(PSJH06P),DISP=SHR Could someone please let us know what needs to be done here? Regards Ron T ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
