Re: DFsort error message
As for many abend codes, the numbers relate to SVC number. Open SVC is 19, which is x'13' hence many OPEN issues are 213 or 913 and so on. EOV SVC is 55, which is x'37', hence many out of space issues are D37, E37 and so on. This informal rule applies to many other SVCs as well. Lennie Dymoke-Bradshaw https: //rsclweb.com -Original Message- From: IBM Mainframe Discussion List On Behalf Of Bob T Roller Sent: 27 March 2024 17:04 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: DFsort error message One of the most important things I learned 45 years ago was 37 is always a space issue. 13 was an open issue and 14 a close issue. Sent from [Proton Mail](https://proton.me/mail/home) for iOS On Tue, Mar 26, 2024 at 1:24 PM, Ron Thomas <[0600304cab5d-dmarc-requ...@listserv.ua.edu](mailto:On Tue, Mar 26, 2024 at 1:24 PM, Ron Thomas < wrote: > 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=, 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 > >
Re: DFsort error message
One of the most important things I learned 45 years ago was 37 is always a space issue. 13 was an open issue and 14 a close issue. Sent from [Proton Mail](https://proton.me/mail/home) for iOS On Tue, Mar 26, 2024 at 1:24 PM, Ron Thomas <[0600304cab5d-dmarc-requ...@listserv.ua.edu](mailto:On Tue, Mar 26, 2024 at 1:24 PM, Ron Thomas < wrote: > 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=, 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
Re: DFsort error message
This webpage simplifies Sx37 abend https://ruifeio.com/2013/10/02/most-common-out-of-space-abends-and-error-codes/ E37-04 No more volumes specified E37-08 No space available on new volume E37-0C DADSM (Direct Access Device Space Management) exit rejected extend Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Sri Hari Kolusu Sent: Tuesday, March 26, 2024 11:47 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: DFsort error message >> Is this a standalone sort or one from a cobol program or db2 process? Lizette, It is a JCL invoked SORT. Clue : ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED Thanks, Kolusu DFSORT Development IBM Corporation -- 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
Re: DFsort error message
>> Is this a standalone sort or one from a cobol program or db2 process? Lizette, It is a JCL invoked SORT. Clue : ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFsort error message
Sort received an SE37: ICE185A 0 AN SE37 ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT (PHASE So the dataset was probably allocated on a volume without sufficient space to expand or ran out of extents Is this a standalone sort or one from a cobol program or db2 process? Regards Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ron Thomas Sent: Tuesday, March 26, 2024 10:24 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: DFsort error message 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=, 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 //SYSINDD 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
Re: DFsort error message
>> ICE185A 0 AN SE37 ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT >> (PHASE Ron, Most likely your job abended due to lack of space on SORTOUT dataset. Check the JESMSGLG for a detailed explanation of the E37 abend also the dataset name. Fix the space on the dataset by adding more units or compressing/stripping. >> Parm cards used SORT FIELDS=COPY If you are using COPY operation, you do NOT need sortwkxx datasets at all. Delete all the SORTWKxx allocations. Thanks, Kolusu DFSORT Development IBM Corporation -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFsort error message
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 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=, 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 //SYSINDD 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 /
DFsort error message
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=, 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 //SYSINDD 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
Re: DFSORT Error message
Ok both the statements are working , as i have put the continuation character wrongly . Regards Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
Sri h Kolusu wrote: >Not really. DFSORT does NOT care about the sequence of the keywords. You can >have them in any order. That is good, I was just reading those 'train tracks' schematics and a$$umed the keyword sequence could be a problem. Many thanks. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
>>After RTFM, I see you have the sequence incorrect. Elardus, Not really. DFSORT does NOT care about the sequence of the keywords. You can have them in any order. OP's original statement is just missing a continuation character which Dave betten( thanks Dave) pointed out. By adding the continuation character he should be able to get the desired results without making any additional changes So OP's original statements are good provided that he added the continuation character hyphen (- ) before 73rd byte +1+2+3+4+5+6+7--- //TOOLINDD * SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST - USING(CTL1) /* Ron Thomas wrote : >>>I have given as below, but still the issue is there SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST - USING(CTL1) Ron, Are you sure you added the continuation character before 73rd byte ? Show us the complete error messages after you added the continuation character. Thanks, Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List wrote on 06/02/2017 06:53:34 AM: > From: Elardus Engelbrecht > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 06/02/2017 06:54 AM > Subject: Re: DFSORT Error message > Sent by: IBM Mainframe Discussion List > > Ron Thomas wrote: > > After RTFM, I see you have the sequence incorrect. > > Change > > > SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST > > USING(CTL1) > > to > > SELECT FROM(SORTIN) TO(SORTF1) DISCARD(SORTF2) ON(16,50,CH) FIRST - > USING(CTL1) > > Let us know if this works or not? > > Groete / Greetings > Elardus Engelbrecht > > -- > 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
Re: DFSORT Error message
Thanks a lot . it worked ! Regards Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
Ron Thomas wrote: After RTFM, I see you have the sequence incorrect. Change > SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST > USING(CTL1) to SELECT FROM(SORTIN) TO(SORTF1) DISCARD(SORTF2) ON(16,50,CH) FIRST - USING(CTL1) Let us know if this works or not? Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
Ron Thomas wrote: >I have given as below, but still the issue is there >SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST - >USING(CTL1) Please post the message(s). What version of DFSORT and z/OS are you using? I think your statement is now finally correct, but I am now RTFM to see if your statements are correct or not... Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
I have given as below, but still the issue is there SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST - USING(CTL1) Thanks, Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT Error message
I think USING is a parameter of the SELECT but ICETOOL is seeing it as a separate statement. Change the end of your SELECT statement to include a continuation character. //TOOLINDD * SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST - USING(CTL1) Have a nice day, Dave Betten z/OS Performance Specialist Cloud and Systems Performance IBM Corporation email: bet...@us.ibm.com IBM Mainframe Discussion List wrote on 06/02/2017 08:17:31 AM: > From: Ron Thomas > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 06/02/2017 08:19 AM > Subject: DFSORT Error message > Sent by: IBM Mainframe Discussion List > > Hello . > > I am trying to extract unique invoice numbers to a file using DFSORT > ,ICETOOL and below is my control card.n The o/p i want to reformat it. > > I am getting the below error messages. could someone let me know > where the issue is ? > > //TOOLINDD * > SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST > USING(CTL1) > /* > //CTL1CNTL DD * > OUTFIL FNAMES=SORTF1,OUTREC=(06,50) > OUTFIL FNAMES=SORTF2,OUTREC=(06,50) > /* > > > ICE627I 0 DFSORT CALL 0001 FOR SORT FROM SORTIN TO OUTFIL COMPLETED > ICE628I 0 RECORD COUNT: 0429362 > ICE638I 0 NUMBER OF RECORDS RESULTING FROM CRITERIA: 0097455 > ICE602I 0 OPERATION RETURN CODE: 00 > >USING(CTL1) >$ > ICE614A 0 INVALID OPERATOR > ICE602I 0 OPERATION RETURN CODE: 12 > > > Thanks > 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
DFSORT Error message
Hello . I am trying to extract unique invoice numbers to a file using DFSORT ,ICETOOL and below is my control card.n The o/p i want to reformat it. I am getting the below error messages. could someone let me know where the issue is ? //TOOLINDD * SELECT FROM(SORTIN) TO(SORTF1) ON(16,50,CH) DISCARD(SORTF2) FIRST USING(CTL1) /* //CTL1CNTL DD * OUTFIL FNAMES=SORTF1,OUTREC=(06,50) OUTFIL FNAMES=SORTF2,OUTREC=(06,50) /* ICE627I 0 DFSORT CALL 0001 FOR SORT FROM SORTIN TO OUTFIL COMPLETED ICE628I 0 RECORD COUNT: 0429362 ICE638I 0 NUMBER OF RECORDS RESULTING FROM CRITERIA: 0097455 ICE602I 0 OPERATION RETURN CODE: 00 USING(CTL1) $ ICE614A 0 INVALID OPERATOR ICE602I 0 OPERATION RETURN CODE: 12 Thanks Ron T -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
