select d.name as sqlset_name, d.owner as sqlset_owner, s.sqlset_id, s.con_dbid,
s.sql_id, s.force_matching_signature, s.command_type,
s.parsing_schema_name,
substrb(module, 1, (select ksumodlen from x$modact_length)) module,
substrb(action, 1, (select ksuactlen from x$modact_length)) action,
s.id as sql_seq
from WRI$_SQLSET_DEFINITIONS d, WRI$_SQLSET_STATEMENTS s
where d.id = s.sqlset_id AND
(d.owner = SYS_CONTEXT('USERENV', 'CURRENT_USER') OR
EXISTS (select 1
from V$ENABLEDPRIVS
where priv_number in (-273 /*ADMINISTER ANY SQL TUNING SET*/)))
SELECT D.NAME AS SQLSET_NAME
, D.OWNER AS SQLSET_OWNER
, S.SQLSET_ID
, S.CON_DBID
,
S.SQL_ID
, S.FORCE_MATCHING_SIGNATURE
, S.COMMAND_TYPE
,
S.PARSING_SCHEMA_NAME
,
SUBSTRB(MODULE
, 1
, (SELECT KSUMODLEN
FROM X$MODACT_LENGTH)) MODULE
,
SUBSTRB(ACTION
, 1
, (SELECT KSUACTLEN
FROM X$MODACT_LENGTH)) ACTION
,
S.ID AS SQL_SEQ
FROM WRI$_SQLSET_DEFINITIONS D
, WRI$_SQLSET_STATEMENTS S
WHERE D.ID = S.SQLSET_ID AND
(D.OWNER = SYS_CONTEXT('USERENV'
, 'CURRENT_USER') OR
EXISTS (SELECT 1
FROM V$ENABLEDPRIVS
WHERE PRIV_NUMBER IN (-273 /*ADMINISTER ANY SQL TUNING SET*/)))
|
|
|