select u.name, o.name, s.errcode#, s.txlcode#, s.txlsqlstate,
decode(bitand(s.flags, 1), 1, 'TRUE', 0, 'FALSE'), s.rtime, s.comment$
from sys.sqltxl_err$ s, sys."_CURRENT_EDITION_OBJ" o, sys.user$ u
where s.obj# = o.obj# and
o.owner# = u.user# and
(
o.owner# = userenv('SCHEMAID')
or
exists (select null from sys.objauth$ oa
where oa.obj# = o.obj#
and oa.grantee# in (select kzsrorol from x$kzsro)
and oa.privilege# in (0 /* ALTER */, 29 /* USE */))
or
exists (select null from v$enabledprivs
where priv_number in (
-335 /* CREATE ANY SQL TRANSLATION PROFILE */,
-336 /* ALTER ANY SQL TRANSLATION PROFILE */,
-337 /* USE ANY SQL TRANSLATION PROFILE */,
-338 /* DROP ANY SQL TRANSLATION PROFILE */
)
)
)
SELECT U.NAME
, O.NAME
, S.ERRCODE#
, S.TXLCODE#
, S.TXLSQLSTATE
,
DECODE(BITAND(S.FLAGS
, 1)
, 1
, 'TRUE'
, 0
, 'FALSE')
, S.RTIME
, S.COMMENT$
FROM SYS.SQLTXL_ERR$ S
, SYS."_CURRENT_EDITION_OBJ" O
, SYS.USER$ U
WHERE S.OBJ# = O.OBJ# AND
O.OWNER# = U.USER# AND
(
O.OWNER# = USERENV('SCHEMAID')
OR
EXISTS (SELECT NULL
FROM SYS.OBJAUTH$ OA
WHERE OA.OBJ# = O.OBJ#
AND OA.GRANTEE# IN (SELECT KZSROROL
FROM X$KZSRO)
AND OA.PRIVILEGE# IN (0 /* ALTER */
, 29 /* USE */))
OR
EXISTS (SELECT NULL
FROM V$ENABLEDPRIVS
WHERE PRIV_NUMBER IN (
-335 /* CREATE ANY SQL TRANSLATION PROFILE */
,
-336 /* ALTER ANY SQL TRANSLATION PROFILE */
,
-337 /* USE ANY SQL TRANSLATION PROFILE */
,
-338 /* DROP ANY SQL TRANSLATION PROFILE */
)
)
)
|
|
|