Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005
Posts: 4579
Location: San Jose, CA
|
|
|
|
You can now use DFSORT's new FINDREP function available with z/OS DFSORT V1R5 PTF UK90013 (July, 2008) to do this kind of thing quite easily like this:
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
'ADKLSLDS ADLKDJFLSDFA 'KDSLDL
'DFLDKSLDKFJLKDSJLDFJ'LDFJDLFJLAJDFJLJLJLJ
'DFDJ KDJFL DKLSJDFLDFJL'DLSDFJL
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC FINDREP=(IN=C'''',OUT=C'')
/*
|
For complete details on the new FINDREP function and the other new functions available with PTF UK90013, see:
www.ibm.com/systems/support/storage/software/sort/mvs/ugpf/ |
|
