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
