如何将DDL从一个模式映射到另一个模式？

Question

我需要保持存档表的结构与主表相同。每当我们在主表上执行一些DDL时，我也希望在归档表上执行相同的DDL。请建议我如何在Oracle DB中实现它。

考虑下面的场景，其中我有两个表A.T1_TAB和B.T1_TAB_ARCH。我在A.T1_TAB中添加了一个列(名称为A.T1_TAB(30))。我需要在B.T1_TAB_ARCH中添加相同的列。

--SCHEMA B:
CREATE TABLE T1_TAB_ARCH(ID NUMBER);
--SCHEMA A:
CREATE TABLE T1_TAB(ID NUMBER);

ALTER TABLE T1_TAB ADD NAME VARCHAR2(30);--Added column in A.T1_TAB

我们可以使用DDL触发器或任何其他方式来完成它吗？

此外，我希望只对存储在单独查找表中的一组表启用此功能。

谢谢K

Answer 1

我可以给你我的触发器写我的数据库上的每一个DDL。当我必须在迁移之前测试数据库性能时，我将使用此触发器。这有助于我保持第二个数据库的最新情况。我在这个表中有很多信息，我使用的最后一个数据库有50 of和200多个用户。

CREATE TABLE SESSION_DDLS
(
  SID           NUMBER,
  SERIAL        NUMBER,
  USERNAME      VARCHAR2(30 BYTE),
  OSUSER        VARCHAR2(30 BYTE),
  MACHINE       VARCHAR2(64 BYTE),
  IP_ADDR       VARCHAR2(30 BYTE),
  PROCESS       VARCHAR2(15 BYTE),
  PROGRAM       VARCHAR2(48 BYTE),
  MODULE        VARCHAR2(48 BYTE),
  LOGON_TIME    DATE,
  DATE_CREATED  DATE,
  OWNER         VARCHAR2(30 BYTE),
  OBJECT_NAME   VARCHAR2(128 BYTE),
  OBJECT_TYPE   VARCHAR2(18 BYTE),
  EVENT         VARCHAR2(16 BYTE),
  SQL_TEXT      VARCHAR2(4000 BYTE)
)

CREATE OR REPLACE TRIGGER session_ddls
    BEFORE DDL
    ON DATABASE
DECLARE
    v_sid      NUMBER;
    sql_text   ora_name_list_t;
    stmt       VARCHAR2 ( 1000 ) := '';
    n          BINARY_INTEGER := 0;
BEGIN
    SELECT DISTINCT sid
      INTO v_sid
      FROM sys.v_$mystat;

    n := NVL ( ora_sql_txt ( sql_text ), 0 );

    FOR i IN 1 .. n
    LOOP
        stmt := SUBSTR ( stmt || sql_text ( i ), 1, 1000 );
    END LOOP;

    IF LOWER ( stmt ) LIKE '%identified by%' THEN
        stmt := SUBSTR ( stmt, 1, 20 );
    END IF;

    INSERT INTO o2o.session_ddls
        SELECT vses.sid,
               vses.serial#,
               vses.username,
               vses.osuser,
               vses.machine,
               SYS_CONTEXT ( 'userenv', 'ip_address' ),
               vses.process,
               vses.program,
               vses.module,
               vses.logon_time,
               SYSDATE,
               sys.dictionary_obj_owner,
               sys.dictionary_obj_name,
               sys.dictionary_obj_type,
               sys.sysevent,
               stmt
          FROM sys.v_$session vses
         WHERE vses.sid = v_sid;
END;
/

我觉得这对你来说是个好的开始。首先，您必须在DICTIONARY_OBJ_TYPE之后进行筛选，因为您对表感兴趣，其次，您可以在DICTIONARY_OBJ_OWNER和DICTIONARY_OBJ_NAME上实现一些过滤器，最后，如果需要，您可以在ARCH表上执行来自SYSEVENT的语句，但不要忘记在DICTIONARY_OBJ_NAME上连接您的ARCH后缀。

如果我没说清楚，请告诉我。

祝好运!