Oracle PL/SQL学习笔记

学习oracle的笔记：
一个学习PL/SQL的实例：
应用：考察表emp中没一个员工的工资，如果工资高于4000，则征收工资20％的税；否则均征收200。将员工的员工号、姓名、税额、存在tax表中，同时，在该表中设一个message字段，对征税较高的进行特别说明。

SQL>declare 'declare是定义部分的开始.一个基本pl/sql块分declare（定义）、begin（可执行部分）、exeception（异常处理）三部分
record emp%rowtype; '定义一个名为record的变量，其类型同emp表的数据结构相同
v_tax number(4);
v_message char(100);
cusor emp_cursor is '定义一个名为emp_cursor的游标
select * from emp;
begin '开始可执行部分
open emp_cursor; '打开游标
<<repeat>> '插入一个标签，名称为repeat，可在goto语句中使用;尽量避免使用goto和标签实现跳转
fetch emp_cursor into record; '使用游标提取数据到record
declare
over_sal exception; '定义一个名为over_sal的用户自定义异常
begin
if record.sal>4000 then
raise over_sal; '如果该员工的工资高于4000，抛出over_sal异常
else
v_tax:=200;
end if;
v_message:='';
exception '开始异常处理部分
when over_sal then '截获到over_sal异常，进行如下处理
v_message:='His sal is too high!He should pay more tax!';
v_tax:=record.sal*0.2;
when others then '截获到非用户自定义异常，不进行处理
null;
end;
insert into tax(empno,ename,tax,message)
values(record.empno,record.ename,v_tax,v_message);
if emp_cursor%found then '如果游标fetch操作有结果返回，则跳转至repeat标签，循环操作。可在for循环中使用该游标，如下所示：
goto repeat; 'FOR 变量名 IN 游标名 LOOP ... END LOOP;
else '如果游标的fetch操作没有返回结果，则关闭游标
close emp_cursor; '游标属性：%ISOPEN,%FOUND,%NOTFOUND,%ROWCOUNT
end if; '游标属性只能在PL/SQL中使用，不能在sql命令中使用
end;
/