MINI MINI MANI MO

Path : /opt/oracle/product/18c/dbhomeXE/javavm/install/
File Upload :
Current File : //opt/oracle/product/18c/dbhomeXE/javavm/install/catjvm.sql

Rem
Rem catjvm.sql
Rem
Rem Copyright (c) 2001, 2017, Oracle and/or its affiliates. 
Rem All rights reserved.
Rem
Rem    NAME
Rem      catjvm.sql - create JAVA views based on x$jox fixed tables
Rem
Rem    NOTES
Rem      create USER|DBA|ALL_JAVA_* views
Rem
Rem    BEGIN SQL_FILE_METADATA
Rem    SQL_SOURCE_FILE: javavm/install/catjvm.sql
Rem    SQL_SHIPPED_FILE: javavm/install/catjvm.sql
Rem    SQL_PHASE: CATJVM
Rem    SQL_STARTUP_MODE: NORMAL
Rem    SQL_IGNORABLE_ERRORS: NONE
Rem    END SQL_FILE_METADATA
Rem    
Rem    MODIFIED   (MM/DD/YY)
Rem    pjulsaks    05/19/17 - Bug 25688154: Uppercase create_cdbview's input
Rem    mjungerm    08/12/15 - cosmetics
Rem    dunietis    07/15/15 - Fix bug 21440822
Rem    talliu      06/28/13 - Add CDB view for DBA view
Rem    mjungerm    09/08/10 - fix sense of decode operations - bug 10083440
Rem    rhlee       05/11/05 - rewrite view definitions to "encourage"
Rem                           fixed-table index-access path
Rem    xuhuali     10/24/01 - Merged xuhuali_create_java_views
Rem    xuhuali     10/24/01 - Created
Rem

remark
remark FAMILY "JAVA_CLASSES"
remark

create or replace view USER_JAVA_CLASSES
(NAME, MAJOR, MINOR, KIND, ACCESSIBILITY, 
       IS_INNER, IS_ABSTRACT, IS_FINAL, IS_STATIC, IS_STRICTFP, IS_SYNTHETIC,
       IS_DEBUG, SOURCE, SUPER, OUTER)
as 
select /*+ no_cartesian(m) ordered use_nl(o m)*/ 
       m.kln, m.maj, m.min, 
       decode(BITAND(m.acc, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 7),
              1, 'PUBLIC', 
              2, 'PRIVATE',
              4, 'PROTECTED',
              NULL),
       decode(BITAND(m.acc, 131072), 131072, 'YES', 0, 'NO'),
       decode(BITAND(m.acc, 1024), 1024, 'YES', 0, 'NO'), 
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 16),
              16, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 8),
              8, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              2048),
              2048, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              4096),
              4096, 'YES', 0, 'NO'),
       decode(m.dbg, 1, 'YES', 0, 'NO'),    
       m.src, m.spl, m.oln
from sys.x$joxmob m
where m.own = userenv('SCHEMAID')
/
comment on table USER_JAVA_CLASSES is
'class level information for java classes owned by the current user'
/
comment on column USER_JAVA_CLASSES.NAME is 
'name of the class'
/
comment on column USER_JAVA_CLASSES.MAJOR is
'the major version number of the class as defined in JVM specification'
/
comment on column USER_JAVA_CLASSES.MINOR is
'the minor version number of the class as defined in JVM specification'
/
comment on column USER_JAVA_CLASSES.KIND is
'type (class, interface, enum or annotation) of the class'
/
comment on column USER_JAVA_CLASSES.ACCESSIBILITY is
'the accessiblity of the class'
/
comment on column USER_JAVA_CLASSES.IS_INNER is
'is this class an inner class'
/
comment on column USER_JAVA_CLASSES.IS_ABSTRACT is
'is this an abstract class?'
/
comment on column USER_JAVA_CLASSES.IS_FINAL is
'is this an final class?'
/
comment on column USER_JAVA_CLASSES.IS_STATIC is
'is this a static inner class?'
/
comment on column USER_JAVA_CLASSES.IS_STRICTFP is
'is the class declared strictfp?'
/
comment on column USER_JAVA_CLASSES.IS_SYNTHETIC is
'is this an inner class generated by the compiler?'
/
comment on column USER_JAVA_CLASSES.IS_DEBUG is
'was the class compiled with debug information?'
/
comment on column USER_JAVA_CLASSES.SOURCE is
'source file of the class '
/
comment on column USER_JAVA_CLASSES.SUPER is
'super class of the class'
/
comment on column USER_JAVA_CLASSES.OUTER is
'outer class of the class if the class is an inner class'
/
create or replace public synonym USER_JAVA_CLASSES for USER_JAVA_CLASSES
/
grant read on USER_JAVA_CLASSES to public with grant option
/

create or replace view ALL_JAVA_CLASSES
(OWNER, NAME, MAJOR, MINOR, KIND, ACCESSIBILITY, 
       IS_INNER, IS_ABSTRACT, IS_FINAL, IS_STATIC, IS_STRICTFP, IS_SYNTHETIC,
       IS_DEBUG, SOURCE, SUPER, OUTER)
as 
select /*+ no_cartesian(m) ordered use_nl(o m)*/ 
       u.name, m.kln, m.maj, m.min,
       decode(BITAND(m.acc, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 7),
              1, 'PUBLIC', 
              2, 'PRIVATE',
              4, 'PROTECTED',
              NULL),
       decode(BITAND(m.acc, 131072), 131072, 'YES', 0, 'NO'),
       decode(BITAND(m.acc, 1024), 1024, 'YES', 0, 'NO'), 
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 16),
              16, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 8),
              8, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              2048),
              2048, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              4096),
              4096, 'YES', 0, 'NO'),
       decode(m.dbg, 1, 'YES', 0, 'NO'),    
       m.src, m.spl, m.oln
from sys.x$joxmob m, sys.user$ u
where m.own = u.user#
  and 
  (
    m.own in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          m.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_CLASSES is
'class level information for java classes accessible to the current user'
/
comment on column ALL_JAVA_CLASSES.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_CLASSES.NAME is 
'name of the class'
/
comment on column ALL_JAVA_CLASSES.MAJOR is
'the major version number of the class as defined in JVM specification'
/
comment on column ALL_JAVA_CLASSES.MINOR is
'the minor version number of the class as defined in JVM specification'
/
comment on column ALL_JAVA_CLASSES.KIND is
'type (class, interface, enum or annotation) of the class'
/
comment on column ALL_JAVA_CLASSES.ACCESSIBILITY is
'the accessiblity of the class'
/
comment on column ALL_JAVA_CLASSES.IS_INNER is
'is this class an inner class'
/
comment on column ALL_JAVA_CLASSES.IS_ABSTRACT is
'is this an abstract class?'
/
comment on column ALL_JAVA_CLASSES.IS_FINAL is
'is this an final class?'
/
comment on column ALL_JAVA_CLASSES.IS_STATIC is
'is this a static inner class?'
/
comment on column ALL_JAVA_CLASSES.IS_STRICTFP is
'is the class declared strictfp?'
/
comment on column ALL_JAVA_CLASSES.IS_SYNTHETIC is
'is this an inner class generated by the compiler?'
/
comment on column ALL_JAVA_CLASSES.IS_DEBUG is
'was the class compiled with debug information?'
/
comment on column ALL_JAVA_CLASSES.SOURCE is
'source file of the class '
/
comment on column ALL_JAVA_CLASSES.SUPER is
'super class of the class'
/
comment on column ALL_JAVA_CLASSES.OUTER is
'outer class of the class if the class is an inner class'
/
create or replace public synonym ALL_JAVA_CLASSES for ALL_JAVA_CLASSES
/
grant read on ALL_JAVA_CLASSES to public with grant option
/

create or replace view DBA_JAVA_CLASSES
(OWNER, NAME, MAJOR, MINOR, KIND, ACCESSIBILITY, 
       IS_INNER, IS_ABSTRACT, IS_FINAL, IS_STATIC, IS_STRICTFP, IS_SYNTHETIC,
       IS_DEBUG, SOURCE, SUPER, OUTER)
as 
select /*+ no_cartesian(m) ordered use_nl(o m)*/ 
       u.name, m.kln, m.maj, m.min,
       decode(BITAND(m.acc, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 7),
              1, 'PUBLIC', 
              2, 'PRIVATE',
              4, 'PROTECTED',
              NULL),
       decode(BITAND(m.acc, 131072), 131072, 'YES', 0, 'NO'),
       decode(BITAND(m.acc, 1024), 1024, 'YES', 0, 'NO'), 
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 16),
              16, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc), 8),
              8, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              2048),
              2048, 'YES', 0, 'NO'),
       decode(BITAND(decode(BITAND(m.acc, 131072), 131072, m.oac, m.acc),
              4096),
              4096, 'YES', 0, 'NO'),
       decode(m.dbg, 1, 'YES', 0, 'NO'),    
       m.src, m.spl, m.oln
