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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to