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
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;
/