第9篇 PL SQL语言基础.ppt

9.7.3 创建程序包的实例 SQLCREATE OR REPLACE PACKAGE Body my_arithmetic AS /*my_add实现加法运算*/ FUNCTION my_add(x IN NUMBER,y IN NUMBER) RETURN NUMBER IS BEGIN RETURN x + y ; END my_add; /*my_subtract实现减法运算*/ FUNCTION my_subtract (x IN NUMBER,y IN NUMBER) RETURN NUMBER IS BEGIN RETURN x – y ; END my_subtract; 9.7.3 创建程序包的实例 /*my_multiply实现乘法运算*/ FUNCTION my_multiply (x IN NUMBER,y IN NUMBER) RETURN NUMBER IS BEGIN RETURN x * y ; END my_multiply; /*my_divide实现除法运算*/ FUNCTION my_divide (x IN NUMBER,y IN NUMBER) RETURN NUMBER IS BEGIN RETURN x / y ; END my_divide ; END; / 其中，包体部分是四个函数的实现代码。 9.7.3 创建程序包的实例 下面是对my_arithmetic包的使用。 SQLDECLARE x NUMBER; y NUMBER; BEGIN x:=10; y:=5; DBMS_OUTPUT.PUT_LINE( X= || x || ,Y= || y); DBMS_OUTPUT.PUT_LINE( X+Y= || my_arithmetic. my_add (x,y)); DBMS_OUTPUT.PUT_LINE( X-Y= || my_arithmetic. my_subtract (x,y)); DBMS_OUTPUT.PUT_LINE( X*Y= || my_arithmetic. my_multiply (x,y)); DBMS_OUTPUT.PUT_LINE( X/Y= || my_arithmetic. my_divide (x,y)); END; 9.7.3 创建程序包的实例 执行结果如下： X=10 ,Y=5 X+Y= 15 X-Y= 5 X*Y= 50 X/Y= 2 PL/SQL 过程已成功完成。 9.8 异常处理 PL/SQL程序运行期间经常会发生各种各样的异常，一旦发生异常，如果不进行处理，程序就会中止执行。如果在PL/SQL程序中定义了异常，当PL/SQL程序检测到一个异常时，程序转入相应异常处理部分进行处理。异常处理机制可以使程序变得更为健壮。 异常处理部分一般放在PL/SQL程序的后半部分，其基本结构如下： EXCEPTION WHEN 异常1 [ OR 异常2 ] THEN 语句组; …… WHEN 异常n-1 [OR 异常n ] THEN 语句组; WHEN OTHERS THEN 语句组; 其中， when others then子句指异常如果不在前面所列的异常处理之中，将进入OTHERS异常处理程序段。 9.8 异常处理 Oracle系统中的异常分为系统预定义异常和用户自定义异常。系统预定义异常就是系统为经常出现的一些异常定义了异常关键字，如被零除或内存溢出等。系统预定义异常无需声明，当系统预定义异常发生时，Oracle系统会自动触发，只需添加相应的异常处理即可。 用户自定义异常是用户在任何PL/SQL程序块、子程序或包中定义的异常，声明用户自定义异常需在PL/SQL程序块的声明部分中进行声明。 9.8.1 系统预定义异常 异 常 名 称 异 常 号 SQLCODE 说 明 ACCESS_INTO_NULL ORA-06530 -6530 访问没有初始化的对象 CASE_NOT_FOUND ORA-06592 -6592 没有适合Case结构的WHEN分支，或ELSE分支 COLLECTION_IS_NULL ORA-06531 -6531 访问没有初始化集合的方法 CURSOR_ALREADY_OPEN ORA-06511 -6511 打开一个已经打开的游标 DUP_VAL_ON_INDEX ORA-00001 -1 违反了表的惟一行约束条件 INVALID_CURSOR ORA-01001 -1001 无效游标 INVALID