相关疑难解决方法(0)

我有以下架构

DROP TABLE ALUMNO_ASIGNATURA;
DROP TABLE ASIGNATURA;
DROP TABLE TITULACION;
DROP TABLE PROFESOR;
DROP TABLE ALUMNO;
DROP TABLE PERSONA;


CREATE TABLE PERSONA
(   DNI             VARCHAR2(9)     CONSTRAINT PERSONA_PK                       PRIMARY KEY, 
    NOMBRE          VARCHAR2(20)    CONSTRAINT PERSONA_NOMBRE_NN                NOT NULL, 
    APELLIDO        VARCHAR2(30)    CONSTRAINT PERSONA_APELLIDO_NN              NOT NULL, 
    CIUDAD          VARCHAR2(20), 
    DIRECCIONCALLE  VARCHAR2(30), 
    DIRECCIONNUM    VARCHAR2(3), 
    TELEFONO        VARCHAR2(9), 
    FECHANACIMIENTO DATE, 
    VARON           VARCHAR2(1)     CONSTRAINT PERSONA_VARON_NN                 NOT NULL 
                                    CONSTRAINT PERSONA_VARON_CK                 CHECK (VARON BETWEEN 0 AND 1)
);

COMMENT ON COLUMN persona.varon IS '0 para mujer, 1 para hombre'; 

CREATE TABLE PROFESOR …

我的任务是实现几个触发器脚本，并且我从同事那里得到了可供参考的示例。在这些中，他们使用 pl-sql 条件进行更新/插入/删除，以及巨大的插入语句（在另一个表中）。这些插入语句除了值是否以新前缀或旧前缀之外没有任何变化。我想我会很聪明，并尝试使用以下内容使我的变得更紧凑：

DECLARE
  vRow SATURN.SPRCMNT%ROWTYPE;

BEGIN

  IF UPDATING THEN
    vRow := :NEW;
  ELSIF INSERTING THEN
    vRow := :NEW;
  ELSIF DELETING THEN
    vRow := :OLD;
  END IF;

  -- Not the real insert statement
  INSERT INTO blah 
    (columns)
    VALUES
    (vRow.somecolumns);

END;

我从编译系统得到以下信息：

10/13  PLS-00049: bad bind variable 'NEW'
13/13  PLS-00049: bad bind variable 'NEW'
16/13  PLS-00049: bad bind variable 'OLD'

显然它不喜欢这样。有什么可以实现我正在尝试的吗？:new 和 :old 不是真正的行类型吗？将本质上相同的代码重复 3 次似乎很愚蠢，但我想不出更好的方法。天哪，我想我读到触发器的大小也有一些硬性限制。任何帮助表示赞赏。

[编辑] 只是一个想法，是否可以在 DECODE() 中以某种方式引用 UPDATING/INSERTING 关键字？

例如，如果我可以执行 DECODE(SOMETHINGVAR, UPDATING, :NEW.column, DELETING, :OLD.column)，那么我可以使用单个语句设置 vRow 中每列的值。

我想最好先检查“删除”，然后使用其他两个的默认值。 …