如何在Oracle触发器中捕获触发它的实际DML事务？

行级触发器（FOR EACH ROW）本身无法直接获取触发它的完整DML语句——因为单条DML可能影响多行，触发器是逐行执行的。以下是几种可行的解决方案，帮你定位问题根源：

方法1：利用Oracle审计功能直接获取原始SQL #

无需修改现有触发器，通过开启表审计就能拿到完整DML语句、执行用户、时间等信息：

1. 开启TABLE1的UPDATE审计：

   AUDIT UPDATE ON SYSADM.TABLE1 BY ACCESS;
   

2. 查询审计日志获取触发语句：

   SELECT SQL_TEXT, TIMESTAMP, USERNAME 
   FROM DBA_AUDIT_TRAIL 
   WHERE OBJECT_NAME = 'TABLE1' 
     AND ACTION_NAME = 'UPDATE'
   ORDER BY TIMESTAMP DESC;
   

• 优势：信息全面，无需改动业务代码；
• 注意：需要有审计权限，问题定位后记得关闭审计避免日志冗余：

  NOAUDIT UPDATE ON SYSADM.TABLE1;
  

方法2：通过会话视图关联获取当前DML语句 #

在触发器中利用会话ID关联系统视图，获取触发当前行的SQL语句：

CREATE OR REPLACE TRIGGER SYSADM.WOW_TRIGGER
AFTER UPDATE
ON SYSADM.TABLE1 REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
WHEN (NEW.COLUMN1 IS NULL AND NEW.COLUMN2 IS NOT NULL AND NEW.COLUMN IN ('A','B'))
DECLARE
  V_catch CLOB;
  v_session_id NUMBER;
BEGIN
  v_session_id := SYS_CONTEXT('USERENV', 'SESSIONID');
  -- 从V$SQL中获取当前会话的UPDATE语句
  SELECT SQL_FULLTEXT INTO V_catch
  FROM V$SQL s
  JOIN V$SESSION se ON s.SQL_ID = se.SQL_ID
  WHERE se.SID = v_session_id
    AND s.COMMAND_TYPE = 6; -- 6对应UPDATE操作
  
  -- 可将V_catch插入日志表留存
  INSERT INTO SYSADM.TRIGGER_DEBUG_LOG (LOG_CONTENT, LOG_TIME)
  VALUES (V_catch, SYSDATE);
EXCEPTION
  WHEN NO_DATA_FOUND THEN
    V_catch := '无法获取触发SQL语句';
END;

• 局限：如果会话在触发器执行前已执行其他SQL，可能拿到非目标语句；需要有查询V$SQL、V$SESSION的权限。

方法3：改进列值拼接，记录完整上下文 #

如果不想依赖系统视图或审计，可以优化你的拼接逻辑，记录新旧值对比、行唯一标识、执行上下文，让日志更具参考价值：

CREATE OR REPLACE TRIGGER SYSADM.WOW_TRIGGER
AFTER UPDATE
ON SYSADM.TABLE1 REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
WHEN (NEW.COLUMN1 IS NULL AND NEW.COLUMN2 IS NOT NULL AND NEW.COLUMN IN ('A','B'))
DECLARE
  V_catch CLOB;
BEGIN
  -- 先记录行唯一标识（比如主键COLUMN15555）
  V_catch := '触发行主键COLUMN15555: ' || :OLD.COLUMN15555 || CHR(10);
  -- 逐字段记录新旧值对比
  V_catch := V_catch || 'COLUMN1: 旧值[' || NVL(:OLD.COLUMN1, 'NULL') || '] → 新值[' || NVL(:NEW.COLUMN1, 'NULL') || ']' || CHR(10);
  V_catch := V_catch || 'COLUMN2: 旧值[' || NVL(:OLD.COLUMN2, 'NULL') || '] → 新值[' || NVL(:NEW.COLUMN2, 'NULL') || ']' || CHR(10);
  V_catch := V_catch || 'COLUMN: 旧值[' || NVL(:OLD.COLUMN, 'NULL') || '] → 新值[' || NVL(:NEW.COLUMN, 'NULL') || ']' || CHR(10);
  -- 记录执行上下文
  V_catch := V_catch || '执行时间: ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH24:MI:SS') || CHR(10);
  V_catch := V_catch || '执行用户: ' || USER;

  -- 插入日志表长期留存
  INSERT INTO SYSADM.TRIGGER_DEBUG_LOG (LOG_CONTENT, LOG_TIME)
  VALUES (V_catch, SYSDATE);
END;

• 优势：无需额外权限，能清晰看到单条记录的字段变化，结合时间、用户信息更容易定位问题。

内容的提问来源于stack exchange，提问作者mohammed biaol