Thank you Sri.
It was as simple as that.
Many thanks
Jack

On Tue, 31 Jan 2023 at 12:46, Sri h Kolusu <skol...@us.ibm.com> wrote:

> 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
>

----------------------------------------------------------------------
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