VIEW: SYS.INT$DBA_PROCEDURES

Source

View Text - Preformatted

(select u.name, o.name, pi.procedurename, o.obj#, pi.procedure#,
decode(pi.overload#, 0, NULL, pi.overload#),
decode(o.type#, 7, 'PROCEDURE',
       8, 'FUNCTION', 9, 'PACKAGE', 11, 'PACKAGE BODY',
       12, 'TRIGGER', 13, 'TYPE', 14, 'TYPE BODY',
       22, 'LIBRARY', 28, 'JAVA SOURCE', 29, 'JAVA CLASS',
       30, 'JAVA RESOURCE', 87, 'ASSEMBLY', 'UNDEFINED'),
o.type#,
decode(bitand(pi.properties,8),8,'YES','NO'),
decode(bitand(pi.properties,16),16,'YES','NO'),
u2.name, o2.name,
  decode(bitand(pi.properties,32),32,'YES','NO'),
  decode(bitand(pi.properties,512),512,'YES','NO'),
decode(bitand(pi.properties,256),256,'YES','NO'),
decode(bitand(pi.properties,1024),1024,'CURRENT_USER','DEFINER'),
decode(bitand(o.flags, 196608), 65536, 1, 131072, 1, 0),
to_number(sys_context('USERENV', 'CON_ID'))
from sys."_CURRENT_EDITION_OBJ" o, user$ u, procedureinfo$ pi,
     sys."_CURRENT_EDITION_OBJ" o2, user$ u2
where u.user# = o.owner# and o.obj# = pi.obj#
and (o.type# in (7, 8, 9, 11, 12, 14, 22, 28, 29, 30, 87) or
     (o.type# = 13 and o.subname is null))
and pi.itypeobj# = o2.obj# (+) and o2.owner#  = u2.user# (+)
and (SYS_CONTEXT('USERENV', 'CON_ID')=0 or
     SYS_CONTEXT('USERENV', 'CON_ID')=1 or
     decode(bitand(o.flags, 196608), 65536, 1, 131072, 1, 0)=0))
union all
(select u.name, o.name, NULL,
  o.obj#,
  CASE
    WHEN o.type# = 12 THEN 1
    ELSE 0
  END,
  NULL, decode(o.type#,12,'TRIGGER',9,'PACKAGE'), o.type#,
  'NO', 'NO', NULL, NULL, 'NO', 'NO', 'NO',
  CASE
    WHEN o.type#=12 THEN 'DEFINER'
    ELSE decode(bitand(pi.properties,1024),NULL,NULL,
                1024,'CURRENT_USER','DEFINER')
  END CASE, decode(bitand(o.flags, 196608), 65536, 1, 131072, 1, 0),
  to_number(sys_context('USERENV', 'CON_ID'))
  from sys."_CURRENT_EDITION_OBJ" o, user$ u, procedureinfo$ pi
  where ((o.owner# = u.user# and o.obj# = pi.obj# (+)) AND
         (o.type# in (12,9)) AND
         ((pi.procedure# is null) OR (pi.procedure# = 1))) AND
         (SYS_CONTEXT('USERENV', 'CON_ID')=0 or
          SYS_CONTEXT('USERENV', 'CON_ID')=1 or
          decode(bitand(o.flags, 196608),
                 65536, 1, 131072, 1, 0)=0)
)

View Text - HTML Formatted

(SELECT U.NAME
, O.NAME
, PI.PROCEDURENAME
, O.OBJ#
, PI.PROCEDURE#
, DECODE(PI.OVERLOAD#
, 0
, NULL
, PI.OVERLOAD#)
, DECODE(O.TYPE#
, 7
, 'PROCEDURE'
, 8
, 'FUNCTION'
, 9
, 'PACKAGE'
, 11
, 'PACKAGE BODY'
, 12
, 'TRIGGER'
, 13
, 'TYPE'
, 14
, 'TYPE BODY'
, 22
, 'LIBRARY'
, 28
, 'JAVA SOURCE'
, 29
, 'JAVA CLASS'
, 30
, 'JAVA RESOURCE'
, 87
, 'ASSEMBLY'
, 'UNDEFINED')
, O.TYPE#
, DECODE(BITAND(PI.PROPERTIES
, 8)
, 8
, 'YES'
, 'NO')
, DECODE(BITAND(PI.PROPERTIES
, 16)
, 16
, 'YES'
, 'NO')
, U2.NAME
, O2.NAME
, DECODE(BITAND(PI.PROPERTIES
, 32)
, 32
, 'YES'
, 'NO')
, DECODE(BITAND(PI.PROPERTIES
, 512)
, 512
, 'YES'
, 'NO')
, DECODE(BITAND(PI.PROPERTIES
, 256)
, 256
, 'YES'
, 'NO')
, DECODE(BITAND(PI.PROPERTIES
, 1024)
, 1024
, 'CURRENT_USER'
, 'DEFINER')
, DECODE(BITAND(O.FLAGS
, 196608)
, 65536
, 1
, 131072
, 1
, 0)
, TO_NUMBER(SYS_CONTEXT('USERENV'
, 'CON_ID')) FROM SYS."_CURRENT_EDITION_OBJ" O
, USER$ U
, PROCEDUREINFO$ PI
, SYS."_CURRENT_EDITION_OBJ" O2
, USER$ U2 WHERE U.USER# = O.OWNER#
AND O.OBJ# = PI.OBJ# AND (O.TYPE# IN (7
, 8
, 9
, 11
, 12
, 14
, 22
, 28
, 29
, 30
, 87) OR (O.TYPE# = 13
AND O.SUBNAME IS NULL)) AND PI.ITYPEOBJ# = O2.OBJ# (+)
AND O2.OWNER# = U2.USER# (+) AND (SYS_CONTEXT('USERENV'
, 'CON_ID')=0 OR SYS_CONTEXT('USERENV'
, 'CON_ID')=1 OR DECODE(BITAND(O.FLAGS
, 196608)
, 65536
, 1
, 131072
, 1
, 0)=0)) UNION ALL (SELECT U.NAME
, O.NAME
, NULL
, O.OBJ#
, CASE WHEN O.TYPE# = 12 THEN 1 ELSE 0 END
, NULL
, DECODE(O.TYPE#
, 12
, 'TRIGGER'
, 9
, 'PACKAGE')
, O.TYPE#
, 'NO'
, 'NO'
, NULL
, NULL
, 'NO'
, 'NO'
, 'NO'
, CASE WHEN O.TYPE#=12 THEN 'DEFINER' ELSE DECODE(BITAND(PI.PROPERTIES
, 1024)
, NULL
, NULL
, 1024
, 'CURRENT_USER'
, 'DEFINER') END CASE
, DECODE(BITAND(O.FLAGS
, 196608)
, 65536
, 1
, 131072
, 1
, 0)
, TO_NUMBER(SYS_CONTEXT('USERENV'
, 'CON_ID'))
FROM SYS."_CURRENT_EDITION_OBJ" O
, USER$ U
, PROCEDUREINFO$ PI
WHERE ((O.OWNER# = U.USER#
AND O.OBJ# = PI.OBJ# (+)) AND (O.TYPE# IN (12
, 9)) AND ((PI.PROCEDURE# IS NULL) OR (PI.PROCEDURE# = 1))) AND (SYS_CONTEXT('USERENV'
, 'CON_ID')=0 OR SYS_CONTEXT('USERENV'
, 'CON_ID')=1 OR DECODE(BITAND(O.FLAGS
, 196608)
, 65536
, 1
, 131072
, 1
, 0)=0) )