from sys.x$joxmob m, sys.user$ u
where m.own = u.user#
/      
comment on table DBA_JAVA_CLASSES is
'class level information for all java classes'
/
comment on column DBA_JAVA_CLASSES.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_CLASSES.NAME is 
'name of the class'
/
comment on column DBA_JAVA_CLASSES.MAJOR is
'the major version number of the class as defined in JVM specification'
/
comment on column DBA_JAVA_CLASSES.MINOR is
'the minor version number of the class as defined in JVM specification'
/
comment on column DBA_JAVA_CLASSES.KIND is
'type (class, interface, enum or annotation) of the class'
/
comment on column DBA_JAVA_CLASSES.ACCESSIBILITY is
'the accessiblity of the class'
/
comment on column DBA_JAVA_CLASSES.IS_INNER is
'is this class an inner class'
/
comment on column DBA_JAVA_CLASSES.IS_ABSTRACT is
'is this an abstract class?'
/
comment on column DBA_JAVA_CLASSES.IS_FINAL is
'is this an final class?'
/
comment on column DBA_JAVA_CLASSES.IS_STATIC is
'is this a static inner class?'
/
comment on column DBA_JAVA_CLASSES.IS_STRICTFP is
'is the class declared strictfp?'
/
comment on column DBA_JAVA_CLASSES.IS_SYNTHETIC is
'is this an inner class generated by the compiler?'
/
comment on column DBA_JAVA_CLASSES.IS_DEBUG is
'was the class compiled with debug information?'
/
comment on column DBA_JAVA_CLASSES.SOURCE is
'source file of the class '
/
comment on column DBA_JAVA_CLASSES.SUPER is
'super class of the class'
/
comment on column DBA_JAVA_CLASSES.OUTER is
'outer class of the class if the class is an inner class'
/
create or replace public synonym DBA_JAVA_CLASSES for DBA_JAVA_CLASSES
/
grant read on DBA_JAVA_CLASSES to public with grant option
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_CLASSES','CDB_JAVA_CLASSES');
grant read on SYS.CDB_JAVA_CLASSES to public with grant option
/
create or replace public synonym CDB_JAVA_CLASSES for SYS.CDB_JAVA_CLASSES
/

remark 
remark FAMILY "JAVA_LAYOUTS
remark
 
create or replace view USER_JAVA_LAYOUTS
(NAME, INTERFACES, INNER_CLASSES, 
       FIELDS, STATIC_FIELDS, 
       METHODS, STATIC_METHODS, NATIVE_METHODS)
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */
              nvl(j.longdbcs, o.name), m.lic, m.lnc,
              m.lfc, m.lsf, 
              m.lmc, m.lsm, m.jnc
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmob m
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = userenv('SCHEMAID')
  and j.short(+) = o.name
/
comment on table USER_JAVA_LAYOUTS is
'class layout information java classes owned by the current user'
/
comment on column USER_JAVA_LAYOUTS.NAME is 
'name of the class'
/
comment on column USER_JAVA_LAYOUTS.INTERFACES is 
'how many interfaces does this class implement?'
/
comment on column USER_JAVA_LAYOUTS.INNER_CLASSES is 
'how many inner classes does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.FIELDS is 
'how many locally declared fields does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.STATIC_FIELDS is 
'how many locally declared static fields does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.METHODS is 
'how many locally declared methods does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.STATIC_METHODS is 
'how many locally declared static methods does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.NATIVE_METHODS is 
'how many locally declared native methods does this class contain?'
/
create or replace public synonym USER_JAVA_LAYOUTS for USER_JAVA_LAYOUTS
/
grant read on USER_JAVA_LAYOUTS to public with grant option
/

create or replace view ALL_JAVA_LAYOUTS
(OWNER, NAME, INTERFACES, INNER_CLASSES,
       FIELDS, STATIC_FIELDS, 
       METHODS, STATIC_METHODS, NATIVE_METHODS)
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ 
              u.name, nvl(j.longdbcs, o.name), m.lic, m.lnc,
              m.lfc, m.lsf, 
              m.lmc, m.lsm, m.jnc
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmob m, sys.user$ u
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
  and 
  (
    o.owner# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          o.obj# in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_LAYOUTS is
'class layout information for java classes accessible to the current user'
/
comment on column ALL_JAVA_LAYOUTS.OWNER is
'owner of the class'
/
comment on column USER_JAVA_LAYOUTS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_LAYOUTS.INTERFACES is 
'how many interfaces does this class implement?'
/
comment on column ALL_JAVA_LAYOUTS.INNER_CLASSES is 
'how many inner classes does this class contain?'
/
comment on column ALL_JAVA_LAYOUTS.FIELDS is 
'how many locally declared fields does this class contain?'
/
comment on column ALL_JAVA_LAYOUTS.STATIC_FIELDS is 
'how many locally declared static fields does this class contain?'
/
comment on column ALL_JAVA_LAYOUTS.METHODS is 
'how many locally declared methods does this class contain?'
/
comment on column ALL_JAVA_LAYOUTS.STATIC_METHODS is 
'how many locally declared static methods does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.NATIVE_METHODS is 
'how many locally declared native methods does this class contain?'
/
create or replace public synonym ALL_JAVA_LAYOUTS for ALL_JAVA_LAYOUTS
/
grant read on ALL_JAVA_LAYOUTS to public with grant option
/

create or replace view DBA_JAVA_LAYOUTS
(OWNER, NAME, INTERFACES, INNER_CLASSES,
       FIELDS, STATIC_FIELDS, 
       METHODS, STATIC_METHODS, NATIVE_METHODS)
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ 
              u.name, nvl(j.longdbcs, o.name), m.lic, m.lnc,
              m.lfc, m.lsf, 
              m.lmc, m.lsm, m.jnc
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmob m, sys.user$ u
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
/
comment on table DBA_JAVA_LAYOUTS is
'class layout information for all java classes'
/
comment on column DBA_JAVA_LAYOUTS.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_LAYOUTS.NAME is
'name of the class'
/
comment on column DBA_JAVA_LAYOUTS.INTERFACES is 
'how many interfaces does this class implement?'
/
comment on column DBA_JAVA_LAYOUTS.INNER_CLASSES is 
'how many inner classes does this class contain?'
/
comment on column DBA_JAVA_LAYOUTS.FIELDS is 
'how many locally declared fields does this class contain?'
/
comment on column DBA_JAVA_LAYOUTS.STATIC_FIELDS is 
'how many locally declared static fields does this class contain?'
/
comment on column DBA_JAVA_LAYOUTS.METHODS is 
'how many locally declared methods does this class contain?'
/
comment on column DBA_JAVA_LAYOUTS.STATIC_METHODS is 
'how many locally declared static methods does this class contain?'
/
comment on column USER_JAVA_LAYOUTS.NATIVE_METHODS is 
'how many locally declared native methods does this class contain?'
/
create or replace public synonym DBA_JAVA_LAYOUTS for DBA_JAVA_LAYOUTS
/
grant select on DBA_JAVA_LAYOUTS to select_catalog_role
/



execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_LAYOUTS','CDB_JAVA_LAYOUTS');
grant select on SYS.CDB_JAVA_LAYOUTS to select_catalog_role
/
create or replace public synonym CDB_JAVA_LAYOUTS for SYS.CDB_JAVA_LAYOUTS
/

remark 
remark FAMILY "JAVA_IMPLEMENTS"
remark 
create or replace view USER_JAVA_IMPLEMENTS
(NAME, INTERFACE_INDEX, INTERFACE_NAME) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ nvl(j.longdbcs, o.name), m.ifx, m.iln 
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmif m
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = userenv('SCHEMAID')
  and j.short(+) = o.name
/
comment on table USER_JAVA_IMPLEMENTS is
'interfaces implemented by java classes owned by the current user'
/
comment on column USER_JAVA_IMPLEMENTS.NAME is 
'name of the class'
/
comment on column USER_JAVA_IMPLEMENTS.INTERFACE_INDEX is 
'index of the interfaces implemented by the class'
/
comment on column USER_JAVA_IMPLEMENTS.INTERFACE_NAME is 
'name of the interface identified by the INTERFACE_INDEX'
/
create or replace public synonym USER_JAVA_IMPLEMENTS for USER_JAVA_IMPLEMENTS
/
grant read on USER_JAVA_IMPLEMENTS to public with grant option
/

create or replace view ALL_JAVA_IMPLEMENTS
(OWNER, NAME, INTERFACE_INDEX, INTERFACE_NAME) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ 
       u.name, nvl(j.longdbcs, o.name), m.ifx, m.iln 
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmif m, sys.user$ u
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
  and 
  (
    o.owner# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          o.obj# in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/
comment on table ALL_JAVA_IMPLEMENTS is
'interfaces implemented by java classes accessible to the current user'
/
comment on column ALL_JAVA_IMPLEMENTS.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_IMPLEMENTS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_IMPLEMENTS.INTERFACE_INDEX is 
'index of the interfaces implemented by the class'
/
comment on column ALL_JAVA_IMPLEMENTS.INTERFACE_NAME is 
'name of the interface identified by the INTERFACE_INDEX'
/
create or replace public synonym ALL_JAVA_IMPLEMENTS for ALL_JAVA_IMPLEMENTS
/
grant read on ALL_JAVA_IMPLEMENTS to public with grant option
/

create or replace view DBA_JAVA_IMPLEMENTS
(OWNER, NAME, INTERFACE_INDEX, INTERFACE_NAME) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ 
       u.name, nvl(j.longdbcs, o.name), m.ifx, m.iln 
from sys.javasnm$ j, sys.obj$ o, sys.x$joxmif m, sys.user$ u
where o.obj# = m.obn 
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
/
comment on table DBA_JAVA_IMPLEMENTS is
'interfaces implemented by all java classes'
/
comment on column DBA_JAVA_IMPLEMENTS.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_IMPLEMENTS.NAME is 
'name of the class'
/
comment on column DBA_JAVA_IMPLEMENTS.INTERFACE_INDEX is 
'index of the interfaces implemented by the class'
/
comment on column DBA_JAVA_IMPLEMENTS.INTERFACE_NAME is 
'name of the interface identified by the column INTERFACE_INDEX'
/
create or replace public synonym DBA_JAVA_IMPLEMENTS for DBA_JAVA_IMPLEMENTS
/
grant select on DBA_JAVA_IMPLEMENTS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_IMPLEMENTS','CDB_JAVA_IMPLEMENTS');
grant select on SYS.CDB_JAVA_IMPLEMENTS to select_catalog_role
/
create or replace public synonym CDB_JAVA_IMPLEMENTS for SYS.CDB_JAVA_IMPLEMENTS
/

remark
remark FAMILY "JAVA_INNERS"
remark 
remark TODO should add a field to show whether the inner class
remark is a member of the referencing class? Some x$joxfm changes
remark are needed to make this possible.

create or replace view USER_JAVA_INNERS
(NAME, INNER_INDEX, SIMPLE_NAME, FULL_NAME, ACCESSIBILITY, 
 IS_STATIC, IS_FINAL, IS_ABSTRACT, IS_INTERFACE, IS_STRICTFP, IS_SYNTHETIC,
 IS_ENUM, IS_ANNOTATION, KIND, ALL_QUALIFIERS)
as 
select m.kln, m.nix, m.nsm, m.nln, 
       decode(BITAND(m.oac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.oac, 8), 8, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16), 16, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 1024), 1024, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512), 512, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 2048), 2048, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 4096), 4096, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 8192), 8192, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16384), 16384, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(m.oac, 7), 1, 'PUBLIC ', 
                                2, 'PRIVATE ',
                                4, 'PROTECTED ',
                                '') ||
       decode(BITAND(m.oac, 8), 8, 'STATIC ', 0, '') ||
       decode(BITAND(m.oac, 16), 16, 'FINAL ', 0, '') ||
       decode(BITAND(m.oac, 1024), 1024, 'ABSTRACT ', 0, '') ||
       decode(BITAND(m.oac, 2048), 2048, 'STRICTFP ', 0, '') ||
       decode(BITAND(m.oac, 4096), 4096, 'SYNTHETIC ', 0, '') ||
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384))
from sys.x$joxmic m
where own = userenv('SCHEMAID') and m.nix != -1
/
comment on table USER_JAVA_INNERS is
'list of inner classes referenced by a java class owned by user'
/
comment on column USER_JAVA_INNERS.NAME is 
'name of the referencing class'
/
comment on column USER_JAVA_INNERS.INNER_INDEX is 
'index of the inner class among the inner classes referenced by the referencing class'
/
comment on column USER_JAVA_INNERS.SIMPLE_NAME is 
'simple name of the inner class'
/
comment on column USER_JAVA_INNERS.FULL_NAME is 
'full name of the inner class'
/
comment on column USER_JAVA_INNERS.ACCESSIBILITY is 
'accessibility (public, protected, private) of the inner class'
/
comment on column USER_JAVA_INNERS.IS_STATIC is 
'is the inner class declared or implicitly static'
/
comment on column USER_JAVA_INNERS.IS_FINAL is 
'is the inner class declared final'
/
comment on column USER_JAVA_INNERS.IS_ABSTRACT is 
'is the inner class declared abstract'
/
comment on column USER_JAVA_INNERS.IS_INTERFACE is 
'is the inner class an interface'
/
comment on column USER_JAVA_INNERS.IS_STRICTFP is 
'is the inner class declared strictfp'
/
comment on column USER_JAVA_INNERS.IS_SYNTHETIC is 
'is the inner class generated by the compiler'
/
comment on column USER_JAVA_INNERS.IS_ENUM is 
'is the inner class an enum'
/
comment on column USER_JAVA_INNERS.IS_ANNOTATION is 
'is the inner class an annotation'
/
comment on column USER_JAVA_INNERS.KIND is 
'type (class, interface, enum or annotation) of the inner class'
/
comment on column USER_JAVA_INNERS.ALL_QUALIFIERS is 
'concatenation of accessibility, type and other attributes of the inner class'
/
create or replace public synonym USER_JAVA_INNERS for USER_JAVA_INNERS
/
grant read on USER_JAVA_INNERS to public with grant option
/

