Thanks skolusu for the response.
But I am getting SOC7 error . The error message is shown below.
0 BLOCKSET SORT TECHNIQUE SELECTED
0 VISIT
http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE
1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 15:07 ON FRI MAY 15, 20
INREC IFTHEN=(WHEN=INIT,
BUILD=(162C'0',1,80,243:SEQNUM,1,ZD,RESTART=(1,3))),
IFTHEN=(WHEN=(243,1,ZD,EQ,1),
OVERLAY=(001:167,7,043:175,12,115:191,8)),
IFTHEN=(WHEN=(243,1,ZD,EQ,2),
OVERLAY=(008:167,7,055:175,12,123:191,8)),
IFTHEN=(WHEN=(243,1,ZD,EQ,3),
OVERLAY=(015:167,7,067:175,12,131:191,8)),
IFTHEN=(WHEN=(243,1,ZD,EQ,4),
OVERLAY=(022:167,7,079:175,12,139:191,8)),
IFTHEN=(WHEN=(243,1,ZD,EQ,5),
OVERLAY=(029:167,7,091:175,12,147:191,8)),
IFTHEN=(WHEN=(243,1,ZD,EQ,6),
OVERLAY=(036:167,7,103:175,12,155:191,8))
SORT FIELDS=(163,3,CH,A),EQUALS
SUM FIELDS=(001,07,ZD,008,07,ZD,015,07,ZD,022,07,ZD,
029,07,ZD,036,07,ZD,043,12,ZD,055,12,ZD,
067,12,ZD,079,12,ZD,091,12,ZD,103,12,ZD,
115,08,ZD,123,08,ZD,131,08,ZD,139,08,ZD,
147,08,ZD,155,08,ZD,167,7,ZD,175,12,ZD)
OUTREC IFTHEN=(WHEN=(115,8,ZD,EQ,0),OVERLAY=(115:8X),HIT=NEXT),
IFTHEN=(WHEN=(123,8,ZD,EQ,0),OVERLAY=(123:8X),HIT=NEXT),
IFTHEN=(WHEN=(131,8,ZD,EQ,0),OVERLAY=(131:8X),HIT=NEXT),
IFTHEN=(WHEN=(139,8,ZD,EQ,0),OVERLAY=(139:8X),HIT=NEXT),
IFTHEN=(WHEN=(147,8,ZD,EQ,0),OVERLAY=(147:8X),HIT=NEXT),
IFTHEN=(WHEN=(155,8,ZD,EQ,0),OVERLAY=(155:8X))
OUTFIL FNAMES=OUT1,REMOVECC,
BUILD=(163,3,5X,
001,07,ZD,M10,LENGTH=7,2X,08,07,ZD,M10,LENGTH=7,2X,
015,07,ZD,M10,LENGTH=7,2X,22,07,ZD,M10,LENGTH=7,2X,
015,07,ZD,M10,LENGTH=7,2X,22,07,ZD,M10,LENGTH=7,2X,
029,07,ZD,M10,LENGTH=7,2X,36,07,ZD,M10,LENGTH=7,2X,
167,07,ZD,M10,LENGTH=7,80:X),
HEADER1=(10:' SALES INVOICE RECORDS BY DAY(RECORDS/DIV/DAY)',/,
10:' *********************************************',/,/,
01:'DIV',4X,115,8,X,123,8,X,131,8,X,139,8,X,
147,8,X,155,8,4X,'TOTAL',/,
01:3'*',4X,8'*',X,8'*',X,8'*',X,8'*',X,8'*',X,8'*',X,8'*'),
TRAILER1=(/,'TOTAL :',TOT=(001,07,ZD,M10,LENGTH=8),X,
TOT=(008,07,ZD,M10,LENGTH=8),X,
TOT=(015,07,ZD,M10,LENGTH=8),X,
TOT=(022,07,ZD,M10,LENGTH=8),X,
TOT=(029,07,ZD,M10,LENGTH=8),X,
TOT=(036,07,ZD,M10,LENGTH=8),X,
TOT=(167,07,ZD,M10,LENGTH=8))
OUTFIL FNAMES=OUT2,REMOVECC,
BUILD=(163,3,4X,
043,12,ZD,M10,LENGTH=12,X,055,12,ZD,M10,LENGTH=12,X,
067,12,ZD,M10,LENGTH=12,X,079,12,ZD,M10,LENGTH=12,X,
091,12,ZD,M10,LENGTH=12,X,103,12,ZD,M10,LENGTH=12,X,
175,12,ZD,M10,LENGTH=12,104:X),
HEADER1=(30:' SALES $ BY DAY(AMOUNT/DIV/DAY)',/,
30:' ******************************',/,/,
01:'DIV',8X,115,8,5X,123,8,5X,131,8,5X,139,8,5X,
147,8,5X,155,8,8X,'TOTAL',/,
01:3'*',8X,8'*',5X,8'*',5X,8'*',5X,8'*',5X,
8'*',5X,8'*',5X,8'*'),
TRAILER1=(/,'TOTAL :',TOT=(043,12,ZD,M10,LENGTH=12),X,
TOT=(055,12,ZD,M10,LENGTH=12),X,
TOT=(067,12,ZD,M10,LENGTH=12),X,
TOT=(079,12,ZD,M10,LENGTH=12),X,
TOT=(091,12,ZD,M10,LENGTH=12),X,
TOT=(103,12,ZD,M10,LENGTH=12),X,
TOT=(175,12,ZD,M10,LENGTH=12))
E RECORD TYPE IS F - DATA STARTS IN POSITION 1
0 C5-K26318 C6-K90007 C7-K90000 C8-K23476 E9-K90007 C9-BASE E5-K31980 E6-K1818
0 ICEAM1 ENVIRONMENT IN EFFECT - ICEAM1 INSTALLATION MODULE SELECTED
1 AB3850SJ.SORT0010. , INPUT LRECL = 80, BLKSIZE = 80, TYPE = FB
0 MAIN STORAGE = (MAX,6291456,6266880)
0 MAIN STORAGE ABOVE 16MB = (6209520,6209520)
0 OPTIONS: OVFLO=RC0 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,RESET=Y,VSAMEMT=Y,DYNSPC=256
0 OPTIONS: SIZE=6291456,MAXLIM=1048576,MINLIM=450560,EQUALS=Y,LIST=Y,ERET=ABEND,MSGDDN=SRTMSG
0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=FULL ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=N,DYNALOC=(SYSDA ,004),ABCODE=MSG
0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=N,STIMER=Y,COBEXIT=COB2
0 OPTIONS: TMAXLIM=6291456,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=Y,CFW=Y,DSA=0
0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE ,EXITCK=S,PARMDDN=DFSPARM ,FSZEST=N
0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=2097152,SOLRF=Y,VLLONG=N,VSAMIO=N,MOSIZE=MAX
0 OPTIONS: NULLOUT=RC0
0 BSAM ACCESS METHOD USED FOR SORTIN
0 DC 500000 TC 0 CS DSVNN KSZ 7 VSZ 7
0 FSZ=6250 RC IGN=0 E AVG=248 0 WSP=2013 C DYN=0 0
2 DE-K24705 D5-K24705 DA-K28804
0 AN S0C7 ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT (PHASE S 1)