4.1.10.txt

来自「清华大学出版社出版的数据库系统教程附带的实验教程中所有的源代码」· 文本 代码 · 共 26 行

CREATE PROCEDURE DELETECOURSEINFO
      @courseid char(10),
      @coursename varchar(30),
      @hour int,
      @returnString varchar(100) out
AS
BEGIN TRAN
     IF NOT  EXISTS( SELECT CID FROM COURSES WHERE CID=@COURSEID)
         BEGIN
              SELECT @returnString='课程信息不存在'
              GOTO ONERROR
        END
    --新增课程信息
    DELETE FROM  COURSES  WHERE cid= @courseid and cname=@coursename   
     IF  @@ERROR<>0 
            BEGIN
                 SELECT @returnString='删除课程信息失败'
                 GOTO ONERROR
            END 
 ---------错误处理
      SELECT @returnString='删除课程信息成功'
      COMMIT TRAN
ONERROR:
      ROLLBACK TRAN
GO