create or replace view ALL_JAVA_INNERS
(OWNER, NAME, INNER_INDEX, SIMPLE_NAME, FULL_NAME, ACCESSIBILITY, 
 IS_STATIC, IS_FINAL, IS_ABSTRACT, IS_INTERFACE, IS_STRICTFP, IS_SYNTHETIC,
 IS_ENUM, IS_ANNOTATION, KIND, ALL_QUALIFIERS)
as 
select u.name,
       m.kln, m.nix, m.nsm, m.nln, 
       decode(BITAND(m.oac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.oac, 8), 8, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16), 16, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 1024), 1024, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512), 512, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 2048), 2048, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 4096), 4096, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 8192), 8192, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16384), 16384, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(m.oac, 7), 1, 'PUBLIC ', 
                                2, 'PRIVATE ',
                                4, 'PROTECTED ',
                                '') ||
       decode(BITAND(m.oac, 8), 8, 'STATIC ', 0, '') ||
       decode(BITAND(m.oac, 16), 16, 'FINAL ', 0, '') ||
       decode(BITAND(m.oac, 1024), 1024, 'ABSTRACT ', 0, '') ||
       decode(BITAND(m.oac, 2048), 2048, 'STRICTFP ', 0, '') ||
       decode(BITAND(m.oac, 4096), 4096, 'SYNTHETIC ', 0, '') ||
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384))
from sys.x$joxmic m, sys.user$ u
where m.own = u.user#
  and m.nix != -1
  and 
  (
    m.own in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          m.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_INNERS is
'list of inner classes referenced by a java class accessible to user'
/
comment on column ALL_JAVA_INNERS.OWNER is
'owner of the referencing class'
/
comment on column ALL_JAVA_INNERS.NAME is 
'name of the referencing class'
/
comment on column ALL_JAVA_INNERS.INNER_INDEX is 
'index of the inner class among the inner classes referenced by the referencing class'
/
comment on column ALL_JAVA_INNERS.SIMPLE_NAME is 
'simple name of the inner class'
/
comment on column ALL_JAVA_INNERS.FULL_NAME is 
'full name of the inner class'
/
comment on column ALL_JAVA_INNERS.ACCESSIBILITY is 
'accessibility (public, protected, private) of the inner class'
/
comment on column ALL_JAVA_INNERS.IS_STATIC is 
'is the inner class declared or implicitly static'
/
comment on column ALL_JAVA_INNERS.IS_FINAL is 
'is the inner class declared final'
/
comment on column ALL_JAVA_INNERS.IS_ABSTRACT is 
'is the inner class declared abstract'
/
comment on column ALL_JAVA_INNERS.IS_INTERFACE is 
'is the inner class an interface'
/
comment on column ALL_JAVA_INNERS.IS_STRICTFP is 
'is the inner class declared strictfp'
/
comment on column ALL_JAVA_INNERS.IS_SYNTHETIC is 
'is the inner class generated by the compiler'
/
comment on column ALL_JAVA_INNERS.IS_ENUM is 
'is the inner class an enum'
/
comment on column ALL_JAVA_INNERS.IS_ANNOTATION is 
'is the inner class an annotation'
/
comment on column ALL_JAVA_INNERS.KIND is 
'type (class, interface, enum or annotation) of the inner class'
/
comment on column ALL_JAVA_INNERS.ALL_QUALIFIERS is 
'concatenation of accessibility, type and other attributes of the inner class'
/
create or replace public synonym ALL_JAVA_INNERS for ALL_JAVA_INNERS
/
grant read on ALL_JAVA_INNERS to public with grant option
/

create or replace view DBA_JAVA_INNERS
(OWNER, NAME, INNER_INDEX, SIMPLE_NAME, FULL_NAME, ACCESSIBILITY, 
 IS_STATIC, IS_FINAL, IS_ABSTRACT, IS_INTERFACE, IS_STRICTFP, IS_SYNTHETIC,
 IS_ENUM, IS_ANNOTATION, KIND, ALL_QUALIFIERS)
as 
select u.name,
       m.kln, m.nix, m.nsm, m.nln, 
       decode(BITAND(m.oac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.oac, 8), 8, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16), 16, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 1024), 1024, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512), 512, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 2048), 2048, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 4096), 4096, 'YES', 0, 'NO'), 
       decode(BITAND(m.oac, 8192), 8192, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 16384), 16384, 'YES', 0, 'NO'),
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384)),
       decode(BITAND(m.oac, 7), 1, 'PUBLIC ', 
                                2, 'PRIVATE ',
                                4, 'PROTECTED ',
                                '') ||
       decode(BITAND(m.oac, 8), 8, 'STATIC ', 0, '') ||
       decode(BITAND(m.oac, 16), 16, 'FINAL ', 0, '') ||
       decode(BITAND(m.oac, 1024), 1024, 'ABSTRACT ', 0, '') ||
       decode(BITAND(m.oac, 2048), 2048, 'STRICTFP ', 0, '') ||
       decode(BITAND(m.oac, 4096), 4096, 'SYNTHETIC ', 0, '') ||
       decode(BITAND(m.oac, 512 + 8192 + 16384), 0,     'CLASS', 
                                                 512,   'INTERFACE',
                                                 8192,  'ANNOTATION',
                                                 16384, 'ENUM',
                      '??? OAC = '|| BITAND(m.oac, 512 + 8192 + 16384))
from sys.x$joxmic m, sys.user$ u
where m.own = u.user#
  and m.nix != -1
/
comment on table DBA_JAVA_INNERS is
'list of inner classes referenced by some other class'
/
comment on column DBA_JAVA_INNERS.OWNER is
'owner of the referencing class'
/
comment on column DBA_JAVA_INNERS.NAME is 
'name of the referencing class'
/
comment on column DBA_JAVA_INNERS.INNER_INDEX is 
'index of the inner class among the inner classes referenced by the referencing class'
/
comment on column DBA_JAVA_INNERS.SIMPLE_NAME is 
'simple name of the inner class'
/
comment on column DBA_JAVA_INNERS.FULL_NAME is 
'full name of the inner class'
/
comment on column DBA_JAVA_INNERS.ACCESSIBILITY is 
'accessibility (public, protected, private) of the inner class'
/
comment on column DBA_JAVA_INNERS.IS_STATIC is 
'is the inner class declared or implicitly static'
/
comment on column DBA_JAVA_INNERS.IS_FINAL is 
'is the inner class declared final'
/
comment on column DBA_JAVA_INNERS.IS_ABSTRACT is 
'is the inner class declared abstract'
/
comment on column DBA_JAVA_INNERS.IS_INTERFACE is 
'is the inner class an interface'
/
comment on column DBA_JAVA_INNERS.IS_STRICTFP is 
'is the inner class declared strictfp'
/
comment on column DBA_JAVA_INNERS.IS_SYNTHETIC is 
'is the inner class generated by the compiler'
/
comment on column DBA_JAVA_INNERS.IS_ENUM is 
'is the inner class an enum'
/
comment on column DBA_JAVA_INNERS.IS_ANNOTATION is 
'is the inner class an annotation'
/
comment on column DBA_JAVA_INNERS.KIND is 
'type (class, interface, enum or annotation) of the inner class'
/
comment on column DBA_JAVA_INNERS.ALL_QUALIFIERS is 
'concatenation of accessibility, type and other attributes of the inner class'
/
create or replace public synonym DBA_JAVA_INNERS for DBA_JAVA_INNERS
/
grant select on DBA_JAVA_INNERS to select_catalog_role
/



execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_INNERS','CDB_JAVA_INNERS');
grant select on SYS.CDB_JAVA_INNERS to select_catalog_role
/
create or replace public synonym CDB_JAVA_INNERS for SYS.CDB_JAVA_INNERS
/

remark
remark FAMILY "JAVA_FIELDS"
remark

create or replace view USER_JAVA_FIELDS
(NAME, FIELD_INDEX, FIELD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_VOLATILE, IS_TRANSIENT, IS_SYNTHETIC, IS_ENUM,
       ARRAY_DEPTH, BASE_TYPE, FIELD_CLASS) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ m.kln, m.fix, m.fnm, 
       decode(BITAND(m.fac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.fac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.fac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.fac, 64), 64, 'YES', 
                                 0, 'NO'), 
       decode(BITAND(m.fac, 128), 128, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 4096), 4096, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 16384), 16384, 'YES',
                                  0, 'NO'),
       m.fad, 
       decode(m.fbt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       m.fln
from sys.x$joxmfd m
where m.own = userenv('SCHEMAID')
  and m.fix != -1
/
comment on table USER_JAVA_FIELDS is
'field information for java classes owned by the current user'
/
comment on column USER_JAVA_FIELDS.NAME is 
'name of the class'
/
comment on column USER_JAVA_FIELDS.FIELD_INDEX is
'the index of the field'
/
comment on column USER_JAVA_FIELDS.FIELD_NAME is
'the name of the field at FIELD_INDEX'
/
comment on column USER_JAVA_FIELDS.ACCESSIBILITY is
'the accessiblity of the field, public/private/protected/null(i.e. package)'
/
comment on column USER_JAVA_FIELDS.IS_STATIC is
'is the field a static field?'
/
comment on column USER_JAVA_FIELDS.IS_FINAL is
'is the field a final field?'
/
comment on column USER_JAVA_FIELDS.IS_VOLATILE is
'is the field volatile?'
/
comment on column USER_JAVA_FIELDS.IS_TRANSIENT is
'is the field transient?'
/
comment on column USER_JAVA_FIELDS.IS_SYNTHETIC is
'is the field generated by the compiler?'
/
comment on column USER_JAVA_FIELDS.IS_ENUM is
'is the field a member of an enum?'
/
comment on column USER_JAVA_FIELDS.ARRAY_DEPTH is
'array depth of the type of the field'
/
comment on column USER_JAVA_FIELDS.BASE_TYPE is
'base type of the type of the field'
/
comment on column USER_JAVA_FIELDS.FIELD_CLASS is
'if base_type is class, this gives the actual class name of the base object'
/
create or replace public synonym USER_JAVA_FIELDS for USER_JAVA_FIELDS
/
grant read on USER_JAVA_FIELDS to public with grant option
/

create or replace view ALL_JAVA_FIELDS
(OWNER, NAME, FIELD_INDEX, FIELD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_VOLATILE, IS_TRANSIENT, IS_SYNTHETIC, IS_ENUM,
       ARRAY_DEPTH, BASE_TYPE, FIELD_CLASS) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ u.name, m.kln, m.fix, m.fnm, 
       decode(BITAND(m.fac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.fac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.fac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.fac, 64), 64, 'YES', 
                                 0, 'NO'), 
       decode(BITAND(m.fac, 128), 128, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 4096), 4096, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 16384), 16384, 'YES',
                                  0, 'NO'),
       m.fad, 
       decode(m.fbt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       m.fln
from sys.x$joxmfd m, sys.user$ u
where m.own = u.user#
  and m.fix != -1
  and 
  (
    m.own in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          m.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_FIELDS is
'field information for java classes accessible to the current user'
/
comment on column ALL_JAVA_FIELDS.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_FIELDS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_FIELDS.FIELD_INDEX is
'the index of the field'
/
comment on column ALL_JAVA_FIELDS.FIELD_NAME is
'the name of the field at FIELD_INDEX'
/
comment on column ALL_JAVA_FIELDS.ACCESSIBILITY is
'the accessiblity of the field, public/private/protected/null(i.e. package)'
/
comment on column ALL_JAVA_FIELDS.IS_STATIC is
'is the field a static field?'
/
comment on column ALL_JAVA_FIELDS.IS_FINAL is
'is the field a final field?'
/
comment on column ALL_JAVA_FIELDS.IS_VOLATILE is
'is the field volatile?'
/
comment on column ALL_JAVA_FIELDS.IS_TRANSIENT is
'is the field transient?'
/
comment on column ALL_JAVA_FIELDS.IS_SYNTHETIC is
'is the field generated by the compiler?'
/
comment on column ALL_JAVA_FIELDS.IS_ENUM is
'is the field a member of an enum?'
/
comment on column ALL_JAVA_FIELDS.ARRAY_DEPTH is
'array depth of the type of the field'
/
comment on column ALL_JAVA_FIELDS.BASE_TYPE is
'base type of the type of the field'
/
comment on column ALL_JAVA_FIELDS.FIELD_CLASS is
'if base_type is class, this gives the actual class name of the base object'
/
create or replace public synonym ALL_JAVA_FIELDS for ALL_JAVA_FIELDS
/
grant read on ALL_JAVA_FIELDS to public with grant option
/

create or replace view DBA_JAVA_FIELDS
(OWNER, NAME, FIELD_INDEX, FIELD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_VOLATILE, IS_TRANSIENT, IS_SYNTHETIC, IS_ENUM,
       ARRAY_DEPTH, BASE_TYPE, FIELD_CLASS) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ u.name, m.kln, m.fix, m.fnm, 
       decode(BITAND(m.fac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.fac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.fac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.fac, 64), 64, 'YES', 
                                 0, 'NO'), 
       decode(BITAND(m.fac, 128), 128, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 4096), 4096, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.fac, 16384), 16384, 'YES',
                                  0, 'NO'),
       m.fad, 
       decode(m.fbt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       m.fln
from sys.x$joxmfd m, sys.user$ u
where m.own = u.user#
  and m.fix != -1
/      
comment on table DBA_JAVA_FIELDS is
'field information for java classes'
/
comment on column DBA_JAVA_FIELDS.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_FIELDS.NAME is 
'name of the class'
/
comment on column DBA_JAVA_FIELDS.FIELD_INDEX is
'the index of the field'
/
comment on column DBA_JAVA_FIELDS.FIELD_NAME is
'the name of the field at FIELD_INDEX'
/
comment on column DBA_JAVA_FIELDS.ACCESSIBILITY is
'the accessiblity of the field, public/private/protected/null(i.e. package)'
/
comment on column DBA_JAVA_FIELDS.IS_STATIC is
'is the field a static field?'
/
comment on column DBA_JAVA_FIELDS.IS_FINAL is
'is the field a final field?'
/
comment on column DBA_JAVA_FIELDS.IS_VOLATILE is
'is the field volatile?'
/
comment on column DBA_JAVA_FIELDS.IS_TRANSIENT is
'is the field transient?'
/
comment on column DBA_JAVA_FIELDS.IS_SYNTHETIC is
'is the field generated by the compiler?'
/
comment on column DBA_JAVA_FIELDS.IS_ENUM is
'is the field a member of an enum?'
/
comment on column DBA_JAVA_FIELDS.ARRAY_DEPTH is
'array depth of the type of the field'
/
comment on column DBA_JAVA_FIELDS.BASE_TYPE is
'base type of the type of the field'
/
comment on column DBA_JAVA_FIELDS.FIELD_CLASS is
'if base_type is class, this gives the actual class name of the base object'
/
create or replace public synonym DBA_JAVA_FIELDS for DBA_JAVA_FIELDS
/
grant select on DBA_JAVA_FIELDS to select_catalog_role
/



execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_FIELDS','CDB_JAVA_FIELDS');
grant select on SYS.CDB_JAVA_FIELDS to select_catalog_role
/
create or replace public synonym CDB_JAVA_FIELDS for SYS.CDB_JAVA_FIELDS
/

remark
remark FAMILY "JAVA_METHODS"
remark

create or replace view USER_JAVA_METHODS
(NAME, METHOD_INDEX, METHOD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_SYNCHRONIZED, HAS_VARARGS,
       IS_NATIVE, IS_ABSTRACT, IS_STRICTFP, IS_SYNTHETIC,
       ARGUMENTS, THROWS,  
       ARRAY_DEPTH, BASE_TYPE, RETURN_CLASS, IS_COMPILED) 
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */
       m.kln, m.mix, m.mnm, 
       decode(BITAND(m.mac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.mac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.mac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.mac, 32), 32, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 128), 128, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 256), 256, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.mac, 1024), 1024, 'YES', 
                                   0, 'NO'), 
       decode(BITAND(m.mac, 2048), 2048, 'YES',
                                   0, 'NO'),
       decode(BITAND(m.mac, 4096), 4096, 'YES',
                                   0, 'NO'),
       m.agc, m.exc, m.rad, 
       decode(m.rbt, 10, 'int',
                     11, 'long',
                     6,  'float',
                     7,  'double',
                     4,  'boolean',
                     8,  'byte',
                     5,  'char',
                     9,  'short',
                     2,  'class',
                     12, 'void',
                     NULL),
       m.rln,
       nvl((select 'YES' from sys.java$mc$ j where 
               j.method#=m.mmt and 
               j.obj#=m.obn and
               j.length>68 and 
               rownum=1), 'NO')
