How can we replace Field Values using SYNCSORT ?

leo_sangha · New User Joined: 11 Aug 2005 Posts: 85 Location: England

I have a requirement to convert field values from 28 to 41 in all the records in the INPUT File using SYNCSORT. Rest all the field values should not change .

Input File :

Position 17,18
Data : 28
Data Type : ZD

Output File :

Position 17,18
Data : 41
Data Type : ZD

Can someone help me in this ???

prakash271082 · New User Joined: 09 Sep 2005 Posts: 53

Hi,
You Could make use of " Change " option in OUTREC to accomplish your task.

Hope this helps.

leo_sangha · New User Joined: 11 Aug 2005 Posts: 85 Location: England

thanks it worked well for me .... this is what i tried ....

//STEP EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=INPUT.FILE,DISP=SHR
//SORTOUT DD DSN=OUTPUT1.FILE,
// DISP=(NEW,CATLG,DELETE)
//SYSIN DD *
OPTION COPY
OUTFIL OUTREC=(1,16,
17,2,
CHANGE=(2,C'28',C'41'),
19,62)
/*