Oracle | DBMS_REGISTRY

Oracle DBMS_REGISTRY_SIMPLE Version 21c

General Information

Library Note

Morgan's Library Page Header

ACE Director Alum Daniel Morgan, founder of Morgan's Library, is scheduling complimentary technical Workshops on Database Security for the first 30 Oracle Database customers located anywhere in North America, EMEA, LATAM, or APAC that send an email to asra_us@oracle.com. Request a Workshop for your organization today.

Purpose Used with c scripts prior to upgrading the data dictionary.

AUTHID DEFINER

Dependencies

DBMS_REGISTRY

DBMS_REGISTRY_SYS

DUAL

Documented No

First Available 12.1

Pragma PRAGMA SUPPLEMENTAL_LOG_DATA(default, NONE);

Security Model Owned by SYS with no privileges granted

Source {ORACLE_HOME}/rdbms/admin/dbmscrs.sql

Subprograms

IS_DB_CONSOLIDATED	IS_DB_PDB_SEED	IS_DB_ROOT
IS_DB_PDB

IS_DB_CONSOLIDATED

Returns TRUE if a database is a container DB dbms_registry_simple.is_db_consolidated RETURN BOOLEAN;

BEGIN

        IF dbms_registry_simple.is_db_consolidated THEN

          dbms_output.put_line('This is a Consolidated DB');

        ELSE

          dbms_output.put_line('Not a Consolidated DB');

        END IF;

      END;

      /

IS_DB_PDB

Returns TRUE if the current session is connected to a PDB dbms_registry_simple.is_db_pdb RETURN BOOLEAN;

conn / as sysdba

      

      BEGIN

        IF dbms_registry_simple.is_db_pdb THEN

          dbms_output.put_line('This is a PDB');

        ELSE

          dbms_output.put_line('Not a PDB');

        END IF;

      END;

      /

      

      ALTER SESSION SET CONTAINER = pdbdev;

      

      BEGIN

        IF dbms_registry_simple.is_db_pdb THEN

          dbms_output.put_line('This is a PDB');

        ELSE

          dbms_output.put_line('Not a PDB');

        END IF;

      END;

      /

IS_DB_PDB_SEED

Returns TRUE if the current session is connected to the SEED PDB dbms_registry_simple.is_db_pdb_seed RETURN BOOLEAN;

conn / as sysdba

      

      BEGIN

        IF dbms_registry_simple.is_db_pdb_seed THEN

          dbms_output.put_line('This is PDB$SEED');

        ELSE

          dbms_output.put_line('Not PDB$SEED');

        END IF;

      END;

      /

      

      ALTER SESSION SET CONTAINER = pdb$seed;

      

      BEGIN

        IF dbms_registry_simple.is_db_pdb_seed THEN

          dbms_output.put_line('This is PDB$SEED');

        ELSE

          dbms_output.put_line('Not PDB$SEED');

        END IF;

      END;

      /

IS_DB_ROOT

Returns TRUE if the current session is connected to the ROOT CONTAINER dbms_registry_simple.is_db_root RETURN BOOLEAN;

conn sys@pdbdev as sysdba

      

      BEGIN

        IF dbms_registry_simple.is_db_root THEN

          dbms_output.put_line('This is CDB$ROOT);

        ELSE

          dbms_output.put_line('Not CDB$ROOT');

        END IF;

      END;

      /

      

      ALTER SESSION SET CONTAINER = pdbdev;

      

      BEGIN

        IF dbms_registry_simple.is_db_root THEN

          dbms_output.put_line('This is CDB$ROOT);

        ELSE

          dbms_output.put_line('Not CDB$ROOT');

        END IF;

      END;

      /