Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 8500

SYNCSORT :: RE: Syncsort version supporting FINDREP command

$
0
0
Author: juares castro
Posted: Tue Aug 09, 2016 8:59 pm (GMT 5.5)

Hi Pandora!
I am trying do this:
Code:
//STEP10 EXEC PGM=SYNCSORT,REGION=7M       
//SORTIN   DD *                           
123AA999912BB                             
AA123888813CC                             
BB123456714DD                             
1AA23888813FF                             
//SORTOUT  DD ...                         
//SYSIN    DD *                           
 SORT FIELDS=COPY                         
 OUTREC IFTHEN=(WHEN=INIT,                 
         FINDREP=(INOUT=(C'AA',12,2)))     
//SYSOUT   DD SYSOUT=*                     
//*                                       
//                                         
                                           
GIVING THIS:                               
123BB999912BB                             
CC123888813CC                             
BB123456714DD                             
1FF23888813FF                             

Wherever we have "AA" change to content of position 12 with 2 bytes.
_________________
Thanks!
juares castro


Viewing all articles
Browse latest Browse all 8500

Trending Articles