oracle学习课件 计算机技术第10章.pptVIP

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 出错处理 例：DECLARE invalid_name EXCEPTION; PRAGMA EXCEPTION_INIT(invalid_name,-29000); BEGIN insert into student(sno) values(null); EXCEPTION when invalid_name then insert into exp_table(info) values(‘ORA-29000 occurred’); END; 出错处理 处理没有命名数据库错误还可使用内置函数SQLCODE()和SQLERRM()。 SQLCODE() 将返回当前数据库错误代码。 SQLERRM() 将返回文本化的错误信息。 例， WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE(‘主块OTHERS错误处理’)； err_code:=SQLCODE; DBMS_OUTPUT.PUT_LINE(‘错误代码是:’||TO_CHAR(ERR_CODE)); err_msg:=SUBSTR(SQLERRM,1,50); DBMS_OUTPUT.PUT_LINE(‘错误信息是:’||ERR_MSG); 出错处理 程序员定义的错误代码 使用系统提供的内置过程RAISE_APPLICATION_ERROR触发一个错误，并且给程序员定义的错误命名错误号，创建自己的错误消息。 语法： RAISE_APPLICATION_ERROR(错误号，错误信息)； 错误号必须在-20000— -20999之间 错误信息是与此错误相关的文本，不超过2048字节。 RAISE_APPLICATION_ERROR过程可以在PL/SQL块的执行部分或出错处理部分被调用。 练习 1.在PL/SQL中声明一个游标取出1993年前员工的名字，然后在屏幕上打印出来，用FOR循环。 2.编写一个函数用于计算两个数相除的结果，要求当被除数为0的时候，有异常处理部分。 * * * * * * * * * * * * * * * * * * * * * * * * * * * * DML触发器 例1：创建一个行触发器。 CREATE OR REPLACE TRIGGER emp_t1 BEFORE INSERT OR UPDATE OR DELETE ON emp FOR EACH ROW BEGIN INSERT INTO temp values(100,insert emp); END; DML触发器 例2：创建一个行触发器。对修改雇员工资的操作进行合法性检查：修改后的工资要大于修改前的工资；工资增量不能超过原工资的10%；目前没有单位的雇员（deptno）不能涨工资。 CREATE OR REPLACE TRIGGER emp_t1 BEFORE UPDATE OF sal ON emp FOR EACH ROW BEGIN IF :NEW.sal=:OLD.sal THEN RAISE_APPLICATION_ERROR(-20000,:OLD.eno||工资没有增长); ELSIF :NEW.sal:OLD.sal*1.1 THEN RAISE_APPLICATION_ERROR(-20000,:OLD.eno||工资增长超过10%); ELSIF :OLD.deptno IS NULL THEN RAISE_APPLICATION_ERROR(-20000,:OLD.eno||无单位，不能涨); END IF; END; DML触发器 例3：创建一个触发器，当任何时候某个部门从dept表中删除时，该触发器将从emp表中删除该部门的所有雇员。 CREATE OR REPLACE TRIGGER del_emp_deptno BEFORE DELETE ON dept FOR EACH ROW BEGIN DELETE FROM emp WHERE deptno=:OLD.deptno; END; DML触发器 行级触发器的标识符：