list all the components that a user has access

SELECT DISTINCT A.ITEMNAME COMPONENT, A.ITEMLABEL LABEL
FROM PSMENUITEM A
, PSPNLGRPDEFN B
, PSAUTHITEM C
WHERE A.ITEMTYPE = 5
AND A.PNLGRPNAME = B.PNLGRPNAME
AND A.MARKET = B.MARKET
AND C.MENUNAME = A.MENUNAME
AND C.BARNAME = A.BARNAME
AND C.BARITEMNAME = A.ITEMNAME
AND C.CLASSID IN
(SELECT D.CLASSID FROM PSROLECLASS D
WHERE D.ROLENAME IN
(SELECT E.ROLENAME FROM PSROLEUSER E
WHERE E.ROLEUSER=))