I have a user attribute and group report with an existing layout (in-part) of:
LOCATION USERID RACFGROUP (more columns follow)
first user01 group1
group2
group3
group4
The request I can't solve wants the layout as:
LOCATION USERID RACFGROUP
first user01 group1
first user01 group2
first user01 group3
first user01 group4
Query:
DefType type=$BID
Alloc type=$BID dd=BIDS
Suppress msg=2363
Define type=$bid id(8,char,'Id') as Substr(record,1,8)
Define type=$bid bid(3,char,'BID') as Substr(record,10,3)
Newlist type=racf dd=IZP0RF02
Define DCS boolean where owner:anysupgroup=(NOB,STS)
Select class=user segment=base DCS
Exclude cggrpct=0
Sortlist,
'DATE'(toptitle),
:run.Datetime(toptitle),
' REPORT-02'(toptitle,24),
'DCS - USERID ATTRIBUTE AND GROUP INFORMATION'(toptitle),
dcs(3,str$blank('DCS'),'BID'),
key(8,'Userid'),
Complex(5,'RACF'),
Dfltgrp,
Name,
Revoke(1,hb,'R'),
Special(1,hb,'S'),
Operations(1,hb,'O'),
Auditor(1,hb,'A'),
Uaudit(1,hb,'U'),
ljdate(usdate,8,'Last Use'),
connects(nd),
connects:$bid.id.bid(6,'GrpBID'),
connects(22,'Group Auth r soa'),
connects:cgdefdat(usdate,8,'ConnDate')
------------------------------
Jack Yucuis
------------------------------