03_PL_SQL

【例13．8】 IF．THEN—ELSE结构。 DECLARE e_sal emp．sal％TYPE； BEGIN SELECT sal INTO e_sal FROM emp WHERE empno：7 9 3 4； IF e_sal<2000 THEN UPDATE emp SET comm=cOlitm+sal‘1．2 WHERE ELSIF e_sal>：2000 AND e_sal<2500 THEN UPDATE emp SET comm：coilqm+sal‘1．1 WHERE ELSE DBMS_OUTPUT．PUT—LINE(· 不提高补助金· )； END IF： END： empno：7934； empno：7934；
(3)WHILE循环。 WHILE 条件表达式 LOOP 语句组 END LOOP; WHILE循环通过条件表达式来控制循环 的执行，如果条件表达式为真(TRUE),则 执行循环体内的语句；如果为假(FALSE)， 则结束循环。



求“1+2+…+100”的值来说明三种类型循环的应用。 【例13-101 简单循环。 DECLARE V—Count 工NT：=1： V—sum 工NT：=0； BEG工N L00P V—sum：=V—sum+V—count； V—count：=v—count+1； EXIT WHEN v count>100； __结束循环 END LOOP： DBMS_OUTPUT．PUT_LINE(。1+2+…+100： END： | 1+2+…+100=5050 PL／SQL过程已成功完成。

【例13．5】 输出7934雇员的姓名、岗位。 DECLARE ． ． my_name emp．ename％TYPE； 一声明％TYPE类型的变量 my_job emp．Joh％TYPE； BEG工N SELECT ename，Job INTO my_na~ne，my_job FROM emp WHERE empno=7934； DBMS—OuTPuT．PUT_LINE(my name l l ’l lmy_job)； END； } M工LLER CLERK 9988雇员。 BEGIN DELETE FROM emp WHERE empno=9988； COMMIT； END； / PL／SQL过程已成功完成。

5．％ROWTYPE类型 ％ROWTYPE可以得到数据表中整条记 录的数据类型。声明了％ROWTYPE类型 的变量可以完整地存放数据表中的整条 记录。

13.1.2 声明常量、变量
1．声明常量 语句格式：<常量名> CONSTANT<数据类型>：=<值> ONSTANT选项表示声明的是固定不变的值，即常量。常用的数据类型如CHAR、 NUMBER、DATE、BOOLEAN等。常量一旦定义，在以后的使用中其值将不再改变。 2．声明变量 语句格式：<变量名><数据类型>NOT NULL【DEFAULT|：=默认值】 NOT NULL表示该变量非空，必须指定默认值，否则执行块时将返回出错信息。 DEFAULT和“：=”作用等同，可互相替换。 变量是存储值的内存区域，在PL／SQL中用来处理程序中的值。像其他高级语言程 序一样，PL／SQL中的变量命名也要遵循一定约定，约定如下。 (1)变量名以字母开头，由字母、数字以及$、#或_组成，不区分大小写。 (2)变量名最大长度为30个字符。 (3)不能用系统保留字命名。 在PL／SQL中，每一行只能声明一个变量。

2。循环结构
‘ PL／SQL的循环结构有简单循环、FOR循环和WHILE循环 三种类型组成。 (1)简单循环。 语法： L00P 语句组 END LOOP; 这种循环结构是没有终止的，必须人为进行控制，一 般通过加入EXIT或EXIT子句来结束循环。
(2)FOR循环。 FOR 循环变量 IN[REVERSE] 起始值..终止值 LOOP 语句组 END LOOP； FOR循环的循环次数是固定的，如果使用了 REVERSE选项，那么循环变量将从终止值到起 始值降序取值。



(2)CASE语句。 CASE WHEN表达式1 THEN语句组1 WHEN表达式2 THEN语句组2 WHEN表达式N一1 THEN语句组N一1 [ELSE语句组N] END CASE； CASE语句的功能为顺序检查表达式，一旦从中找到 匹配的表达式值，就执行相应的 语句组并跳出CASE结构。ELSE子句是可选的。 以下通过实例来说明以上两种分支结构的应用。

1.基本结构 PL/SQL程序的基本单位是块，块分匿名 块、命名块两种。匿名块指未命名的块， 只能执行一次，不能存储在数据库中。 命名块指过程、函数、触发器和包等数 据库对象，它们存储在数据库中，可以 被多次调用执行。

匿名块的基本结构： [DECLARE] BEGIN [EXCEPTION] END;


