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 <[email protected]> On Behalf Of Bob T Roller Sent: 27 March 2024 17:04 To: [email protected] 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 <[[email protected]](mailto:On Tue, Mar 26, 2024 at 1:24 PM, Ron Thomas <<a href=)> 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=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 [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
