Jack,
The issue is you have NOT converted the UFF value to Binary before performing
the SUM
Here is the change you need (Untested)
//SYSIN DD *
INREC PARSE=(%01=(ABSPOS=1,ENDBEFR=C'.',FIXLEN=8)),
BUILD=(FMT-HLQ:%01,
FMT-BYTE:INP-BYTE,TO=BI,LENGTH=8)
SORT FIELDS=(FMT-HLQ,A)
SUM FIELDS=(FMT-BYTE)
OUTREC BUILD=(X,
FMT-HLQ,
X,
FMT-BYTE,TO=ZD,LENGTH=16)
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