from sys.x$joxmmd m
where m.own = userenv('SCHEMAID')
  and m.mix != -1
/
comment on table USER_JAVA_METHODS is
'method information for java classes owned by the current user'
/
comment on column USER_JAVA_METHODS.NAME is 
'name of the class'
/
comment on column USER_JAVA_METHODS.METHOD_INDEX is
'the index of the method'
/
comment on column USER_JAVA_METHODS.METHOD_NAME is
'the name of the method at METHOD_INDEX'
/
comment on column USER_JAVA_METHODS.ACCESSIBILITY is
'the accessiblity of the method, public/private/protected/null(i.e. package)'
/
comment on column USER_JAVA_METHODS.IS_STATIC is
'is the method a static method?'
/
comment on column USER_JAVA_METHODS.IS_FINAL is
'is the method a final method?'
/
comment on column USER_JAVA_METHODS.IS_SYNCHRONIZED is
'is the method a synchronized method?'
/
comment on column USER_JAVA_METHODS.HAS_VARARGS is
'does the method have a variable number of arguments?'
/
comment on column USER_JAVA_METHODS.IS_NATIVE is
'is the method a native method?'
/
comment on column USER_JAVA_METHODS.IS_ABSTRACT is
'is the method an abstract method?'
/
comment on column USER_JAVA_METHODS.IS_STRICTFP is
'is the method declared strictfp?'
/
comment on column USER_JAVA_METHODS.IS_SYNTHETIC is
'is the method generated by the compiler?'
/
comment on column USER_JAVA_METHODS.ARGUMENTS is
'number of arguments of the method'
/
comment on column USER_JAVA_METHODS.THROWS is
'number of exceptions thrown by the method'
/
comment on column USER_JAVA_METHODS.ARRAY_DEPTH is
'array depth of the return type of the method'
/
comment on column USER_JAVA_METHODS.BASE_TYPE is
'base type of the return type of the field'
/
comment on column USER_JAVA_METHODS.RETURN_CLASS is
'if base_type is class, this gives the actual class name of the return value'
/
comment on column USER_JAVA_METHODS.IS_COMPILED is
'has the method been compiled by the just in time compiler?'
/
create or replace public synonym USER_JAVA_METHODS for USER_JAVA_METHODS
/
grant read on USER_JAVA_METHODS to public with grant option
/

create or replace view ALL_JAVA_METHODS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_SYNCHRONIZED, HAS_VARARGS,
       IS_NATIVE, IS_ABSTRACT, IS_STRICTFP, IS_SYNTHETIC,
       ARGUMENTS, THROWS,  
       ARRAY_DEPTH, BASE_TYPE, RETURN_CLASS, IS_COMPILED)
as 
select /*+ no_cartesian(m) no_cartesian(m) ordered use_nl(o m) */ u.name,
m.kln, m.mix, m.mnm, 
       decode(BITAND(m.mac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.mac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.mac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.mac, 32), 32, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 128), 128, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 256), 256, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.mac, 1024), 1024, 'YES', 
                                   0, 'NO'), 
       decode(BITAND(m.mac, 2048), 2048, 'YES',
                                   0, 'NO'),
       decode(BITAND(m.mac, 4096), 4096, 'YES',
                                   0, 'NO'),
       m.agc, m.exc, m.rad, 
       decode(m.rbt, 10, 'int',
                     11, 'long',
                     6,  'float',
                     7,  'double',
                     4,  'boolean',
                     8,  'byte',
                     5,  'char',
                     9,  'short',
                     2,  'class',
                     12, 'void',
                     NULL),
       m.rln,
       nvl((select 'YES' from sys.java$mc$ j where 
               j.method#=m.mmt and 
               j.obj#=m.obn and
               j.length>68 and 
               rownum=1), 'NO')
from sys.x$joxmmd m, user$ u
where m.own = u.user#
  and m.mix != -1
  and 
  (
    m.own in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          m.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_METHODS is
'method information for java classes accessible the current user'
/
comment on column ALL_JAVA_METHODS.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_METHODS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_METHODS.METHOD_INDEX is
'the index of the method'
/
comment on column ALL_JAVA_METHODS.METHOD_NAME is
'the name of the method at METHOD_INDEX'
/
comment on column ALL_JAVA_METHODS.ACCESSIBILITY is
'the accessiblity of the method, public/private/protected/null(i.e. package)'
/
comment on column ALL_JAVA_METHODS.IS_STATIC is
'is the method a static method?'
/
comment on column ALL_JAVA_METHODS.IS_FINAL is
'is the method a final method?'
/
comment on column ALL_JAVA_METHODS.IS_SYNCHRONIZED is
'is the method a synchronized method?'
/
comment on column ALL_JAVA_METHODS.HAS_VARARGS is
'does the method have a variable number of arguments?'
/
comment on column ALL_JAVA_METHODS.IS_NATIVE is
'is the method a native method?'
/
comment on column ALL_JAVA_METHODS.IS_ABSTRACT is
'is the method an abstract method?'
/
comment on column ALL_JAVA_METHODS.IS_STRICTFP is
'is the method declared strictfp?'
/
comment on column ALL_JAVA_METHODS.IS_SYNTHETIC is
'is the method generated by the compiler?'
/
comment on column ALL_JAVA_METHODS.ARGUMENTS is
'number of arguments of the method'
/
comment on column ALL_JAVA_METHODS.THROWS is
'number of exceptions thrown by the method'
/
comment on column ALL_JAVA_METHODS.ARRAY_DEPTH is
'array depth of the return type of the method'
/
comment on column ALL_JAVA_METHODS.BASE_TYPE is
'base type of the return type of the field'
/
comment on column ALL_JAVA_METHODS.RETURN_CLASS is
'if base_type is class, this gives the actual class name of the return value'
/
comment on column ALL_JAVA_METHODS.IS_COMPILED is
'has the method been compiled by the just in time compiler?'
/
create or replace public synonym ALL_JAVA_METHODS for ALL_JAVA_METHODS
/
grant read on ALL_JAVA_METHODS to public with grant option
/

create or replace view DBA_JAVA_METHODS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, ACCESSIBILITY,
       IS_STATIC, IS_FINAL, IS_SYNCHRONIZED, HAS_VARARGS,
       IS_NATIVE, IS_ABSTRACT, IS_STRICTFP, IS_SYNTHETIC,
       ARGUMENTS, THROWS,  
       ARRAY_DEPTH, BASE_TYPE, RETURN_CLASS, IS_COMPILED)
as 
select /*+ no_cartesian(m) ordered use_nl(o m) */ u.name, 
m.kln, m.mix, m.mnm, 
       decode(BITAND(m.mac, 7), 1, 'PUBLIC', 
                                2, 'PRIVATE',
                                4, 'PROTECTED',
                                NULL),
       decode(BITAND(m.mac, 8), 8, 'YES', 
                                0, 'NO'),
       decode(BITAND(m.mac, 16), 16, 'YES', 
                                 0, 'NO'),
       decode(BITAND(m.mac, 32), 32, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 128), 128, 'YES',
                                 0, 'NO'),
       decode(BITAND(m.mac, 256), 256, 'YES',
                                  0, 'NO'),
       decode(BITAND(m.mac, 1024), 1024, 'YES', 
                                   0, 'NO'), 
       decode(BITAND(m.mac, 2048), 2048, 'YES',
                                   0, 'NO'),
       decode(BITAND(m.mac, 4096), 4096, 'YES',
                                   0, 'NO'),
       m.agc, m.exc, m.rad, 
       decode(m.rbt, 10, 'int',
                     11, 'long',
                     6,  'float',
                     7,  'double',
                     4,  'boolean',
                     8,  'byte',
                     5,  'char',
                     9,  'short',
                     2,  'class',
                     12, 'void',
                     NULL),
       m.rln,
       nvl((select 'YES' from sys.java$mc$ j where 
               j.method#=m.mmt and 
               j.obj#=m.obn and
               j.length>68 and 
               rownum=1), 'NO')
from sys.x$joxmmd m, user$ u
where m.own = u.user#
  and m.mix != -1
/
comment on table DBA_JAVA_METHODS is
'method information for all java classes'
/
comment on column DBA_JAVA_METHODS.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_METHODS.NAME is 
'name of the class'
/
comment on column DBA_JAVA_METHODS.METHOD_INDEX is
'the index of the method'
/
comment on column DBA_JAVA_METHODS.METHOD_NAME is
'the name of the method at METHOD_INDEX'
/
comment on column DBA_JAVA_METHODS.ACCESSIBILITY is
'the accessiblity of the method, public/private/protected/null(i.e. package)'
/
comment on column DBA_JAVA_METHODS.IS_STATIC is
'is the method a static method?'
/
comment on column DBA_JAVA_METHODS.IS_FINAL is
'is the method a final method?'
/
comment on column DBA_JAVA_METHODS.IS_SYNCHRONIZED is
'is the method a synchronized method?'
/
comment on column DBA_JAVA_METHODS.HAS_VARARGS is
'does the method have a variable number of arguments?'
/
comment on column DBA_JAVA_METHODS.IS_NATIVE is
'is the method a native method?'
/
comment on column DBA_JAVA_METHODS.IS_ABSTRACT is
'is the method an abstract method?'
/
comment on column DBA_JAVA_METHODS.IS_STRICTFP is
'is the method declared strictfp?'
/
comment on column DBA_JAVA_METHODS.IS_SYNTHETIC is
'is the method generated by the compiler?'
/
comment on column DBA_JAVA_METHODS.ARGUMENTS is
'number of arguments of the method'
/
comment on column DBA_JAVA_METHODS.THROWS is
'number of exceptions thrown by the method'
/
comment on column DBA_JAVA_METHODS.ARRAY_DEPTH is
'array depth of the return type of the method'
/
comment on column DBA_JAVA_METHODS.BASE_TYPE is
'base type of the return type of the field'
/
comment on column DBA_JAVA_METHODS.RETURN_CLASS is
'if base_type is class, this gives the actual class name of the return value'
/
comment on column DBA_JAVA_METHODS.IS_COMPILED is
'has the method been compiled by the just in time compiler?'
/
create or replace public synonym DBA_JAVA_METHODS for DBA_JAVA_METHODS
/
grant select on DBA_JAVA_METHODS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_METHODS','CDB_JAVA_METHODS');
grant select on SYS.CDB_JAVA_METHODS to select_catalog_role
/
create or replace public synonym CDB_JAVA_METHODS for SYS.CDB_JAVA_METHODS
/

