Mainframes
Friday, October 22, 2010
SORT- Find Rep 2
//STEP003 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=U123557.PA.D100610.VOL0010.HTML.BK,DISP=SHR
//SORTOUT DD DISP=SHR,DSN=U123557.PA.D100610.VOL0010.HTML.BK
//SYSIN DD *
OPTION COPY
INREC FINDREP=(IN=C'htm",OUT=C'tes'')
/*
No comments:
Post a Comment
Newer Post
Older Post
Home
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment