[Home] [Help]
select u.name, o.name, m.name, m.method#,
decode(bitand(r.properties, 32768), 32768, 'REF',
decode(bitand(r.properties, 16384), 16384, 'POINTER')),
decode(bitand(rt.properties, 64), 64, null, ru.name),
decode(rt.typecode,
9, decode(r.charsetform, 2, 'NVARCHAR2', ro.name),
96, decode(r.charsetform, 2, 'NCHAR', ro.name),
112, decode(r.charsetform, 2, 'NCLOB', ro.name),
ro.name),
decode(r.charsetform, 1, 'CHAR_CS',
2, 'NCHAR_CS',
3, NLS_CHARSET_NAME(r.charsetid),
4, 'ARG:'||r.charsetid)
from sys.user$ u, sys."_CURRENT_EDITION_OBJ" o, sys.method$ m, sys.result$ r,
sys."_CURRENT_EDITION_OBJ" ro, sys.user$ ru, sys.type$ rt
where o.owner# = u.user#
and o.type# <> 10 -- must not be invalid
and o.oid$ = m.toid
and o.subname IS NULL -- get the latest version only
and m.toid = r.toid
and m.version# = r.version#
and m.method# = r.method#
and r.result_toid = ro.oid$
and ro.owner# = ru.user#
and r.result_toid = rt.toid
and r.result_version# = rt.version#
SELECT U.NAME
, O.NAME
, M.NAME
, M.METHOD#
,
DECODE(BITAND(R.PROPERTIES
, 32768)
, 32768
, 'REF'
,
DECODE(BITAND(R.PROPERTIES
, 16384)
, 16384
, 'POINTER'))
,
DECODE(BITAND(RT.PROPERTIES
, 64)
, 64
, NULL
, RU.NAME)
,
DECODE(RT.TYPECODE
,
9
, DECODE(R.CHARSETFORM
, 2
, 'NVARCHAR2'
, RO.NAME)
,
96
, DECODE(R.CHARSETFORM
, 2
, 'NCHAR'
, RO.NAME)
,
112
, DECODE(R.CHARSETFORM
, 2
, 'NCLOB'
, RO.NAME)
,
RO.NAME)
,
DECODE(R.CHARSETFORM
, 1
, 'CHAR_CS'
,
2
, 'NCHAR_CS'
,
3
, NLS_CHARSET_NAME(R.CHARSETID)
,
4
, 'ARG:'||R.CHARSETID)
FROM SYS.USER$ U
, SYS."_CURRENT_EDITION_OBJ" O
, SYS.METHOD$ M
, SYS.RESULT$ R
,
SYS."_CURRENT_EDITION_OBJ" RO
, SYS.USER$ RU
, SYS.TYPE$ RT
WHERE O.OWNER# = U.USER#
AND O.TYPE# <> 10 -- MUST NOT BE INVALID
AND O.OID$ = M.TOID
AND O.SUBNAME IS NULL -- GET THE LATEST VERSION ONLY
AND M.TOID = R.TOID
AND M.VERSION# = R.VERSION#
AND M.METHOD# = R.METHOD#
AND R.RESULT_TOID = RO.OID$
AND RO.OWNER# = RU.USER#
AND R.RESULT_TOID = RT.TOID
AND R.RESULT_VERSION# = RT.VERSION#
|
|
|
|