CREATE OR REPLACE TRIGGER
trigger_name
after
alter table ********
ON schema
[WHEN condition]
PL/SQL_block | CALL procedure_name;

可以用DDL触发器实现，思路如下：

--创建DDL触发器
CREATE OR REPLACE TRIGGER SYS.TRG_DDL_LOGS
AFTER DDL ON DATABASE
DECLARE
  sql_text ora_name_list_t;
  n PLS_INTEGER;
  v_stmt VARCHAR2(2000);
BEGIN
--获取DDL语句
  n := ora_sql_txt(sql_text);
  FOR i IN 1..n LOOP
    v_stmt := v_stmt || sql_text(i);
  END LOOP;
--将DDL语句插入到记录DDL操作的表，这个表自己预先创建
  INSERT INTO event_table VALUES ('text of
    triggering statement: ' || v_stmt);
EXCEPTION
          WHEN OTHERS THEN
          NULL;
END TRG_DDL_LOGS;

复制

这里的DDL可以换成具体的DDL事件，也可以使用DDL，这样让所有DDL事件生效。
另外这里可以再结合触发器的Event Attribute Functions和sys_context获取额外的DDL会话信息。