Question

我有一张这样的表

KD_C KD_PLA KD_T     GABUNG   BERAKHIR    GAJI_PL     BUYOUT
---- ------ ---- ---------- ---------- ---------- ----------
C001 MA001  T006       2003       2014      50000    5200000
C002 SC001  T006       2012       2016      65000   20280000
C003 TW001  T006       2005       2018      90000   46800000
C004 TV001  T006       2008       2017      60000   24960000
C005 PC001  T001       2003       2016      80000   24960000
C006 AC001  T001       1996       2014      90000    9360000
C007 DB001  T001       2010       2016      65000   20280000
C008 EH001  T001       2011       2018      85000   44200000
C009 JC001  T002       1996       2014      60000    6240000
C010 SG001  T002       1998       2016      87000   27144000
C011 LS001  T002       2010       2018      81000   42120000
C012 PR001  T002       2004       2016      60000   18720000
C013 JH001  T003       2005       2018      72000   37440000
C014 GC001  T003       2003       2015      65000   13520000
C015 ED001  T003       2010       2018     100000   52000000
C016 GB001  T003       2010       2016      80000   24960000
C017 DG001  T004       2011       2018      73000   37960000
C018 RG001  T004       1992       2014      90000    9360000
C019 PJ001  T004       2011       2018      80000   41600000
C020 RP001  T004       2012       2017      92000   38272000
C021 GB002  T005       2006       2018     102000   53040000
C022 EA001  T005       2011       2015      70000   14560000
C023 HL001  T005       2012       2018      65000   33800000
C024 KW001  T005       2009       2017      67000   27872000
C025 MA001  T005       2017       2022      50000   26000000
C028 MA001  T001       2016       2018      15000    3120000
C029 MA001  T001       2016       2018      15000    3120000
C030 MA001  T001       2016       2018      15000    3120000

然后我尝试制作一个Trigger进行更新，而不是在复制主键时插入到表中。主键是第一个颜色＆＃39; KD_CONTRACT＆＃39;。

CREATE OR REPLACE TRIGGER INSERT_TABEL_CONTRACT
BEFORE INSERT ON CONTRACT
FOR EACH ROW
DECLARE
    KODE VARCHAR2(20);
    TEMPCARIKODE NUMBER;
BEGIN
    SELECT LPAD(TO_NUMBER(NVL(SUBSTR(MAX(KD_CONTRACT),2),0))+1,3,'0') INTO KODE
    FROM CONTRACT;

    SELECT COUNT(KD_CONTRACT) INTO TEMPCARIKODE
    FROM CONTRACT
    WHERE KD_CONTRACT = :NEW.KD_CONTRACT;

    IF(TEMPCARIKODE = 0) THEN       
        :NEW.KD_CONTRACT := 'C'||KODE;
        :NEW.GABUNG := TO_NUMBER(TO_CHAR(SYSDATE,'YYYY'));
        :NEW.BERAKHIR := :NEW.GABUNG + :NEW.BERAKHIR;
        :NEW.BUYOUT := (:NEW.GAJI_PL * 52) * (:NEW.Berakhir-:NEW.Gabung) * 2;
    END IF; 
EXCEPTION
    WHEN DUP_VAL_ON_INDEX THEN
        DBMS_OUTPUT.PUT_LINE('');
        DBMS_OUTPUT.PUT_LINE('');
        DBMS_OUTPUT.PUT_LINE('ERROR at Line 1:');
        DBMS_OUTPUT.PUT_LINE('ORA-20003: Data sudah ada, data akan diupdate!');
END;
/
show err;

无论如何，代码可能显示我在主键重复时尝试不更新。但请先直到结束。

它显示没有错误...因此触发器成功创建。然后我尝试插入一个重复的主键。 INSERT INTO CONTRACT VALUES('C001','MA001','T001',2013,2,15000,2500000);

结果

INSERT INTO CONTRACT VALUES('C001','MA001','T001',2013,2,15000,2500000)
*
ERROR at line 1:
ORA-00001: unique constraint (TUGAS.PK_CONTRACT) violated

它确实引发了ORA-00001但它从未触及DUP_VAL_ON_INDEX并且没有显示任何内容或自定义消息。有人有想法？当它从未触及DUP_VAL_ON_INDEX时，我怎么能在什么情况下粘贴更新查询... 谢谢... *无论如何，我的神谕是XE或快递版。

Answer 1

由于您的触发器不包含任何EXCEPTION或INSERT语句，因此永远不会执行触发器中的UPDATE阻止。您必须考虑INSTEAD OF触发器。

如何创建可以在Oracle PL / SQL上捕获DUP_VAL_ON_INDEX的触发器之前或之后

1 个答案: