Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
Here's a DFSORT job that will do what you asked for. I used ZD,LENGTH=5 to get a 5-digit total, but you can change that as appropriate depending on what you want the output to look like.
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
0001 100
0002 200
0002 300
0003 100
/*
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
OUTFIL REMOVECC,NODETAIL,
TRAILER1=(TOT=(6,3,ZD,TO=ZD,LENGTH=5))
/*
|
|
|