【例13．3】 声明常量、变量。 nl CONSTANTINT:=100： C CHAR(4)； d DATE； n2 NUMBER(5)DEFAULT 100； name VARCHAR2(10)：=’TOM’； istrue BOOLEAN DEFAULT TRUE；
为了减少程序的修改，方便操作数据表数据， 还可以使用％TYPE和％RowTYPE两种类型来 声明变量，使变量的类型与表中的保持一致。 4．％TYPE类型 在PL／SQL中，使用％TYPE声明的变量类型与 数据库表中某字段的数据类型相同，如果表中 的字段类型发生变化，则相应变量的类型也自 动随之改变，用户就不必修改程序代码。



【例13-121 WHILE循环。 DECLARE v_count NUMBER：=1 j v_sum NUMBER：=0j BEG工N WHILE v_count<=100 LOOP V—sum：=V～sum+V—count； END LOOP； DBMS_OUTPUT．PUT_LINE(’1+2+…+100： END； } 1+2+…+100=5050 PL／SQL过程已成功完成。 v_sum)； v_sum)； v—sum)j

(3)PL/SQL块可以被命名和存储在Oracle 服务器中，同时也能被其他的PL/SQL程 序或SQL语句调用，任何客户、服务器工 具都能访问PL/SQL程序，具有很好的可 重用性。

(4) PL/SQL 是一种块结构语言，即构成 一个PL/SQL程序的基本单位是块。
13.1.1 PL/SQL块
【例13．9】 CASE语句。 DE，CLARE e_deptno emp。deptno％TYPE歹 d_dname dept．dname％TYPE； e_ename emp．ename％TYPE 7 BEG工N SELECT deptno l ename INTO e_deptno l e_ename FROM emp WHERE empno=7 9 3 4； SELECT dname INTO d_dname FROM dept WHERE deptno=e_deptno； CASE WHEN d dname=。ACCOUNTING-THEN d_dname：=-财务部-歹 WHEN d_dname=。RE SEARCH’THEN d_dname：=’开发部，歹 WHEN d_dname=。SALES-THEN amdname：=t销售部· 歹 WHEN amdname=’OPERATI ONS’THEN d_dname：=-项目部-歹 ELSE d_dname：=-没有这样的部门-； END CASE歹 DBMS_OUTPUT。PUT_L INE(d-dname)； END歹 } j 财务部 PL／SQL过程已成功完成。
13.1.3 PL/SQL 流程控制

1．分支结构 PL／SQL分支结构有IF—THEN．ELSE语句和CASE语句两种。 (1)IF—THEN—ELSE语句。 语法为： IF条件表达式1 THEN 语句组1 [ELSIF条件表达式2 THEN 语句组2] [ELSE 语句组] END IF； 其中，ELSIF和ELSE子句是可选的，可以根据需要包含任意多个ELSIF 子句，但ELSE 子句只能包含一个。

【例13-1】PL／SQL程序块。 DECLARE name VARCHAR2(10)：=‘wxh’； BEG工N DBMS_OUTPUT．PUT_L INE(name)； END; / 【例13· 2】PL／SQL程序块。 DECLARE name CHAR(10)j Sex CHAR(2)； BEGIN SELECT sname，SSex INTO name，sex FROM Stud WHERE sno=98001； __将检索的值存储到变量中 DBMS_OUTPUT．PUT_LINE(name)； END； SQL>SET SERVEROUTPUT ON
13．2游

标

上一节中介绍了使用SELECT．．INTO语句可处理表的 单行数据，本节学习使用游标处理多行查询数据。 Oracle把从数据表中查询出来的结果集存放在内存中， PL／sQL游标是指向该内存的指针，通过游标指针的移 动实现对内存数据的各种操作处理，最后将操作结果 写回到数据表中。 13．2．1处理游标 游标的处理包括4个步骤。 (1)声明游标。 (2)打开游标。 (3)将结果集中的数据提取(FETCH)到PL／SQL变量中。 (4)关闭游标。
说明 1. (1)DECLARE部分为声明部分，用来声明程序中用到的 变量、类型和游标等，如果不需要声明，则这部分可 以忽略。 (2)BEGIN部分是PL/SQL块的主程序体，一般使用SQL 语句和过程性语句来完成和处理特定的工作。 (3)EXCEPTION异常处理部分也是可选的，用来检查和 处理异常或错误。 (4)块中每一条语句都以分号结束。一条SQL语句可以 分多行来写，但最终以分号结束。 (5)在PL／SQL程序块中，注释单行使用“一”表示， 注释多行使用“／*……*／”形式。