plsql基础知识—定义并使⽤变量
n  介绍
在编写pl/sql程序是，可以定义变量和常量；在pl/sql程序中包括有：
①标量类型（scalar）
②复合类型（composite）
③参照类型（reference）
④lob（large object）
标量（scalar）⼀常⽤类型
在编写pl/sql块时，如果要使⽤变量，需在定义部分定义变量。
n  pl/sql中定义变量和常量的语法如下：
identifier [constant] datatype [not null][:=|default expr]
identifier：名称
constant：指定常量，需要指定它的初始值，且其值是不能改变的
datatype：数据类型
not null：指定变量值不能为null
:=  ：给变量或是常量指定初始值
default：⽤于指定初始值
expr：指定初始值的pl/sql表达式，可以是⽂本值、其它变量、函数等
n  标量定义的案例
①定义⼀个变长字符串
v_ename varchar2(10)
②定义⼀个⼩数范围-9999.99~9999.99
v_sal number（6，2）；
③定义⼀个⼩数并给⼀个初始值为5.4：=是pl/sql的赋值号
v_sal2number（6,2）:=5.4
④定义⼀个⽇期类型的数据
v_hiredate date；
⑤定义⼀个布尔变量，不能为空，初始值为false
v_valid boolean：=false；
n  标量（scalar）⼀使⽤标量
在定义好变量后，就可以使⽤这些变量。这⾥需要说明的是pl/sql块为变量赋值不同于其它编程语⾔，需要在等号前加冒号（:=）案例：以输⼊⼯号，显⽰雇员姓名、⼯资、个⼈所得税（税率为0.03）为例，说明变量的使⽤，看看如何编写。
create or replace procedure pro1(v_in_empno in number) is
v_tax_rate number(3,2):=0.03;
v_sal number;
v_ename varchar2(32);
v_tax number;
begin
select ename,sal into v_ename,v_sal from emp where empno=v_in_empno;
v_tax:=v_sal*v_tax_rate;
dbms_output.put_line(v_ename||'⼯资是 '||v_sal||'  个⼈所得税是 '||v_tax);
end;
n  标量（scalar）⼀使⽤%type类型
对于上⾯的pl/sql块有⼀个问题：
就是如果员⼯的姓名超过了5个字符的话，就会有错误，为了降低pl/sql程序的维护⼯作量，可以使⽤%type属性定义变量，这样它会按照数据库列来确定你定义的变量的类型和长度。
为了让我们在pl/sql编程中，让变量的类型和⼤⼩与表的列的⼤⼩和类型⼀致可以使⽤%type。
我们看看这个怎么使⽤：
标识符名表名.列名%type；
create or replace procedure pro1(v_in_empno in number) is
v_tax_rate number(3,2):=0.03;
v_sal emp.sal%type;    --为了让V_sal的类型更加灵活，使⽤%type⾃适应
v_ame%type;
v_tax number;
begin
select ename,sal into v_ename,v_sal from emp where empno=v_in_empno;
v_tax:=v_sal*v_tax_rate;
dbms_output.put_line(v_ename||'⼯资是 '||v_sal||'  个⼈所得税是 '||v_tax);
end;
n  复合变量（composite）
⽤于存放多个值的变量。常⽤的包括这：
①pl/sql记录②pl/sql表
n  复合类型⼀pl/sql记录
类似与⾼级语⾔中的结构体，需要注意的是，当引⽤pl/sql记录成员时，必须要加记录变量作为前缀（记录变量.记录成员)如下：
type ⾃⼰定义的记录名称 is record（
变量变量类型，
变量变量类型，
）；
//使⽤⾃定义的pl/sql记录
变量名⾃⼰定义的pl/sql记录名；
定义游标：
type⾃定义游标名 is ref cursor；打开游标：
open 游标变量 for select 语句；
请编写⼀个过程，该过程可以接收⼀个⽤户编号，并显⽰该⽤户的名字、薪⽔、⼯资岗位（注意：要求⽤pl/sql记录实现）
create or replace procedure pro1(v_in_empno in number) is
type lsz_emp_record is record(
v_ame%type,
v_sal emp.sal%type,
v_job emp.job%type);plsql注册码激活
v_emp_record lsz_emp_record;
begin
select ename,sal,job into v_emp_record from emp where empno=v_in_empno;
dbms_output.put_line('名字：'||v_emp_record.v_ename||' ⼯资:'||v_emp_record.v_sal);
end;
n  复合类型⼀pl/sql表（了解即可）
类似与⾼级语⾔中的数组，但是需要注意的是在⾼级语⾔中数组的下标不能为负数，⽽pl/sql是可以为负数的，并且表元素的下标没有限制，实例如下：
declare
type sp_table_type is table ame%type
index by binary_integer;
sp_table sp_table_type;          --定义⼀个变量：sp_table：类型
begin
select ename into sp_table(-1) from emp where empno=7788;
dbms_output.put_line(‘员⼯名：’||sp_table(-1));
end;
说明： sp_table_type      是pl/sql表类型
sp_table            为pl/sql表变量
sp_table(0)          则表⽰下标为0的元素
n  参照变量⼀介绍
参照变量是指⽤于存放数值指针的变量，通过使⽤参照变量，可以使得应⽤程序共享相同对象，从⽽降
低占⽤的空间。在编写pl/sql程序是，可以使⽤游标变量（ref cursor）和对象类型变量（ref obj_type）两种参照变量类型。
n  参照变量-ref cursor使⽤
变量名⾃定义游标名；
取出当前游标指向的⾏：
判断游标是否指向记录最后：
fetch 游标变量 into 其它变量；
游标变量%notfound
通过游标，我们可以取得返回结果集（这个结果集，往往是select语句的结果）的任何⼀⾏数据，从⽽提⾼共享的效率
使⽤游标：当定义游标时不需要指定相应的select语句，但是当使⽤游标时（open）需要指定select语句，这样⼀个游标就与⼀个select语句结合了。实例如下：
①请使⽤pl/sql编写⼀个过程，可以输⼊部门号，并显⽰该部门所有员⼯姓名和他的⼯资。
create or replace procedure pro1(v_in_deptno number) is
--先定义⼀个游标变量类型
type lsz_emp_cursor is ref cursor;
--定义⼀个游标变量
v_emp_cursor lsz_emp_cursor;
--定义两个变量
v_ame%type;
v_sal emp.sal%type;
begin
--执⾏语句
open v_emp_cursor for select ename,sal from emp where deptno=v_in_deptno;
--取出游标指向的每⾏数据，⽤循环语句
loop
fetch v_emp_cursor into v_ename,v_sal;--这句话会引起v_emp_cursor向下⾛⼀格
--判断当前游标是否到达最后
exit when v_emp_cursor%notfound;
--输出
dbms_output.put_line('⽤户名：'||v_ename||'  薪⽔：'||v_sal);
end loop;
--关闭游标（完成后⼀定要记住关闭游标）
close v_emp_cursor;
end;
②在①的基础上，如果某个员⼯的⼯资低于200元，就增加100元。
create or replace procedure pro1(v_in_deptno number) is
--先定义⼀个游标变量类型
type lsz_emp_cursor is ref cursor;
--定义⼀个游标变量
v_emp_cursor lsz_emp_cursor;
--定义两个变量
v_ame%type;
v_sal emp.sal%type;
v_pno%type;
begin
--执⾏语句
open v_emp_cursor for select ename,sal,empno from emp where deptno=v_in_deptno;
--取出游标指向的每⾏数据，⽤循环语句
loop
fetch v_emp_cursor into v_ename,v_sal,v_empno;--这句话会引起v_emp_cursor向下⾛⼀格--判断当前游标是否到达最后
exit when v_emp_cursor%notfound;
--输出
--dbms_output.put_line('⽤户名：'||v_ename||'  薪⽔：'||v_sal);
if v_sal<1500 then
update emp set sal=sal+100 where empno=v_empno;
end if;
end loop;
--关闭游标（完成后⼀定要记住关闭游标）
close v_emp_cursor;
end;

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。