Oracle PL/SQL编程之变量

注:

以下测试案例所用的表均来自与scott方案,使用前,请确保该用户解锁.

1、简介

和大多数编程语言一样,在编写PL/SQL程序时,可以定义常量和变量,在pl/sql程序中包括有:

a、标量类型(Scalar)

b、复合类型(Composite)

c、参照类型(Refrence)

d、lob(large object)类型

下面来一一介绍

2、标量(Scalar)类型       只能存放单个值的变量

在编写pl/sql语句时,如果需要用到变量,那么就需要在定义部分定义变量。pl/sql中定义变量个常量的语法如下:

identifier [constant] datatype [not null] [:=| default expr]

identifier:名称

constant:指定常量,需要指定它的初始值,且其值是不能改变的

datatype:数据类型

not null:指定变量值不能为空

:=给变量或者常量指定初始值

defalut:用于指定初试值

expr:指定初始值的pl/sql表达式,可是文本值、其他变量或者函数

2.1、标量定义的案例

定义一个变长字符串

v_name varchar2(10);

定义一个小数  范围   -9999.99~9999.99

v_sal number(6,2)

定义一个小数,并给定初始值6.6  注:     :=是pl/sql的变量赋值号

v_num number(6.2):=6.6

定义一个日期类型的数据

v_date date;

定一个布尔变量,不能为空,初始值为false;

v_bool boolean not null defalut false;

注:pl/sql中使用标量并给其赋初值的方式不同于其他的编程语言,需要在等号前加":"

2.2、标量使用的案例

作用:变量是存放pl/sql块中最普通的变量

输入一个员工号,显示雇员的姓名、工资、个人所得税(税率为0.03),代码如下:

declare
c_tax_rate number(3,2):=0.03;
v_name varchar2(5);
v_sal number(7,2);
v_tax_sal number(7,2);
begin
select ename,sal into v_name,v_sal from emp where empno=&no;
v_tax_sal:=v_sal * c_tax_rate;
dbms_output.put_line('姓名是:'||v_name||'工资:'||v_sal||'交税:'||v_tax_sal);
end;

ok,输出成功!

但是上面的代码存在漏洞

我们给变量指定了定长,但是如果我们输入的编号对应的ename的长度大于5,就像下面这样:

我输入了7654,这时对应的ename的长度大于5,所以程序包错了

所以必须解决这个问题,当我们不知道变量长度的时候,让其长度和对应的表字段匹配,从而使程序不抱错,解决方案参考2.3

2.3、标量中使用%type

declare
c_tax_rate number(3,2):=0.03;
v_name emp.ename%type;
v_sal emp.sal%type;
v_tax_sal emp.sal%type;
begin
select ename,sal into v_name,v_sal from emp where empno=&no;
v_tax_sal:=v_sal * c_tax_rate;
dbms_output.put_line('姓名是:'||v_name||'工资:'||v_sal||'交税:'||v_tax_sal);
end;

ok,再次输入7654,正常输出。

3、复合变量(composite)   用于存放多个值的变量

3.1、复合类型-pl/sql记录

类似高级语言中的结构体,需要注意的是,当引用pl/sql记录中的成员时,必须要加记录变量作为前缀(记录变量.记录成员),如果定义一个pl/sql记录类型呢?代码如下:

declare
type emp_record_type is record(
name emp.ename%type,
salary emp.sal%type
);

这样就定义了一个名为emp_record_type的复杂变量类型,那么如何使用这个类型呢?代码如下:

sp_record emp_record_type;

ok,这样就定义了一个emp_record_type类型的变量,名为sp_record;

declare
type emp_record_type is record(
name emp.ename%type,
salary emp.sal%type
);
sp_record emp_record_type;
begin
select ename,sal into sp_record from emp where empno=7788;
dbms_output.put_line('员工名:'|| sp_record.name||'工资:'||sp_record.salary);
end;

ok,使用复合类型-pl/sql记录成功的输出了员工名和工资

3.2、复合类型-pl/sql表

