触发器中怎样实现插入数据后再删除这条数据

Question

往A表里面插入数据，先判断这条数据的IS_TEST字段，如果是0就插入B表中，然后在A表中将这条数据删除。如果是1就不插入B表，也就是不做任何操作。这是写的插入数据的触发器，怎么在里面添加语句实现删除操作。
create or replace trigger TRG_DXP_MATERIEL_APPLY_INSERT
after insert on DXP_MATERIEL_APPLY
for each row
DECLARE
BEGIN
     if  :NEW.IS_TEST=0 then
   INSERT INTO ods_epbi.DXP_MATERIEL_APPLY(
          TAB_YEAR,
          TAB_MONTH,
          TAB_DAY,
          APPLY_ID,
          APPLY_TYPE,
          UNIT_CODE,
          UNIT_NAME,
          IS_TEST,
          DXP_MATERIEL_APPLY_ID,
          DEPT_CODE) VALUES(
          :NEW.TAB_YEAR,
          :NEW.TAB_MONTH,
          :NEW.TAB_DAY,
          :NEW.APPLY_ID,
          :NEW.APPLY_TYPE,
          :NEW.UNIT_CODE,
          :NEW.UNIT_NAME,
          :NEW.IS_TEST,
          :NEW.DXP_MATERIEL_APPLY_ID,
          :NEW.DEPT_CODE);
   end if;
end;谢谢各位了!!!!!!

Answer 1

create or replace trigger TRG_DXP_MATERIEL_APPLY_INSERT
after insert on DXP_MATERIEL_APPLY
for each row
DECLARE
BEGIN
  if (:NEW.IS_TEST=0) then
  INSERT INTO ods_epbi.DXP_MATERIEL_APPLY(
  TAB_YEAR,
  TAB_MONTH,
  TAB_DAY,
  APPLY_ID,
  APPLY_TYPE,
  UNIT_CODE,
  UNIT_NAME,
  IS_TEST,
  DXP_MATERIEL_APPLY_ID,
  DEPT_CODE) VALUES(
  :NEW.TAB_YEAR,
  :NEW.TAB_MONTH,
  :NEW.TAB_DAY,
  :NEW.APPLY_ID,
  :NEW.APPLY_TYPE,
  :NEW.UNIT_CODE,
  :NEW.UNIT_NAME,
  :NEW.IS_TEST,
  :NEW.DXP_MATERIEL_APPLY_ID,
  :NEW.DEPT_CODE);
  --从a表中删除数据
  delete from DXP_MATERIEL_APPLY where IS_TEST = :NEW.IS_TEST;--删除数据
  end if;
end;

Answer 2

往A表里面插入数据，先判断这条数据的IS_TEST字段，如果是0就插入B表中，然后在A表中将这条数据删除楼猪的这句话是否能理解为如果IS_TEST=0，就把这条数据转存到B表，A表则放弃插入？
如果是，则可以这么做：create or replace trigger TRG_DXP_MATERIEL_APPLY_INSERT
after insert on DXP_MATERIEL_APPLY
for each row
DECLARE
BEGIN
  if :NEW.IS_TEST=0 then
  INSERT INTO ods_epbi.DXP_MATERIEL_APPLY(
  TAB_YEAR,
  TAB_MONTH,
  TAB_DAY,
  APPLY_ID,
  APPLY_TYPE,
  UNIT_CODE,
  UNIT_NAME,
  IS_TEST,
  DXP_MATERIEL_APPLY_ID,
  DEPT_CODE) VALUES(
  :NEW.TAB_YEAR,
  :NEW.TAB_MONTH,
  :NEW.TAB_DAY,
  :NEW.APPLY_ID,
  :NEW.APPLY_TYPE,
  :NEW.UNIT_CODE,
  :NEW.UNIT_NAME,
  :NEW.IS_TEST,
  :NEW.DXP_MATERIEL_APPLY_ID,
  :NEW.DEPT_CODE);
  RAISE_APPLICATION_ERROR(-20600,'IS_TEST=0时不能插入');
  end if;end;

Answer 3

有点错，改一下
create or replace trigger TRG_DXP_MATERIEL_APPLY_INSERT
before insert on DXP_MATERIEL_APPLY
for each row
DECLARE
BEGIN
  if :NEW.IS_TEST=0 then
  INSERT INTO ods_epbi.DXP_MATERIEL_APPLY(
  TAB_YEAR,
  TAB_MONTH,
  TAB_DAY,
  APPLY_ID,
  APPLY_TYPE,
  UNIT_CODE,
  UNIT_NAME,
  IS_TEST,
  DXP_MATERIEL_APPLY_ID,
  DEPT_CODE) VALUES(
  :NEW.TAB_YEAR,
  :NEW.TAB_MONTH,
  :NEW.TAB_DAY,
  :NEW.APPLY_ID,
  :NEW.APPLY_TYPE,
  :NEW.UNIT_CODE,
  :NEW.UNIT_NAME,
  :NEW.IS_TEST,
  :NEW.DXP_MATERIEL_APPLY_ID,
  :NEW.DEPT_CODE);
  RAISE_APPLICATION_ERROR(-20600,'IS_TEST=0时不能插入');
  end if;end;

Answer 4

好像是不行，根据上面的修改后，插入一条IS_TEST=0的数据后，报ORA--20600,'IS_TEST=0时不能插入

Answer 5

这样写是IS_TEST=0的数据是插不到A表了，但是数据也插不到B表去了。。

Answer 6

还是用存储过程来处理这种逻辑关系吧，trigger存在逻辑问题，没法实现。

Answer 7

有2个办法：1。修改你的程序，在程序中直接判断IS_TEST是否等于0，如果等于0就直接插入B表；
           2。在表B上也建立一个触发器，一旦表B收到一条IS_TEST=0的数据，就去A表把这条数据删掉；
推荐方法1，方法2不太好

Answer 8

把insert代码放在procedure中，使用自治事务
create or replace procdure test
  pragma autonomous_transaction;
begin
  insert...  commit;
end;
这样的话，IS_TEST=0的数据插不到A表（报错），但是数据可以插到B表