remark 
remark FAMILY "JAVA_ARGUMENTS"
remark
 
create or replace view USER_JAVA_ARGUMENTS
(NAME, METHOD_INDEX, METHOD_NAME, ARGUMENT_POSITION, 
       ARRAY_DEPTH, BASE_TYPE, ARGUMENT_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mag)  ordered use_nl(o mmd) */ mmd.kln, mmd.mix, mmd.mnm, mag.aix, 
       mag.aad, 
       decode(mag.abt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       mag.aln
from sys.x$joxfm mmd, sys.x$joxmag mag
where mmd.own = userenv('SCHEMAID')
  and mmd.mix != -1
  and mmd.mix = mag.mix
  and mmd.obn = mag.obn;
/
comment on table USER_JAVA_ARGUMENTS is
'argument information for java classes owned by the current user'
/
comment on column USER_JAVA_ARGUMENTS.NAME is 
'name of the class'
/
comment on column USER_JAVA_ARGUMENTS.METHOD_INDEX is
'the index of the method'
/
comment on column USER_JAVA_ARGUMENTS.METHOD_NAME is
'the name of the method'
/
comment on column USER_JAVA_ARGUMENTS.ARGUMENT_POSITION is
'the position of the argument, starting from 0'
/
comment on column USER_JAVA_ARGUMENTS.ARRAY_DEPTH is
'array depth of the type of the arguement'
/
comment on column USER_JAVA_ARGUMENTS.BASE_TYPE is
'base type of the type of the argument'
/
comment on column USER_JAVA_ARGUMENTS.ARGUMENT_CLASS is
'if base_type is class, this gives the actual class name of the argument'
/
create or replace public synonym USER_JAVA_ARGUMENTS for USER_JAVA_ARGUMENTS
/
grant read on USER_JAVA_ARGUMENTS to public with grant option
/

create or replace view ALL_JAVA_ARGUMENTS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, ARGUMENT_POSITION, 
       ARRAY_DEPTH, BASE_TYPE, ARGUMENT_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mag)  ordered use_nl(o mmd) */ u.name, mmd.kln, mmd.mix, mmd.mnm, mag.aix, 
       mag.aad, 
       decode(mag.abt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       mag.aln
from sys.x$joxfm mmd, sys.x$joxmag mag, user$ u
where mmd.own = u.user#
  and mmd.mix != -1
  and mmd.mix = mag.mix
  and mmd.obn = mag.obn
  and 
  (
    u.user# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          mmd.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_ARGUMENTS is
'argument information for java classes accessible to the current user'
/
comment on column ALL_JAVA_ARGUMENTS.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_ARGUMENTS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_ARGUMENTS.METHOD_INDEX is
'the index of the method'
/
comment on column ALL_JAVA_ARGUMENTS.METHOD_NAME is
'the name of the method'
/
comment on column ALL_JAVA_ARGUMENTS.ARGUMENT_POSITION is
'the position of the argument, starting from 0'
/
comment on column ALL_JAVA_ARGUMENTS.ARRAY_DEPTH is
'array depth of the type of the arguement'
/
comment on column ALL_JAVA_ARGUMENTS.BASE_TYPE is
'base type of the type of the argument'
/
comment on column ALL_JAVA_ARGUMENTS.ARGUMENT_CLASS is
'if base_type is class, this gives the actual class name of the argument'
/
create or replace public synonym ALL_JAVA_ARGUMENTS for ALL_JAVA_ARGUMENTS
/
grant read on ALL_JAVA_ARGUMENTS to public with grant option
/

create or replace view DBA_JAVA_ARGUMENTS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, ARGUMENT_POSITION, 
       ARRAY_DEPTH, BASE_TYPE, ARGUMENT_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mag)  ordered use_nl(o mmd) */ u.name, mmd.kln, mmd.mix, mmd.mnm, mag.aix, 
       mag.aad, 
       decode(mag.abt, 10, 'int',
                     11, 'long',
                     6, 'float',
                     7, 'double',
                     4, 'boolean',
                     8, 'byte',
                     5, 'char',
                     9, 'short',
                     2, 'class',
                     NULL),
       mag.aln
from sys.x$joxfm mmd, sys.x$joxmag mag, user$ u
where mmd.own = u.user#
  and mmd.mix != -1
  and mmd.mix = mag.mix
  and mmd.obn = mag.obn
/
comment on table DBA_JAVA_ARGUMENTS is
'argument information for all java classes'
/
comment on column DBA_JAVA_ARGUMENTS.OWNER is 
'owner of the class'
/
comment on column DBA_JAVA_ARGUMENTS.NAME is 
'name of the class'
/
comment on column DBA_JAVA_ARGUMENTS.METHOD_INDEX is
'the index of the method'
/
comment on column DBA_JAVA_ARGUMENTS.METHOD_NAME is
'the name of the method'
/
comment on column DBA_JAVA_ARGUMENTS.ARGUMENT_POSITION is
'the position of the argument, starting from 0'
/
comment on column DBA_JAVA_ARGUMENTS.ARRAY_DEPTH is
'array depth of the type of the arguement'
/
comment on column DBA_JAVA_ARGUMENTS.BASE_TYPE is
'base type of the type of the argument'
/
comment on column DBA_JAVA_ARGUMENTS.ARGUMENT_CLASS is
'if base_type is class, this gives the actual class name of the argument'
/
create or replace public synonym DBA_JAVA_ARGUMENTS for DBA_JAVA_ARGUMENTS
/
grant select on DBA_JAVA_ARGUMENTS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_ARGUMENTS','CDB_JAVA_ARGUMENTS');
grant select on SYS.CDB_JAVA_ARGUMENTS to select_catalog_role
/
create or replace public synonym CDB_JAVA_ARGUMENTS for SYS.CDB_JAVA_ARGUMENTS
/

remark 
remark FAMILY "JAVA_THROWS"
remark

create or replace view USER_JAVA_THROWS
(NAME, METHOD_INDEX, METHOD_NAME, EXCEPTION_INDEX, EXCEPTION_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mex) ordered use_nl(o mmd) */
       mmd.kln, mmd.mix, mmd.mnm, mex.xix, mex.xln 
from sys.x$joxmex mex, sys.x$joxmmd mmd
where mmd.own = userenv('SCHEMAID')
  and mmd.mix != -1
  and mmd.mix = mex.mix
  and mmd.obn = mex.obn;
/
comment on table USER_JAVA_THROWS is
'list of exceptions thrown from methods of classes owned by the current user'
/
comment on column USER_JAVA_THROWS.NAME is 
'name of the class'
/
comment on column USER_JAVA_THROWS.METHOD_INDEX is
'the index of the method throwing the exception'
/
comment on column USER_JAVA_THROWS.METHOD_NAME is
'the name of the method throwing the exception'
/
comment on column USER_JAVA_THROWS.EXCEPTION_INDEX is
'the index of the exception'
/
comment on column USER_JAVA_THROWS.EXCEPTION_CLASS is
'the class of the exception'
/
create or replace public synonym USER_JAVA_THROWS for USER_JAVA_THROWS
/
grant read on USER_JAVA_THROWS to public with grant option
/

create or replace view ALL_JAVA_THROWS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, EXCEPTION_INDEX, EXCEPTION_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mex)  ordered use_nl(o mmd) */
       u.name, mmd.kln, mmd.mix, mmd.mnm, mex.xix, mex.xln 