这种类型相当于高级语言的数组,但需要注意的是高级语言中的数组下标不能为负数,而pl/sql可以是可以为负数,而且表元素的下标没有限制。如何定义一个pl/sql表类型呢?代码如下:

declare
type sp_table_type is table of emp.ename%type index by binary_integer;

ok,上面的代码定义了一个类型为emp.ename的pl/sql表类型,也可以理解为类型为emp.ename的数组,那么如何使用这个类型,代码如下:

sp_table sp_table_type

ok,这样就定义了一个emp_table_type类型的变量,名为sp_table;

declare
type sp_table_type is table of emp.ename%type index by binary_integer;
sp_table sp_table_type;
begin
  select ename into sp_table(0) from emp where emp.empno=7788;
  dbms_output.put_line('姓名是:'||sp_table(0));
  end;

ok,上面的代码将empno为7788的员工姓名放入了sp_table中,并指定其下标为0,所以我们在下面输出时,指定输出sp_table(0),所以正常输出,

下面是使用pl/sql表类型经常出错的地方:

i、但是当我们指定存放的下标为-1,而输出的下标为0时,代码就会报错,具体的代码如下:

declare
type sp_table_type is table of emp.ename%type index by binary_integer;
sp_table sp_table_type;
begin
  select ename into sp_table(-1) from emp where emp.empno=7788;
  dbms_output.put_line('姓名是:'||sp_table(0));
  end;
  

所以当我们使用pl/sql表类型时,需要注意下标的对应

ii、当查询返回的结果集是多个,但是又指定pl/sql表类型的下标,相当于pl/sql表类型只接受一个值,这个时候会报错,具体代码如下:

declare
type sp_table_type is table of emp.ename%type index by binary_integer;
sp_table sp_table_type;
begin
  select ename into sp_table(-1) from emp;
  dbms_output.put_line('姓名是:'||sp_table(-1));
  end;
  

select ename from emp,返回了多个结果,而into sp_table(-1)只接受一个值,所以报上面的错误了。

4、参照变量

参照变量是指用于存放数值指针的变量,通过使用参照变量,可以使应用程序共享相同对象,从而降低占用的空间。在编写pl/sql程序时,可以使用游标变量(ref cursor)和对象类型变量

(ref obj_type)两种参照变量类型。

4.1、参照变量-ref cursor游标变量

使用游标时,当定义游标时,不需要指定相应的select 语句,但是当使用游标时,就需要指定select语句,这样一个游标就和一个selec语句结合了.下面是游标的案例

a、请使用pl/sql编写一个块,可以输入部门号,显示该部门下所有员工的姓名和工资,代码如下:

首先定义一个游标类型:

type sp_emp_cursor is ref cursor;

接着定义一个sp_emp_cursor游标类型的游标变量

test_cursor sp_emp_cursor;

然后打开游标,将游标与结果集结合

open test_cursor for select ename,sal from emp where empno=&no;

ok,现在test_cursor指向了select ename,sal from emp where empno=&no   结果集

然后循环游标,取出我们想要的数据,然后赋值给定义好的标量,并输出给标量,循环完毕(游标使用完毕),关闭游标,代码如下:

declare
type sp_emp_cursor is ref cursor;--定义一个游标类型
test_cursor sp_emp_cursor;--定义一个游标变量
v_ename emp.ename%type;
v_sal emp.sal%type;
begin
  --执行
  --把test_cursor和一个select结合
  open test_cursor for select ename,sal from emp where deptno=&no;
  --循环取出
  loop
    fetch test_cursor into v_ename,v_sal;
    --判断test_cursor是否循环到空数据,如果循环到空数据,那么就停止循环
    exit when test_cursor%notfound;
    dbms_output.put_line('姓名:'||v_ename||'工资:'||v_sal);
   end loop;
 
   --使用完毕关闭游标
   close test_cursor;
end;
  

ok,完成a需求。

b、在a的基础上,如果某个员工的工资低于200元,就增加100元。使用游标完成需求。