Hello,
I sure can use some help. I'm trying to get a list of users in the RACF groups but instead of a dump of every RACF group I have an input file. The input file seems to be ignored and I can't figure out why but suspect my first newlist is missing something.
If I understand correctly, the contents of the input file will be captured in the NAME=MYLIST.
DefType type=$MID
Define type=$MID groups as Substr(record,1,8)
Alloc type=$MID dd=INMIDS ç========JCL has this DD name with the subset of ~ 100 RACF groups
NEWLIST type=RACF NAME=MYLIST
Select class=group segment=base
Alloc type=unload dd=scha complex=SHA10
Suppress msg=2363
Newlist type=RACF dd=CMT0MIDS
Select segment=base LIKELIST=MYLIST
Exclude cggrpct=0
Sortlist,
'DATE'(toptitle),
:run.Datetime(toptitle),
'DCS - MID AND RELEASE COORDINATOR GROUPS'(toptitle),
key(8,'Group'),
Userid(8, "User-ID")
------------------------------
Jack Yucuis
------------------------------