Ok,
I found the problem (I think)
It was probably due to the "SUM FIELDS=NONE" statement
Best wishes
Jack

On Fri, 15 Sept 2023 at 10:42, Jack Zukt <[email protected]> wrote:

> Hi,
>
> I am trying to find a RACF dataset profile for which two different groups
> have ALTER access.
> I am using for the INPUT a subset of a type 0404 records from a IRRDBU00
> output file. In the first step I am crating two files with the dataset
> profiles in which the groups have ALTER authority:
>
> //SYMNAMES DD  *
> DSN,10,44,CH
> GRP,62,08,CH
> ACC,71,08,CH
> //SYSIN    DD  *
>   SORT FIELDS=(DSN,A,ACC,A)
>   SUM FIELDS=NONE
>   OPTION VLSHRT
>   INCLUDE COND=(ACC,EQ,C'ALTER   ',AND,
>                (GRP,EQ,C'GPRFCICS',OR,
>                 GRP,EQ,C'GPRFSTG '))
>   OUTFIL FNAMES=OUT01,VTOF,
>       INCLUDE=(ACC,EQ,C'ALTER   ',AND,
>                 GRP,EQ,C'GPRFSTG '),
>       BUILD(DSN,
>             ACC,
>             GRP)
>   OUTFIL FNAMES=OUT02,VTOF,
>       INCLUDE=(ACC,EQ,C'ALTER   ',AND,
>                GRP,EQ,C'GPRFCICS'),
>       BUILD(DSN,
>             ACC,
>             GRP)
> /*
>
> Now, for the OUT01 file, this SORT has 427 records. But, if I run the SORT
> with this statements:
>
> //SYMNAMES DD  *
> DSN,10,44,CH
> GRP,62,08,CH
> ACC,71,08,CH
> //SYSIN    DD  *
>   SORT FIELDS=(DSN,A,ACC,A)
>   SUM FIELDS=NONE
>   OPTION VLSHRT
>   INCLUDE COND=(ACC,EQ,C'ALTER   ',AND,
>                 GRP,EQ,C'GPRFSTG ')
>   OUTFIL FNAMES=OUT01,VTOF,
>       BUILD(DSN,
>             ACC,
>             GRP)
>
> the OUT01 file has 458 records.
>
> The OUT02 file has always 484 records on either type of sort.
> I only found out because the only dataset profile record for which both
> groups have access is not included on the first OUT01 file.
>
> Any ideas, please?
> I really cannot figure this one out.
> Thank you
> Best wishes
> Jack
>
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to