触发器（七、DDL触发器在OGG维护中的应用）

场景描述

有一个业务系统，做了OGG备库用于统计查询。
生产库的维护由系统管理员负责，而备库的日常维护由专职DBA负责。
系统厂商在对生产环境进行升级时，经常会修改数据结构。
DBA很快发现了OGG报错，查看日志是数据结构变更，于是向生产库系统管理员要数据变更清单。
生产库管理员再向系统厂商要，有时候系统厂商没有事先准备脚本，升级时在线的部分修改没有记录，导致DBA不停的跟踪错误信息，两边比对数据结构，再到备库中进行修改，烦不胜烦。

之后，DBA在生产库中创建了DDL触发器，用于跟踪数据结构变更，用来解决这个烦恼。
DDL触发器能对数据库中的DDL操作进行触发，包括
实施步骤如下：

1.在生产环境的监控用户CZFX下创建DDL操作记录表

SQL> CREATE TABLE CZFX.T_DDL_OGG
  2  (GUID           VARCHAR2(50)   DEFAULT SYS_GUID() PRIMARY KEY
  3  ,CREATED        DATE           DEFAULT SYSDATE
  4  ,EVENT          VARCHAR2(30)
  5  ,LOGIN_USER     VARCHAR2(30)
  6  ,OBJ_NAME       VARCHAR2(30)
  7  ,OBJ_OWNER      VARCHAR2(30)
  8  ,OBJ_TYPE       VARCHAR2(30)
  9  ,COLUMN_NAME    VARCHAR2(30)
 10  ,DDL_SQL        VARCHAR2(4000)
 11  ,ISDEAL         VARCHAR2(1)   DEFAULT '0'
 12  ) TABLESPACE CZFX;
Table created
Executed in 0.031 seconds

2.用SYS用户创建DDL触发器

（注意：其他数据库用户也可以创建DDL触发器，但经测试只能捕捉到用户自己的DDL操作）

SQL> CREATE OR REPLACE TRIGGER TRI_DBDDL
  2  AFTER CREATE OR DROP OR ALTER ON DATABASE
  3  WHEN (ORA_DICT_OBJ_TYPE='TABLE')
  4  DECLARE
  5    V_GUID   VARCHAR2(50);
  6   T_SQL_TXT ORA_NAME_LIST_T:=ORA_NAME_LIST_T();
  7    N_COUNT    PLS_INTEGER;
  8   V_SQL_TXT  VARCHAR2(4000);
  9  BEGIN
 10    V_GUID:=SYS_GUID();
 11   N_COUNT:=ORA_SQL_TXT(sql_text => T_SQL_TXT);
 12   FOR I IN 1..N_COUNT LOOP
 13     V_SQL_TXT:=V_SQL_TXT||T_SQL_TXT(I)||CHR(10);
 14   END LOOP;
 15    INSERT INTO CZFX.T_DDL_OGG(GUID,CREATED,LOGIN_USER,EVENT,OBJ_NAME,OBJ_OWNER,OBJ_TYPE,DDL_SQL)
 16     VALUES(V_GUID,SYSDATE,ORA_LOGIN_USER,ORA_SYSEVENT,ORA_DICT