Question

数据库级联删除怎么实现

我建的数据库中包括Teacher，Class，TC三个表，其中Tno是Teacher的主键，且是TC表的外键如何实现下面的功能：1.删除Teacher表中的元组时，要判断TC表中是否存在 属性Tno值=所要删除元组的Tno值2.如果存在禁止删除操作并 PRINT '该教师不能删除！还有任教的班级。3.如果不存在则删除该元组并PRINT'该教师已被删除！'这个要如何用触发器实现
求解答啊，求详细代码

Answer 1

可以用下边的方法，仅供参考：
-- 创建测试主表. ID 是主键.
CREATE TABLE test_main (
id INT NOT NULL,
value VARCHAR(10),
PRIMARY KEY(id)
);

-- 创建测试子表.
CREATE TABLE test_sub (
id INT NOT NULL,
main_id INT ,
value VARCHAR(10),
PRIMARY KEY(id)
);

-- 插入测试主表数据.
INSERT INTO test_main(id, value) VALUES (1, 'ONE');
INSERT INTO test_main(id, value) VALUES (2, 'TWO');

-- 插入测试子表数据.
INSERT INTO test_sub(id, main_id, value) VALUES (1, 1, 'ONEONE');
INSERT INTO test_sub(id, main_id, value) VALUES (2, 2, 'TWOTWO');
然后，创建外键，使用 ON DELETE CASCADE 选项，删除主表的时候，同时删除子表
ALTER TABLE test_sub ADD CONSTRAINT main_id_cons FOREIGN KEY (main_id) REFERENCES test_main ON DELETE CASCADE;

执行删除：

DELETE FROM TEST_MAIN WHERE ID = 1;

最后：
SELECT * FROM TEST_MAIN;

结果子表中就只有ID=2的记录，也就说明级联删除成功。

Answer 2

删除包含主键值的行的操作，该值由其它表的现有行中的外键列引用。在级联删除中，还删除其外键值引用删除的主键值的所有行。

语法：
Foreign Key
(column[,...n])
references referenced_table_name[(ref_column[,...n])]
[on delete cascade]
[on update cascade]

注释：
column:列名
referenced_table_name:外键参考的主键表名称
ref_name:外键要参考的表的主键列
on delete:删除级联
on update:更新级联
SQL级联删除——删除主表同时删除从表——同时删除具有主外键关系的表
create table a
(
id varchar(20) primary key,
password varchar(20) not null
)
create table b
(
id int identity(1,1) primary key,
name varchar(50) not null,
userId varchar(20),
foreign key (userId) references a(id) on delete cascade
)
表B创建了外码userId 对应A的主码ID，声明了级联删除。

Answer 3

CREATE OR REPLACE PROCEDURE PRO_CHECKANDDELETETEACHER(PRM_TNO IN VARCHAR2) AS
  TCNUM      NUMBER(3);
  TEACHERNUM NUMBER(3);
BEGIN
  SELECT COUNT(*) INTO TCNUM FROM TC WHERE TNO = PRM_TNO;
  IF TCNUM > 0 THEN
    DBMS_OUTPUT.PUT_LINE('该教师不能删除,还有任教的班级!');
  ELSE
    DELETE TEACHER WHERE TNO = PRM_TNO;
    SELECT COUNT(*) INTO TEACHERNUM FROM TEACHER WHERE TNO = PRM_TNO;
    IF TEACHERNUM = 0 THEN
      DBMS_OUTPUT.PUT_LINE('该教师已被删除！');
    ELSE
      DBMS_OUTPUT.PUT_LINE('删除失败！');
    END IF;
    COMMIT;
  END IF;
EXCEPTION
  WHEN OTHERS THEN
    ROLLBACK;
END;

追问

有如下的错误信息报告：
消息 156，级别 15，状态 1，第 1 行关键字 'OR' 附近有语法错误。消息 156，级别 15，状态 1，第 11 行关键字 'THEN' 附近有语法错误。消息 156，级别 15，状态 1，第 33 行关键字 'IF' 附近有语法错误。消息 102，级别 15，状态 1，第 41 行';' 附近有语法错误。