Oralce-PL/SQL编程-游标

PL/SQL(Procedural Language/SQL)是Oracle在数据库中引入的一种过程化编程语言。

PL/SQL块结构

　　声明部分　　执行部分（必须的）　　异常处理部分

[declare]

　　--声明部分，可选

BEGIN

　　--执行部分，必须

[exception]

　　--异常处理部分，可选

END

　　单行注释：--

　　多行注释：/*　　*/

基本数据类型：　　

　　number　　varchar2　　char　　long　　nchar nvarchar2　　date　　boolean

特殊数据类型：

　　%type,声明一个与指定列名称相同的数据类型。

declare var_job emp.job%type;

　　record:记录类型数据

type emp_type is record

(

var_ename varchar2(20),

var_job varchar2(20),

var_sal number

);

　　%rowtype:结合了%type和record特性，可以根据数据表中的行结构定义一种特殊的数据类型，用来存储从数据表中检索到的一行数据

rowVar_emp emp%rowtype;定义能够存储emp表中一行数据的变量rowVar_emp

定义变量：var_countryname varchar2(50):=‘中国‘;

定义常量:con_day constant integer:=365;

PL/SQL游标

显示游标和隐式游标：

显示游标：例子

1.声明一个检索emp表中雇员信息的游标，然后打开游标，并指定检索职务是“MANAGER"的雇员信息，接着使用 fetch...into语句和while循环
读取游标中的所有雇员信息，最后输出读取的雇员信息

declare
cursor cur_emp(var_job in varchar2:=‘SALESMAN‘)
is select empno,ename,sal
from emp
where job=var_job;
type record_emp is record
(
var_empno emp.empno%type,
var_ename emp.ename%type,
var_sal emp.sal%type
);
emp_row record_emp;
begin
open cur_emp(‘MANAGER‘);
fetch cur_emp into emp_row; --读取游标中内容，将游标指针移动到结果集中的第一行
while cur_emp%found loop
dbms_output.put_line(emp_row.var_ename||‘的编号是‘||emp_row.var_empno||‘,工资是‘||emp_row.var_sal);
fetch cur_emp into emp_row;
end loop;
close cur_emp;
end;
/

游标属性：

　　%found:如果SQL语句至少影响到一行数据，则该属性为true，否则为false

　　%notfound:与上面的功能相反

　　%rowcount:返回受影响的行数

　　%isopen:游标打开时，返回true,关闭时，false

隐式游标

在执行一个SQL 语句时，Oracle会自动创建一个隐式游标。这个游标是内存中处理该语句的工作区域。

例子：

在SCOTT模式下，把emp表中销售员的工资上调20%，然后使用隐式游标sql的%rowcount属性输出上调
工资的员工数量

begin
update emp
set sal = sal*(1+0.2)
where job=‘SALESMAN‘;
if sql%notfound then
dbms_output.put_line(‘没有雇员调整工资‘);
else
dbms_output.put_line(‘有‘||sql%rowcount||‘个雇员工资上调20%‘);
end if;
end;
/

for语句循环游标：

例子：

使用隐式游标和for语句检索出职务是销售员的雇员信息并输出

begin
for emp_record in (select empno,ename,sal from emp where job=‘SALESMAN‘)
loop
dbms_output.put_line(‘雇员编号:‘||emp_record.empno);
dbms_output.put_line(‘; 雇员名称：‘||emp_record.ename);
dbms_output.put_line(‘; 雇员工资：‘||emp_record.sal);
end loop;
end;
/

使用显示游标和for语句检索出部门编号是30的雇员信息并输出

declare
cursor cur_emp is
select * from emp
where deptno=30;
begin
for emp_record in cur_emp
loop
dbms_output.put(‘雇员编号：‘||emp_record.empno);
dbms_output.put(‘雇员名称：‘||emp_record.ename);
dbms_output.put_line(‘雇员职务：‘||emp_record.job);
end loop;
end;
/

综上，在使用游标（隐式，显示）的for循环中，可以声明游标。但不用进行打开游标、读取游标、关闭游标等操作，这些由Oracle系统内部自动完成

 PL/SQL异常处理

在[exception]代码块中

根据异常产生的机制和原理，可将Oracle系统异常分为以下两大类：

1.预定义异常

　　定义在Oracle的核心PL/SQL库中，用户可以在自己的PL/SQL异常处理部分使用名称对其进行标识。对这种异常情况的处理，用户无须在程序中定义，它们由Oracle自动引发。

2.自定义异常

　　有两种

A-错误编码异常

定义错误编码异常编号为“-00001”的异常变量，然后想dept表中插入一条能够“违反唯一性约束条件”的记录，

最后在exception代码中输出异常提示信息　　

declare
primary_iterant exception;
pragma exception_init(primary_iterant,-00001);--关联错误号和异常变量名
begin
insert into dept values(10,‘软件开发部‘,‘深圳‘);
exception
when primary_iterant then
dbms_output.put_line(‘主键不允许重复!‘);
end;
/

B-业务逻辑异常

自定义一个异常变量，在向dept表中插入数据时，若判断loc字段为null，则使用raise语句引发异常，

并将程序执行流程转入到exception部分进行处理

declare
null_exception exception;
dept_row dept%rowtype;
begin
dept_row.deptno:=66;
dept_row.dname:=‘公共部‘;
insert into dept
values(dept_row.deptno,dept_row.dname,dept_row.loc);
if dept_row.loc is null then
raise null_exception;
end if;
exception
when null_exception then
dbms_output.put_line(‘loc字段的值不许为null‘);
rollback;
end;
/