from sys.x$joxmex mex, sys.x$joxmmd mmd, sys.user$ u
where mmd.own = u.user#
  and mmd.mix != -1
  and mmd.mix = mex.mix
  and mmd.obn = mex.obn
  and 
  (
    u.user# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          mmd.obn in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/      
comment on table ALL_JAVA_THROWS is
'list of exceptions thrown from methods of classes accessible to the current user'
/
comment on column ALL_JAVA_THROWS.OWNER is
'owner of the class'
/
comment on column ALL_JAVA_THROWS.NAME is 
'name of the class'
/
comment on column ALL_JAVA_THROWS.METHOD_INDEX is
'the index of the method throwing the exception'
/
comment on column ALL_JAVA_THROWS.METHOD_NAME is
'the name of the method throwing the exception'
/
comment on column ALL_JAVA_THROWS.EXCEPTION_INDEX is
'the index of the exception'
/
comment on column ALL_JAVA_THROWS.EXCEPTION_CLASS is
'the class of the exception'
/
create or replace public synonym ALL_JAVA_THROWS for ALL_JAVA_THROWS
/
grant read on ALL_JAVA_THROWS to public with grant option
/

create or replace view DBA_JAVA_THROWS
(OWNER, NAME, METHOD_INDEX, METHOD_NAME, EXCEPTION_INDEX, EXCEPTION_CLASS) 
as 
select /*+ no_cartesian(mmd) no_cartesian(mex) ordered use_nl(o mmd) */
       u.name, mmd.kln, mmd.mix, mmd.mnm, mex.xix, mex.xln 
from sys.x$joxmex mex, sys.x$joxmmd mmd, sys.user$ u
where mmd.own = u.user#
  and mmd.mix != -1
  and mmd.mix = mex.mix
  and mmd.obn = mex.obn
/
comment on table DBA_JAVA_THROWS is
'list of exceptions thrown from methods of all java classes'
/
comment on column DBA_JAVA_THROWS.OWNER is
'owner of the class'
/
comment on column DBA_JAVA_THROWS.NAME is 
'name of the class'
/
comment on column DBA_JAVA_THROWS.METHOD_INDEX is
'the index of the method throwing the exception'
/
comment on column DBA_JAVA_THROWS.METHOD_NAME is
'the name of the method throwing the exception'
/
comment on column DBA_JAVA_THROWS.EXCEPTION_INDEX is
'the index of the exception'
/
comment on column DBA_JAVA_THROWS.EXCEPTION_CLASS is
'the class of the exception'
/
create or replace public synonym DBA_JAVA_THROWS for DBA_JAVA_THROWS
/
grant select on DBA_JAVA_THROWS to select_catalog_role
/



execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_THROWS','CDB_JAVA_THROWS');
grant select on SYS.CDB_JAVA_THROWS to select_catalog_role
/
create or replace public synonym CDB_JAVA_THROWS for SYS.CDB_JAVA_THROWS
/

remark
remark FAMILY "JAVA_DERIVATIONS"
remark

create or replace view USER_JAVA_DERIVATIONS
(SOURCE_NAME, CLASS_INDEX, CLASS_NAME)
as 
select nvl(j.longdbcs, o.name),
       t.joxftderivedclassnumber,
       nvl(j2.longdbcs, t.joxftderivedclassname)
from sys.javasnm$ j, sys.javasnm$ j2, sys.obj$ o, sys.x$joxdrc t
where o.obj# = t.joxftobn
  and o.type# = 28
  and j.short(+) = o.name
  and j2.short(+) = t.joxftderivedclassname
  and o.owner# = userenv('SCHEMAID')
/
comment on table USER_JAVA_DERIVATIONS is
'this view maps java source objects and their derived java class objects and java resource objects  for the java class owned by user'
/
comment on column USER_JAVA_DERIVATIONS.SOURCE_NAME is 
'name of the java source object'
/
comment on column USER_JAVA_DERIVATIONS.CLASS_INDEX is 
'index of the derived java class object'
/
comment on column USER_JAVA_DERIVATIONS.CLASS_NAME is 
'name of the derived java class object'
/
create or replace public synonym USER_JAVA_DERIVATIONS for USER_JAVA_DERIVATIONS
/
grant read on USER_JAVA_DERIVATIONS to public with grant option
/

create or replace view ALL_JAVA_DERIVATIONS
(OWNER, SOURCE_NAME, CLASS_INDEX, CLASS_NAME)
as 
select u.name,
       nvl(j.longdbcs, o.name),
       t.joxftderivedclassnumber,
       nvl(j2.longdbcs, t.joxftderivedclassname)
from sys.javasnm$ j, sys.javasnm$ j2, sys.obj$ o, sys.x$joxdrc t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 28
  and o.owner# = u.user#
  and j.short(+) = o.name
  and j2.short(+) = t.joxftderivedclassname
  and 
  (
    o.owner# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          o.obj# in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/
comment on table ALL_JAVA_DERIVATIONS is
'this view maps java source objects and their derived java class objects and java resource objects  for the java class accessible to user'
/
comment on column ALL_JAVA_DERIVATIONS.OWNER is 
'owner of the java class object'
/
comment on column ALL_JAVA_DERIVATIONS.SOURCE_NAME is 
'name of the java source object'
/
comment on column ALL_JAVA_DERIVATIONS.CLASS_INDEX is 
'index of the derived java class object'
/
comment on column ALL_JAVA_DERIVATIONS.CLASS_NAME is 
'name of the derived java class object'
/
create or replace public synonym ALL_JAVA_DERIVATIONS for ALL_JAVA_DERIVATIONS
/
grant read on ALL_JAVA_DERIVATIONS to public with grant option
/

create or replace view DBA_JAVA_DERIVATIONS
(OWNER, SOURCE_NAME, CLASS_INDEX, CLASS_NAME)
as 
select u.name,
       nvl(j.longdbcs, o.name),
       t.joxftderivedclassnumber,
       nvl(j2.longdbcs, t.joxftderivedclassname)
from sys.javasnm$ j, sys.javasnm$ j2, sys.obj$ o, sys.x$joxdrc t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 28
  and o.owner# = u.user#
  and j.short(+) = o.name
  and j2.short(+) = t.joxftderivedclassname
/
comment on table DBA_JAVA_DERIVATIONS is
'this view maps java source objects and their derived java class objects and java resource objects for all java classes'
/ 
comment on column DBA_JAVA_DERIVATIONS.OWNER is 
'owner of the java class object'
/
comment on column DBA_JAVA_DERIVATIONS.SOURCE_NAME is 
'name of the java source object'
/
comment on column DBA_JAVA_DERIVATIONS.CLASS_INDEX is 
'index of the derived java class object'
/
comment on column DBA_JAVA_DERIVATIONS.CLASS_NAME is 
'name of the derived java class object'
/
create or replace public synonym DBA_JAVA_DERIVATIONS for DBA_JAVA_DERIVATIONS
/
grant select on DBA_JAVA_DERIVATIONS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_DERIVATIONS','CDB_JAVA_DERIVATIONS');
grant select on SYS.CDB_JAVA_DERIVATIONS to select_catalog_role
/
create or replace public synonym CDB_JAVA_DERIVATIONS for SYS.CDB_JAVA_DERIVATIONS
/

remark
remark FAMILY "JAVA_RESOLVERS"
remark

create or replace view USER_JAVA_RESOLVERS
(NAME, TERM_INDEX, PATTERN, SCHEMA)
as 
select nvl(j.longdbcs, o.name),
       t.joxftresolvertermnumber,
       t.joxftresolvertermpattern,
       t.joxftresolvertermschema
from sys.javasnm$ j, sys.obj$ o, sys.x$joxrsv t
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = userenv('SCHEMAID')
  and j.short(+) = o.name
/
comment on table USER_JAVA_RESOLVERS is
'resolver of java class owned by user'
/
comment on column USER_JAVA_RESOLVERS.NAME is 
'name of the java class object'
/
comment on column USER_JAVA_RESOLVERS.TERM_INDEX is 
'index of the resolver term in this row'
/
comment on column USER_JAVA_RESOLVERS.PATTERN is 
'resolver pattern of the resolver term identified by TERM_INDEX column'
/
comment on column USER_JAVA_RESOLVERS.SCHEMA is 
'resolver schema of the resolver term identified by TERM_INDEX column'
/ 
create or replace public synonym USER_JAVA_RESOLVERS for USER_JAVA_RESOLVERS
/
grant read on USER_JAVA_RESOLVERS to public with grant option
/

create or replace view ALL_JAVA_RESOLVERS
(OWNER, NAME, TERM_INDEX, PATTERN, SCHEMA)
as 
select u.name,
       nvl(j.longdbcs, o.name),
       t.joxftresolvertermnumber,
       t.joxftresolvertermpattern,
       t.joxftresolvertermschema
from sys.javasnm$ j, sys.obj$ o, sys.x$joxrsv t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
  and 
  (
    o.owner# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          o.obj# in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/
comment on table ALL_JAVA_RESOLVERS is
'resolver of java class owned by user'
/
comment on column ALL_JAVA_RESOLVERS.OWNER is 
'owner of the java class object'
/
comment on column ALL_JAVA_RESOLVERS.NAME is 
'name of the java class object'
/
comment on column ALL_JAVA_RESOLVERS.TERM_INDEX is 
'index of the resolver term in this row'
/
comment on column ALL_JAVA_RESOLVERS.PATTERN is 
'resolver pattern of the resolver term identified by TERM_INDEX column'
/
comment on column ALL_JAVA_RESOLVERS.SCHEMA is 
'resolver schema of the resolver term identified by TERM_INDEX column'
/ 
create or replace public synonym ALL_JAVA_RESOLVERS for ALL_JAVA_RESOLVERS
/
grant read on ALL_JAVA_RESOLVERS to public with grant option
/

create or replace view DBA_JAVA_RESOLVERS
(OWNER, NAME, TERM_INDEX, PATTERN, SCHEMA)
as 
select u.name,
       nvl(j.longdbcs, o.name),
       t.joxftresolvertermnumber,
       t.joxftresolvertermpattern,
       t.joxftresolvertermschema
from sys.javasnm$ j, sys.obj$ o, sys.x$joxrsv t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
/
comment on table DBA_JAVA_RESOLVERS is
'resolver of java class owned by user'
/
comment on column DBA_JAVA_RESOLVERS.OWNER is 
'owner of the java class object'
/
comment on column DBA_JAVA_RESOLVERS.NAME is 
'name of the java class object'
/
comment on column DBA_JAVA_RESOLVERS.TERM_INDEX is 
'index of the resolver term in this row'
/
comment on column DBA_JAVA_RESOLVERS.PATTERN is 
'resolver pattern of the resolver term identified by TERM_INDEX column'
/
comment on column DBA_JAVA_RESOLVERS.SCHEMA is 
'resolver schema of the resolver term identified by TERM_INDEX column'
/ 
create or replace public synonym DBA_JAVA_RESOLVERS for DBA_JAVA_RESOLVERS
/
grant select on DBA_JAVA_RESOLVERS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_RESOLVERS','CDB_JAVA_RESOLVERS');
grant select on SYS.CDB_JAVA_RESOLVERS to select_catalog_role
/
create or replace public synonym CDB_JAVA_RESOLVERS for SYS.CDB_JAVA_RESOLVERS
/

remark
remark FAMILY "JAVA_NCOMPS"
remark

create or replace view USER_JAVA_NCOMPS
(NAME, SOURCE, INITIALIZER, LIBRARYFILE, LIBRARY)
as 
select /*+ no_cartesian(t) ordered use_nl(o t) */ nvl(j.longdbcs, o.name),
       t.joxftncompsource,
       t.joxftncompinitializer,
       t.joxftncomplibraryfile,
       t.joxftncomplibrary
from sys.javasnm$ j, sys.obj$ o, sys.x$joxobj t
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = userenv('SCHEMAID')
  and j.short(+) = o.name
/
comment on table USER_JAVA_NCOMPS is
'ncomp related information of java classes owned by user'
/
comment on column USER_JAVA_NCOMPS.NAME is 
'name of the java class object'
/
comment on column USER_JAVA_NCOMPS.SOURCE is 
'ncomp source shown in this row'
/
comment on column USER_JAVA_NCOMPS.INITIALIZER is 
'ncomp initializer shown in this row'
/
comment on column USER_JAVA_NCOMPS.LIBRARYFILE is 
'ncomp libraryfile shown in this row'
/ 
comment on column USER_JAVA_NCOMPS.LIBRARY is 
'ncomp library shown in this row'
/ 
create or replace public synonym USER_JAVA_NCOMPS for USER_JAVA_NCOMPS
/
grant read on USER_JAVA_NCOMPS to public with grant option
/

create or replace view ALL_JAVA_NCOMPS
(OWNER, NAME, SOURCE, INITIALIZER, LIBRARYFILE, LIBRARY)
as 
select /*+ no_cartesian(t) ordered use_nl(o t) */
       u.name,
       nvl(j.longdbcs, o.name),
       t.joxftncompsource,
       t.joxftncompinitializer,
       t.joxftncomplibraryfile,
       t.joxftncomplibrary
from sys.javasnm$ j, sys.obj$ o, sys.x$joxobj t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
  and 
  (
    o.owner# in (userenv('SCHEMAID'), 1 /* PUBLIC */)
    or
    (
      (
        (
          o.obj# in (select obj# from sys.objauth$
                     where grantee# in (select kzsrorol from x$kzsro)
                       and privilege#  = 12 /* EXECUTE */)
        )
        or
        exists
        (
          select null from sys.sysauth$
          where grantee# in (select kzsrorol from x$kzsro)
          and
          (
            (
              /* procedure */
              (
                privilege# = -144 /* EXECUTE ANY PROCEDURE */
                or
                privilege# = -141 /* CREATE ANY PROCEDURE */
              )
            )
          )
        )
      )
    )
  )
/
comment on table ALL_JAVA_NCOMPS is
'ncomp related information of java classes accessible to user'
/
comment on column ALL_JAVA_NCOMPS.OWNER is 
'owner of the java class object'
/
comment on column ALL_JAVA_NCOMPS.NAME is 
'name of the java class object'
/
comment on column ALL_JAVA_NCOMPS.SOURCE is 
'ncomp source shown in this row'
/
comment on column ALL_JAVA_NCOMPS.INITIALIZER is 
'ncomp initializer shown in this row'
/
comment on column ALL_JAVA_NCOMPS.LIBRARYFILE is 
'ncomp libraryfile shown in this row'
/ 
comment on column ALL_JAVA_NCOMPS.LIBRARY is 
'ncomp library shown in this row'
/ 
create or replace public synonym ALL_JAVA_NCOMPS for ALL_JAVA_NCOMPS
/
grant read on ALL_JAVA_NCOMPS to public with grant option
/

create or replace view DBA_JAVA_NCOMPS
(OWNER, NAME, SOURCE, INITIALIZER, LIBRARYFILE, LIBRARY)
as 
select /*+ no_cartesian(t) ordered use_nl(o t) */
       u.name,
       nvl(j.longdbcs, o.name),
       t.joxftncompsource,
       t.joxftncompinitializer,
       t.joxftncomplibraryfile,
       t.joxftncomplibrary
from sys.javasnm$ j, sys.obj$ o, sys.x$joxobj t, sys.user$ u
where o.obj# = t.joxftobn
  and o.type# = 29
  and o.owner# = u.user#
  and j.short(+) = o.name
/
comment on table ALL_JAVA_NCOMPS is
'ncomp related information of all java classes'
/
comment on column ALL_JAVA_NCOMPS.OWNER is 
'owner of the java class object'
/
comment on column ALL_JAVA_NCOMPS.NAME is 
'name of the java class object'
/
comment on column ALL_JAVA_NCOMPS.SOURCE is 
'ncomp source shown in this row'
/
comment on column ALL_JAVA_NCOMPS.INITIALIZER is 
'ncomp initializer shown in this row'
/
comment on column ALL_JAVA_NCOMPS.LIBRARYFILE is 
'ncomp libraryfile shown in this row'
/ 
comment on column ALL_JAVA_NCOMPS.LIBRARY is 
'ncomp library shown in this row'
/ 
create or replace public synonym DBA_JAVA_NCOMPS for DBA_JAVA_NCOMPS
/
grant select on DBA_JAVA_NCOMPS to select_catalog_role
/





execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_NCOMPS','CDB_JAVA_NCOMPS');
grant select on SYS.CDB_JAVA_NCOMPS to select_catalog_role
/
create or replace public synonym CDB_JAVA_NCOMPS for SYS.CDB_JAVA_NCOMPS
/

remark
remark FAMILY "JAVA_COMPILER_OPTIONS"
remark

create or replace view USER_JAVA_COMPILER_OPTIONS
(OPTION_NAME, VALUE)
as 
select o.property,
       dbms_java.decode_native_compiler_option(o.property, o.value)
from sys.java$compiler$options o
where o.owner# = userenv('SCHEMAID')
/
comment on table USER_JAVA_COMPILER_OPTIONS is
'native compiler options provided by the user'
/
comment on column USER_JAVA_COMPILER_OPTIONS.OPTION_NAME is 
'name of native-compiler option'
/
comment on column USER_JAVA_COMPILER_OPTIONS.VALUE is
'value of the native-compiler option'
/
create or replace public synonym USER_JAVA_COMPILER_OPTIONS for USER_JAVA_COMPILER_OPTIONS
/
grant read on USER_JAVA_COMPILER_OPTIONS to public with grant option
/

create or replace view ALL_JAVA_COMPILER_OPTIONS
(OWNER, OPTION_NAME, VALUE)
as 
select u.name, o.property,
       dbms_java.decode_native_compiler_option(o.property, o.value)
from sys.user$ u, sys.java$compiler$options o
where o.owner# = u.user#
and o.owner# in (userenv('SCHEMAID'), 0 /* SYS */)
/
comment on table ALL_JAVA_COMPILER_OPTIONS is
'native-compiler options applicable to user'
/
comment on column ALL_JAVA_COMPILER_OPTIONS.OWNER is
'owner of native-compiler option'
/
comment on column ALL_JAVA_COMPILER_OPTIONS.OPTION_NAME is 
'name of the native-compiler option'
/
comment on column ALL_JAVA_COMPILER_OPTIONS.VALUE is
'value of the native-compiler option'
/
create or replace public synonym ALL_JAVA_COMPILER_OPTIONS for ALL_JAVA_COMPILER_OPTIONS
/
grant read on ALL_JAVA_COMPILER_OPTIONS to public with grant option
/

create or replace view DBA_JAVA_COMPILER_OPTIONS
(OWNER, OPTION_NAME, VALUE) 
as 
select u.name, o.property,
       dbms_java.decode_native_compiler_option(o.property, o.value)
from sys.user$ u, sys.java$compiler$options o
where o.owner# = u.user#
/
comment on table DBA_JAVA_COMPILER_OPTIONS is
'all native-compiler options'
/
comment on column DBA_JAVA_COMPILER_OPTIONS.OWNER is 
'owner of the native-compiler option'
/
comment on column DBA_JAVA_COMPILER_OPTIONS.OPTION_NAME is 
'name of the native-compiler option'
/
comment on column DBA_JAVA_COMPILER_OPTIONS.VALUE is
'value of the native-compiler option'
/
create or replace public synonym DBA_JAVA_COMPILER_OPTIONS for DBA_JAVA_COMPILER_OPTIONS
/
grant select on DBA_JAVA_COMPILER_OPTIONS to select_catalog_role
/


execute CDBView.create_cdbview(false,'SYS','DBA_JAVA_COMPILER_OPTIONS','CDB_JAVA_COMPILER_OPTIONS');
grant select on SYS.CDB_JAVA_COMPILER_OPTIONS to select_catalog_role
/
create or replace public synonym CDB_JAVA_COMPILER_OPTIONS for SYS.CDB_JAVA_COMPILER_OPTIONS
/

Rem We also (re)create CDB_JAVA_POLICY here even though the related views,
Rem DBA_JAVA_POLICY etc are created elsewhere (jvmsec1.sql).  This is because
Rem CDB_JAVA_POLICY sometimes needs to be recreated on up/downgrade (cases
Rem of which are bug 24438034 and RTI 19276525) and jvmsec1.sql is not reloaded
Rem during up/downgrade as the current script is. Because (re)creation here
Rem will take care of all required cases (db creation from scratch, upgrade and
Rem downgrade) we remove CDB_JAVA_POLICY creation statements from jvmsec1.sql
Rem and jvma112.sql which would otherwise be redundant.  One might argue that
Rem the creation of the other *_JAVA_POLICY views should also be moved here
Rem from jvmsec1.sql, but we decline to do so to avoid unintended consequenes.

exec CDBView.create_cdbview(false,'SYS','DBA_JAVA_POLICY','CDB_JAVA_POLICY');

grant select on SYS.CDB_java_policy to select_catalog_role
/
create or replace public synonym CDB_java_policy for SYS.CDB_java_policy
/



OHA YOOOO