获取oracle当前系统设置了哪些事件

ALTER SESSION SET EVENTS '10046 trace name context forever,level 12'

会话已更改。
SET serveroutput on size 1000000
 DECLARE
      EVENT_LEVEL NUMBER;
  BEGIN
      FOR I IN 10000 .. 10999 LOOP
          SYS.DBMS_SYSTEM.READ_EV(I, EVENT_LEVEL);
          IF (EVENT_LEVEL > 0) THEN
              DBMS_OUTPUT.PUT_LINE('Event ' || TO_CHAR(I) ||' set at level '|| TO_CHAR(EVENT_LEVEL));
          END IF;
      END LOOP;
  END;
/
Event 10046 set at level 12

PL/SQL 过程已成功完成。

ALTER SESSION SET EVENTS '10046 trace name context off';

会话已更改。

 --查看某个事件的等级
 DECLARE
     LEV INTEGER;
 BEGIN
     DBMS_SYSTEM.READ_EV(10046, LEV);
     DBMS_OUTPUT.PUT_LINE(LEV);
 END;

--查看环境变量
DECLARE
    STR VARCHAR2(100);
BEGIN
    DBMS_SYSTEM.GET_ENV('ORACLE_HOME', STR);
    DBMS_OUTPUT.PUT_LINE(STR);
END;