2

晚安。我对 Oracle 中的 EXECUTE IMMEDIATE 有疑问。我查看其他主题，但没有任何答案有帮助。这是代码：首先，我需要在触发器内插入的表......

create global temporary table TEMP_PK (COL_NAME VARCHAR(100), COL_TYPE VARCHAR(100), ROW_VALUE VARCHAR(100)) on commit preserve rows;

现在，我的触发器

CREATE OR REPLACE TRIGGER ICidade AFTER
  INSERT ON Cidade FOR EACH ROW DECLARE TYPE EmpCurTyp IS REF CURSOR;
  emp_cv EmpCurTyp;
  col_name_aux VARCHAR(100);
  col_type_aux VARCHAR(100);
  stm          VARCHAR(4000):='';
  BEGIN
    -- Pegando as PKS
    FOR j IN
    (SELECT d.Column_Name coluna,
        d.DATA_TYPE tipo
      FROM user_cons_columns ucc,
        user_constraints uc,
        (SELECT COLUMN_NAME,DATA_TYPE FROM ALL_TAB_COLUMNS WHERE TABLE_NAME='CIDADE'
        ) d
      WHERE uc.constraint_name=ucc.constraint_name
      AND uc.constraint_type  ='P'
      AND uc.table_name       = 'CIDADE'
      AND d.COLUMN_NAME       =ucc.Column_Name
    )
    LOOP
      stm := concat
      (
        stm, 'INSERT INTO TEMP_PK VALUES ('
      )
      ;
      stm := concat(stm, j.coluna);
      stm := concat(stm,', ');
      stm := concat(stm, j.tipo);
      stm := concat(stm,', ');
      stm := concat(stm, ':NEW.');
      stm := concat(stm,j.coluna);
      stm := concat(stm,')');

      EXECUTE IMMEDIATE stm;
      stm:='';
    END LOOP;


  END ICidade;
  /

正在编译好。问题是当我在表“Cidade”中添加一个条目时，当我尝试插入时，例如：

Insert into Cidade Values (11,'Alegre','ES');

当我在没有立即执行的情况下运行时，使用打印功能，结果如下：

插入 TEMP_PK 值（CODCIDADE，数字，：NEW.CODCIDADE）；

使用 EXECUTE IMMEDIATE，会出现以下错误：

错误从命令中的第 62 行开始 - 插入 Cidade VALues (11,'Alegre','ES') 错误报告 - SQL 错误：ORA-00936：缺少表达式 ORA-06512：在“PAULA.ICIDADE”，第 34 行 ORA -04088: 执行触发器 'PAULA.ICIDADE' 00936 期间出错。00000 - “缺少表达式”

可能是一个白痴错误，但我找不到。

那么任何人都可以帮助我吗？从现在开始，谢谢。

4

2 回答 2

1

stm我建议您在执行之前使用 DBMS_OUTPUT.PUT_LINE 进行输出。这将使您更容易查看您正在运行的内容以及生成错误 SQL 的原因。

首先，您没有将任何东西绑定到:NEW

于 2014-06-03T02:13:54.773 回答
0

看起来您需要在插入到 COL_NAME 和 COL_TYPE 列中的字符串文字周围加上单引号。尝试将触发器重写为：

CREATE OR REPLACE TRIGGER ICidade AFTER
  INSERT ON Cidade FOR EACH ROW DECLARE TYPE EmpCurTyp IS REF CURSOR;
  emp_cv EmpCurTyp;
  col_name_aux VARCHAR(100);
  col_type_aux VARCHAR(100);
  stm          VARCHAR(4000):='';
  BEGIN
    -- Pegando as PKS
    FOR j IN
    (SELECT d.Column_Name coluna,
        d.DATA_TYPE tipo
      FROM user_cons_columns ucc,
        user_constraints uc,
        (SELECT COLUMN_NAME,DATA_TYPE FROM ALL_TAB_COLUMNS WHERE TABLE_NAME='CIDADE'
        ) d
      WHERE uc.constraint_name=ucc.constraint_name
      AND uc.constraint_type  ='P'
      AND uc.table_name       = 'CIDADE'
      AND d.COLUMN_NAME       =ucc.Column_Name
    )
    LOOP
      stm := 'INSERT INTO TEMP_PK (COL_NAME, COL_TYPE, ROW_VALUE) ' ||
             'VALUES (''' || j.coluna || ''', ' ||
                      '''' || j.tipo || ''', ' ||
                      ':NEW.' || j.coluna || ')';

      EXECUTE IMMEDIATE stm;
    END LOOP;
  END ICidade;

分享和享受。

于 2014-06-03T02:30:56.420 回答