select '1','0',
o.obj#,
(select value(o1) from sys.ku$_schemaobj_view o1
where o1.obj_num=o.obj#),
p.class,
p.prepost,
o.type#,
p.level#,
p.package,
p.schema,
sys.dbms_metadata.get_procobj_grant
( p.package, p.schema,'GRANT_EXP', o.obj#,
(select 1 from dual
where (SYS_CONTEXT('USERENV','CURRENT_USERID') = 0
OR EXISTS ( SELECT * FROM sys.session_roles
WHERE role='SELECT_CATALOG_ROLE' ))))
from obj$ o, sys.exppkgobj$ p
where p.type#=o.type# and
(p.class=1 or p.class=2) and
(SYS_CONTEXT('USERENV','CURRENT_USERID') IN (o.owner#, 0) OR
EXISTS ( SELECT * FROM sys.session_roles
WHERE role='SELECT_CATALOG_ROLE' ))
SELECT '1'
, '0'
,
O.OBJ#
,
(SELECT VALUE(O1)
FROM SYS.KU$_SCHEMAOBJ_VIEW O1
WHERE O1.OBJ_NUM=O.OBJ#)
,
P.CLASS
,
P.PREPOST
,
O.TYPE#
,
P.LEVEL#
,
P.PACKAGE
,
P.SCHEMA
,
SYS.DBMS_METADATA.GET_PROCOBJ_GRANT
( P.PACKAGE
, P.SCHEMA
, 'GRANT_EXP'
, O.OBJ#
,
(SELECT 1
FROM DUAL
WHERE (SYS_CONTEXT('USERENV'
, 'CURRENT_USERID') = 0
OR EXISTS ( SELECT *
FROM SYS.SESSION_ROLES
WHERE ROLE='SELECT_CATALOG_ROLE' ))))
FROM OBJ$ O
, SYS.EXPPKGOBJ$ P
WHERE P.TYPE#=O.TYPE# AND
(P.CLASS=1 OR P.CLASS=2) AND
(SYS_CONTEXT('USERENV'
, 'CURRENT_USERID') IN (O.OWNER#
, 0) OR
EXISTS ( SELECT *
FROM SYS.SESSION_ROLES
WHERE ROLE='SELECT_CATALOG_ROLE' ))
|
|
|