小议Oracle外键约束修改行为(五)

Oracle的外键用来限制子表中参考的字段的值，必须在主表中存在。而且在主表的记录发生变化导致外键参考唯一约束值发生了变化时，定义了一系列的动作。

前面几篇文章介绍了Oracle所支持的3种约束行为NO ACTION、DELETE SET NULL和DELETE CASCADE.至于SQL标准中定义的其他操作，Oracle只能通过触发器来实现，这里给出一个简单的UPDATE SET NULL操作的例子。

SQL> DROP TABLE T_C;

表已删除。

SQL> DROP TABLE T_P;

表已删除。

SQL> CREATE TABLE T_P (ID NUMBER, NAME VARCHAR2(30));

表已创建。

SQL> ALTER TABLE T_P ADD PRIMARY KEY (ID);

表已更改。

SQL> CREATE TABLE T_C (ID NUMBER, FID NUMBER, NAME VARCHAR2(30));

表已创建。

SQL> ALTER TABLE T_C ADD CONSTRAINT FK_T_C

2 FOREIGN KEY (FID)

3 REFERENCES T_P (ID);

表已更改。

SQL> INSERT INTO T_P VALUES (1, 'A');

已创建 1 行。

SQL> INSERT INTO T_P VALUES (2, 'B');

已创建 1 行。

SQL> INSERT INTO T_C VALUES (1, 1, 'A');

已创建 1 行。

SQL> COMMIT;

提交完成。

检查一下直接更新操作：

SQL> SELECT * FROM T_P;

ID NAME

---------- ------------------------------

1 A

2 B

SQL> SELECT * FROM T_C;

ID FID NAME

---------- ---------- ------------------------------

1 1 A

SQL> UPDATE T_P SET ID = 3 WHERE ID = 1;

UPDATE T_P SET ID = 3 WHERE ID = 1

*第 1 行出现错误:

ORA-02292: 违反完整约束条件 (YANGTK.FK_T_C) - 已找到子记录日志

下面构造一个触发器：

SQL> CREATE OR REPLACE TRIGGER T_P_UPDATE_SET_NULL

2 BEFORE UPDATE ON T_P

3 FOR EACH ROW

4 DECLARE

5 V_STR VARCHAR2(32767);

6 BEGIN

7 IF NVL(:NEW.ID, -1) != NVL(:OLD.ID, -1) THEN

8 FOR I IN (SELECT OWNER, TABLE_NAME, CONSTRAINT_NAME

9 FROM ALL_CONSTRAINTS

10 WHERE CONSTRAINT_TYPE = 'R'

11 AND R_OWNER = 'YANGTK'

12 AND R_CONSTRAINT_NAME IN

13 (SELECT CONSTRAINT_NAME FROM USER_CONSTRAINTS WHERE TABLE_NAME = 'T_P'))

14 LOOP

15 V_STR := 'UPDATE ' || I.TABLE_NAME || ' SET ';

16 FOR J IN (SELECT COLUMN_NAME FROM ALL_CONS_COLUMNS

17 WHERE OWNER = I.OWNER

18 AND TABLE_NAME = I.TABLE_NAME

19 AND CONSTRAINT_NAME = I.CONSTRAINT_NAME)

20 LOOP

21 V_STR := V_STR || J.COLUMN_NAME || ' = NULL '

22 || 'WHERE ' || J.COLUMN_NAME || ' = ' || :OLD.ID;

23 END LOOP;

24 EXECUTE IMMEDIATE V_STR;

25 END LOOP;

26 END IF;

27 END;

28 /

触发器已创建

SQL> SELECT * FROM T_P;

ID NAME

---------- ------------------------------

1 A

2 B

SQL> SELECT * FROM T_C;

ID FID NAME

---------- ---------- ------------------------------

1 1 A

SQL> UPDATE T_P SET ID = 3 WHERE ID = 1;

已更新 1 行。

SQL> SELECT * FROM T_P;

ID NAME

---------- ------------------------------

3 A

2 B

SQL> SELECT * FROM T_C;

ID FID NAME

---------- ---------- ------------------------------

1 A

UPDATE SET NULL操作其实和UPDATE CASCADE很相似，不同之处无非是一个置为NULL，另一个置为主键的新值相关阅读:

Jquery快速构建可拖曳的购物车-DragDrop

pjblog中清空引用的小程序

各类Unix和Linux密码丢失解决方法

Meta标签详解

Java 区分文本中的中英文字符函数

如何确定有多少人登陆数据库？

浮动广告js类实现

JS 字符串连接[性能比较]

SQL Server 2008服务器合并功能介绍

初探 PHP5 (一)

coolcode转SyntaxHighlighter与Mysql正则表达式实现分析

Oracle用户被锁原因及办法

可移动层的实现示例

教您用Linux系统做网吧的双线接入服务器