Hi Kolusu,
Thank you for your quick answer.
As it would be expected I had the
ICE152I 0 OVERFLOW DURING SUMMATION - RC=0
message. I did not think of looking for error messages due to the final
RC(0).
I ran the SORT with your suggested improvements.
It is giving an error that is baffling me:
ICE282I 0 PERFORMING SYMBOL SUBSTITUTION AS NEEDED
INREC OVERLAY=(TMP-DCVVLCAP:8Z,
TMP-DCVVLCAP2:DCVVLCAP
$
he "$" sign is below the "D" after the ":"
Can you please help?
Thanks
Jack
On Thu, 15 Dec 2022 at 16:05, Sri h Kolusu <[email protected]> wrote:
>
> >> As you can see, I have multiple records for storage group SGDBPR and
> SGPBBA01. Any ideas as what may be causing this?
>
> Jack,
>
> You need to check your joblog to see if you received ICE152I message which
> indicates that there is an OVERFLOW of the summation fields.
>
> ICE152I 0 OVERFLOW DURING SUMMATION - RC=0
>
> DCVVLCAP and DCVALLOC are both 4-byte binary fields and when you some sum
> them, it might exceed the value a 4 byte binary can fit into. So, you need
> to pad binary zeros and sum it as a bigger number.
>
> Since you are using Symbols , I added the temp fields at the end and SUM
> those temp fields
>
> //SYMNAMES DD DISP=SHR,DSN=&SORTINPT(HEADER)
> // DD DISP=SHR,DSN=&SORTINPT(TYPED)
> // DD DISP=SHR,DSN=&SORTINPT(TYPEV)
> // DD *
> SKIP,2
> TMP-DCVVLCAP,*,8,BI
> TMP-DCVVLCAP1,=,4,BI
> TMP-DCVVLCAP2,*,4,BI
> TMP-DCVALLOC,*,8,BI
> TMP-DCVALLOC1,=,4,BI
> TMP-DCVALLOC2,*,4,BI
>
>
> //SYSIN DD *
> OPTION VLSHRT,VLSCMP,DYNALLOC=(,4)
>
> INREC OVERLAY=(TMP-DCVVLCAP:8Z,
> TMP-DCVVLCAP2:DCVVLCAP
> TMP-DCVALLOC:8Z,
> TMP-DCVALLOC2:DCVALLOC)
>
> SORT FIELDS=(DCVSGTCL,A)
>
> SUM FIELDS=(TMP-DCVVLCAP,
> TMP-DCVALLOC)
>
> OUTREC BUILD=(1,4,
> DCVSGTCL,
> X,
> TMP-DCVVLCAP,TO=ZD,LENGTH=16,
> X,
> TMP-DCVALLOC,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
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
