MY REQUIREMENT IS TO CHANGE THE "GOODBYE' WITH 'BYE"
HERE IS MY CODE
Code: Select all
//XXXX JOB ('XXX'),REGION=4096K,CLASS=A,NOTIFY=&SYSUID
//STEP1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=XXX.SORT.INPUT,DISP=SHR
//SOROUT DD DSN=XXX.SORT.OUTPUT,DISP=SHR
//SYSIN DD *
OPTION COPY
INREC FINDREP=(IN=C'GOODBYE',OUT=C'BYE')
/*
Code: Select all
0 BLOCKSET COPY TECHNIQUE SELECTED
0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES A
1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 19:02 ON SUN AU
OPTION COPY
INREC FINDREP=(IN=C'GOODBYE',OUT=C'BYE')
F RECORD TYPE IS F - DATA STARTS IN POSITION 1
1 SORTOUT NOT DEFINED
0 C5-K90013 C6-K90013 C7-K90000 C8-K90013 E7-K24705
3 END OF DFSORT