Oracle SQL,条件外键

时间:2015-04-14 14:28:37

标签: sql database oracle

我在实施数据库时遇到问题。我有2张桌子:

 CREATE TABLE TAB1
 (
    TAB1_ID INT NOT NULL PRIMARY KEY,
    TAB1_BOOL VARCHAR(4) NOT NULL CHECK (TAB1_BOOL IN('OPT1', 'OPT2'))
 );
 CREATE TABLE TAB2
 (
   TAB2_ID INT NOT NULL
 );

我想将TAB2_ID作为TAB1_ID的外键,但是TAB2_ID只能是这些TAB1_ID,表TAB1中的哪些行用TAB1_BOOL == OPT1标记​​。例如:

TAB1 contains 2 rows: 
1. 'TAB1_ID==1' 'TAB1_BOOL==OPT1', 
2. 'TAB1_ID==2' 'TAB1_BOOL==OPT2'.
Now, statement like:
INSERT INTO TAB2 (TAB2_ID) VALUES (2);
should be rejected because row with TAB1_ID==2 is marked with OPT2

是否可以在Oracle SQL中进行此操作?

1 个答案:

答案 0 :(得分:1)

这可以通过使用触发器来实现:

 CREATE TABLE TAB1 (
    TAB1_ID INT NOT NULL PRIMARY KEY,
    TAB1_BOOL VARCHAR(4) NOT NULL CHECK (TAB1_BOOL IN('OPT1', 'OPT2'))
 );

 CREATE TABLE TAB2 (
   TAB2_ID INT NOT NULL,
   FOREIGN KEY (TAB2_ID) REFERENCES TAB1 (TAB1_ID)
 );

CREATE OR REPLACE TRIGGER CHECK_TAB2_ID
    BEFORE UPDATE OR INSERT ON TAB2 FOR EACH ROW
DECLARE 
    CURSOR CHECK_CURSOR IS
        SELECT TAB1_BOOL
          FROM TAB1 
         WHERE TAB1_ID = :new.TAB2_id;
    V_TAB1_BOOL VARCHAR(4);
BEGIN
    OPEN CHECK_CURSOR;
    FETCH CHECK_CURSOR INTO V_TAB1_BOOL;
    IF (V_TAB1_BOOL <> 'OPT1') THEN
       CLOSE CHECK_CURSOR;
       raise_application_error(10000, 'Wrong value in TAB1');
    END IF;
    CLOSE CHECK_CURSOR;
END;

INSERT INTO TAB1 VALUES (1, 'OPT1');
INSERT INTO TAB1 VALUES (2, 'OPT2');

INSERT INTO TAB2 (TAB2_ID) VALUES (1);

上面的触发器仍有一个小错误。我目前无法访问Oracle数据库,所以我可以很难修复它。这是我的Fiddle

p.s。 :好的,小提琴中缺少; - here's更新。