View previous topic :: View next topic |
Author |
Message |
yadav2005 Intermediate

Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Fri Dec 14, 2007 10:52 am Post subject: add text to the end of each record using SORT |
|
|
Members,
I have a file with records as below but the lrecl of the file is 80 bytes and each record contents vary some may 3 chars , 4 , 5 , 10 characters and others too.
Code: |
raj
amar
mahesh
raja
vicky
.
.
.
|
I want the records to be read one by one and be appended with 'good' after each text as below:
Code: |
rajgood
amargood
maheshgood
rajagood
vickygood
.
.
.
|
Please let me know if it can be done by using SORT |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Fri Dec 14, 2007 11:06 am Post subject: |
|
|
yadav2005,
The following DFSORT JCL will give you the desired results.
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
raj
amar
mahesh
raja
vicky
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
INREC BUILD=(1,80,JFY=(SHIFT=LEFT,TRAIL=C'GOOD'))
//*
|
Hope this helps...
Cheers _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
 |
yadav2005 Intermediate

Joined: 10 Jan 2005 Posts: 348 Topics: 144
|
Posted: Fri Dec 14, 2007 10:02 pm Post subject: |
|
|
Kolusu,
Thanks for the solution and it works fine. |
|
Back to top |
|
 |
|
|