I have to split the files on the account numbers and sort them on a Key.
Will performing both in the same sort card will be faster or doing it seperately OUTFIL.
1st Scenario :
Step A
Code:
SORT FIELDS=COPY
OUTFIL INCLUDE=(8,2,CH,LT,C'123),FNAMES=SORTOF1
OUTFIL INCLUDE=(8,2,CH,GE,C'123',AND,8,2,CH,LT,C'456'),FNAMES=SORTOF2
and so on
Step B
Code:
Apply SORT FIELDS=(122,4,CH,A) to SORTOF1 , SORTOF2 and so on
2nd Scenario:Using only one step
Code:
SORT FIELDS=(122,4,CH,A)
OUTFIL INCLUDE=(8,2,CH,LT,C'123),FNAMES=SORTOF1
OUTFIL INCLUDE=(8,2,CH,GE,C'123',AND,8,2,CH,LT,C'456'),FNAMES=SORTOF2
and so on
I don't have access to Mainframes therefore I cannot test myself.
The records will be in millions.
am asking to do all 3 things I suggested in one step.
Below is sample example explaining it.
Code:
//S1 EXEC PGM=SORT
//SORTIN DD *
AAA BBB 111 Y
GGG HHH 444
CCC DDD 222
III JJJ 555
EEE FFF 333
GGG HHH 444 Y
III JJJ 555 Y
//F1 DD SYSOUT=*
//F2 DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
OMIT COND=(13,3,ZD,GE,500) FILTER RECORDS GE 500
SORT FIELDS=(13,3,ZD,A) SORT RECORDS BASED ON KEY
OUTFIL FNAMES=F1,INCLUDE=(20,1,CH,EQ,C'Y') RECORDS WITH Y FLAG
* AND KEY GE 500
OUTFIL FNAMES=F1,SAVE RECORDS WITH NO Y FLAG
* AND KEY GE 500
/*
Opps both outfile names are F1 change second to F2
Code:
//SYSIN DD *
OMIT COND=(13,3,ZD,GE,500) FILTER RECORDS GE 500
SORT FIELDS=(13,3,ZD,A) SORT RECORDS BASED ON KEY
OUTFIL FNAMES=F1,INCLUDE=(20,1,CH,EQ,C'Y') RECORDS WITH Y FLAG
* AND KEY GE 500
OUTFIL FNAMES=F2,SAVE RECORDS WITH NO Y FLAG
* AND KEY GE 500
/*