kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Tue Aug 24, 2004 9:49 am Post subject: |
|
|
cathygomez,
The following JCL will give you the desired results.
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
"UPDATED 00010 TIMES"
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1,9, $ FIRST 9 BYTES
+1,ADD,10,5,ZD,EDIT=(TTTTT), $ ADD 1 TO THE COUNT
15,66) $ REST OF THE DATA
/*
|
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|