| General Information |
| Source |
{ORACLE_HOME}/rdbms/admin/prvthddl.plb |
| Dependencies |
| DBA_SYS_PRIVS |
DBMS_SYS_SQL |
USER$ |
| DBMS_DDL |
DBMS_TRIGGER_LIB |
V$PARAMETER |
| DBMS_SQL |
DBMS_UTILITY |
_CURRENT_EDITION_OBJ |
| DBMS_SYS_ERROR |
TRIGGER$ |
|
|
| Security Model |
No privileges granted by SYS |
| Subprograms |
|
| |
| CHECK_TRIGGER_FIRING_PROPERTY |
| Undocumented |
dbms_ddl_internal.check_trigger_firing_property(
trig_owner IN VARCHAR2,
trig_name IN VARCHAR2,
canon_owner OUT VARCHAR2,
canon_oname OUT VARCHAR2,
p_property IN OUT NUMBER,
unsupported_trig OUT BOOLEAN); |
conn uwclass/uwclass
CREATE OR REPLACE TRIGGER t_trig
BEFORE UPDATE
ON airplanes
BEGIN
NULL;
END t_trig;
/ |
conn / as sysdba
set serveroutput on
DECLARE
co VARCHAR2(30);
cn VARCHAR2(30);
pp NUMBER(10) := 0;
ut BOOLEAN;
BEGIN
dbms_ddl_internal.check_trigger_firing_property('UWCLASS',
'T_TRIG', co, cn, pp, ut);
dbms_output.put_line(co);
dbms_output.put_line(cn);
dbms_output.put_line(TO_CHAR(pp));
IF ut THEN
dbms_output.put_line('TRUE');
ELSE
dbms_output.put_line('FALSE');
END IF;
END;
/ |
|
| |
COMPAT_OK (11.2.0.1)  |
| Undocumented |
dbms_ddl_internal.compat_ok(rcompat IN NUMBER) RETURN BOOLEAN; |
set serveroutput on
BEGIN
IF dbms_ddl_internal.compat_ok(11) THEN
dbms_output.put_line('TRUE');
ELSE
dbms_output.put_line('FALSE');
END IF;
IF dbms_ddl_internal.compat_ok(12) THEN
dbms_output.put_line('TRUE');
ELSE
dbms_output.put_line('FALSE');
END IF;
END;
/ |
| |
| GEN_NEW_OBJECT_ID |
| Used to generate object identifiers |
dbms_ddl_internal.gen_new_object_id RETURN BINARY_INTEGER; |
SELECT dbms_ddl_internal.gen_new_object_id
FROM dual; |
| |
| HAS_ALTER_ANY_TRIGGER_PRIV |
| Returns true of the schema owner has the name privilege |
dbms_ddl_internal.has_alter_any_trigger_priv(
p_user IN VARCHAR2,
p_trig_property IN NUMBER)
RETURN BOOLEAN |
conn / as sysdba
set serveroutput on
BEGIN
IF dbms_ddl_internal.has_alter_any_trigger_priv('UWCLASS', 1) THEN
dbms_output.put_line('Granted');
ELSE
dbms_output.put_line('Not Granted');
END IF;
END;
/ |
GRANT alter any trigger TO uwclass;
BEGIN
IF dbms_ddl_internal.has_alter_any_trigger_priv('UWCLASS', 1) THEN
dbms_output.put_line('Granted');
ELSE
dbms_output.put_line('Not Granted');
END IF;
END;
/ |
|
| |
| HAS_EXP_IMP_PRIV |
| Returns true if the schema owner has export and/or import full database privileges |
dbms_ddl_internal.has_exp_imp_priv(
p_uid IN NUMBER,
p_privs_to_check IN VARCHAR2)
RETURN BOOLEAN; |
-- the following does not work ... and no working combination has been
-- discovered. Solutions will be gratefully accepted.
conn / as sysdba
SELECT user_id
FROM dba_users
WHERE username = 'UWCLASS';
set serveroutput on
BEGIN
IF dbms_ddl_internal.has_exp_imp_priv(82,'EXPORT FULL DATABASE') THEN
dbms_output.put_line('Granted');
ELSE
dbms_output.put_line('Not Granted');
END IF;
END;
/ |
| |
| IS_DDL_TRIGGER |
| Returns true of the trigger is a DDL Event Trigger |
dbms_ddl_internal.is_ddl_trigger(sys_evts IN NUMBER) RETURN BOOLEAN; |
conn / as sysdba
desc trigger$
SELECT sys_evts, type#, COUNT(*)
FROM trigger$
GROUP BY sys_evts, type#
ORDER BY 1;
-- from sql.bsq
type# number not null, /* trigger type: */
/* 0 = BEFORE TABLE, 1 = BEFORE ROW, 2 = AFTER TABLE, 3 = AFTER ROW */
/* 4 = INSTEAD OF TRIGGER */
-- also see dba_triggers in catprc.sql
set serveroutput on
BEGIN
IF dbms_ddl_internal.is_ddl_trigger(31) THEN
dbms_output.put_line('TRUE');
ELSE
dbms_output.put_line('FALSE');
END IF;
END;
/ |
BEGIN
IF dbms_ddl_internal.is_ddl_trigger(32) THEN
dbms_output.put_line('TRUE');
ELSE
dbms_output.put_line('FALSE');
END IF;
END;
/ |
|
| |
| SWAP_BOOTSTRAP |
| Undocumented. Used in the script utlmmig.sql |
dbms_ddl_internal.swap_bootstrap(replacement_tbl_name IN VARCHAR2); |
| TBD |
