Yes... thanks for all the feedback and my initial posting was more out
of frustration with DFSORT and SMS.
So here comes more detail :
The Scene of the crime :
Input Dataset contains 4,826,605 records of 2000 bytes each.
The Sort Control Cards :
ICE143I 0 BLOCKSET SORT TECHNIQUE SELECTED
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS,
EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 03:58 ON
SUN JUL
SORT FIELDS=(49,6,A,59,8,A,91,6,A,99,8,A,81,2,A,
97,2,A,1947,3,A,55,4,A,1950,2,A),FORMAT=CH
ICE201I E RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE751I 0 C5-K90007 C6-K90007 C7-K90000 C8-K90007 E4-K90007 C9-BASE
E5-K14794
ICE193I 0 ICEAM1 ENVIRONMENT IN EFFECT - ICEAM1 INSTALLATION MODULE SELECTED
ICE088I 1 HWLK221A.STEP220 .SORT , INPUT LRECL = 2000, BLKSIZE =
4000, TYPE =
ICE092I 0 MAIN STORAGE = (350,524288,524288)
ICE156I 0 MAIN STORAGE ABOVE 16MB = (458304,458304)
ICE127I 0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0
,SPANINC=RC16,VLSCMP=N,SZERO=Y,
ICE128I 0 OPTIONS:
SIZE=524288,MAXLIM=2097152,MINLIM=524288,EQUALS=Y,LIST=Y,ERET
ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=NO
,WRKSEC=Y,OUTSEC=Y,VERIFY=Y,CHALT=
ICE130I 0 OPTIONS: RESALL=0,RESINV=0,SVC=109
,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=N,S
ICE131I 0 OPTIONS:
TMAXLIM=5242880,ARESALL=0,ARESINV=0,OVERRGN=0,CINV=Y,CFW=Y,DS
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE
,EXITC
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX
,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMI
ICE235I 0 OPTIONS: NULLOUT=RC0
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTOUT
ICE084I 0 EXCP ACCESS METHOD USED FOR SORTIN
ICE750I 0 DC 0 TC 9653212000 CS DSVVV KSZ 45 VSZ 45
Sort Step JCL :
XXSORT PROC PROG=ICEMAN,
XX WTR1='*',
XX CYL=15,
XX DEVTYP=TMPDA,
XX RGIN=6M
XXSORT EXEC PGM=&PROG,REGION=&RGIN,PARM='SIZE=350'
IEFC653I SUBSTITUTION JCL - PGM=ICEMAN,REGION=6M,PARM='SIZE=350'
XXSYSOUT DD SYSOUT=&WTR1
IEFC653I SUBSTITUTION JCL - SYSOUT=*
XXSYSOUX DD SYSOUT=&WTR1
IEFC653I SUBSTITUTION JCL - SYSOUT=*
XXSYSLMOD DD SPACE=(3600,(20,20,1)),DSN=&&GOSET,
XX UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(3600,(20,20,1)),DSN=&&GOSET,UNIT=TMPDA
XXSYSLIN DD SPACE=(80,(10,10,)),DSN=&&LOADSET,
XX UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(80,(10,10,)),DSN=&&LOADSET,UNIT=TMPDA
XXSYSUT1 DD SPACE=(1000,(60,20)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(1000,(60,20)),UNIT=TMPDA
//SORTWK01 DD SPACE=(CYL,(4000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
//SORTWK02 DD SPACE=(CYL,(4000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK02 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SORTWK03 DD SPACE=(CYL,(4000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK03 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SORTWK04 DD SPACE=(CYL,(2000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK04 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SORTWK05 DD SPACE=(CYL,(3000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK05 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SORTWK06 DD SPACE=(CYL,(3000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK06 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SORTWK07 DD SPACE=(CYL,(1000,500)),UNIT=TMPDA,
// DCB=(LRECL=2000,BLKSIZE=28000,RECFM=FB)
X/SORTWK07 DD SPACE=(CYL,(&CYL,&CYL)),UNIT=&DEVTYP
//*
IEFC653I SUBSTITUTION JCL - SPACE=(CYL,(750,750)),UNIT=TMPDA
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=HWL.HWLK228P.ARCHIVE,DISP=OLD
//SORTOUT DD DSN=HWL.HWLKSORT.HWLK228P,
// DISP=(NEW,PASS,DELETE),
// STORCLAS=LRGETAPE,UNIT=3490,
// DCB=(HWG.PATTERN.RECL2000,BLKSIZE=0)
//SYSIN DD *
//*
The WORK packs available :
We have 7 work packs with the following FREE space :
WORK00 9,800 Cylinders
WORK01 9,861 Cylinders
WORK02 9,555 Cylinders
WORK03 2,288 Cylinders
WORK04 3,321 Cylinders
WORK05 4,222 Cylinders
Work06 3,333 Cylinders
JOB Log
IEF233A M 3E00,R06331,,HWLK221A,SORT,HWL.HWLK228P.ARCHIVE
IEF233A M 3600,PRIVAT,SL,HWLK221A,SORT,HWL.HWLKSORT.HWLK228P
IEC502E K 3E00,R06331,SL,HWLK221A,SORT,HWL.HWLK228P.ARCHIVE
IEC501A M 3E00,R03689,SL,COMP,HWLK221A,SORT.STEP220,HWL.HWLK228P.ARCHIVE
IEC030I
B37-04,IFG0554A,HWLK221A,SORT,SORTWK06,6223,WRK003,04210011,SYS07182.T
+ICE097I 1 HWLK221A.STEP220 SORT RECOVERING FROM B37 ABEND ON SORTWK
DATA SET
IEC030I
B37-04,IFG0554A,HWLK221A,SORT,SORTWK03,692C,WRK002,04210010,SYS07182.T
+ICE097I 1 HWLK221A.STEP220 SORT RECOVERING FROM B37 ABEND ON SORTWK
DATA SET
IEC030I
B37-04,IFG0554A,HWLK221A,SORT,SORTWK02,692B,WRK001,04210010,SYS07182.T
+ICE097I 1 HWLK221A.STEP220 SORT RECOVERING FROM B37 ABEND ON SORTWK
DATA SET
IEC030I
B37-04,IFG0554A,HWLK221A,SORT,SORTWK04,692A,WRK000,04210010,SYS07182.T
+ICE097I 1 HWLK221A.STEP220 SORT RECOVERING FROM B37 ABEND ON SORTWK
DATA SET
IEA995I SYMPTOM DUMP OUTPUT 114
USER COMPLETION CODE=0046
Anton
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
