Oracle数据库之PL/SQL程序基础设计

一、PL/SQL块结构

前边我们已经介绍了PL/SQL块的结构,再来回顾一下:

DECLARE
/*
* 声明部分——定义常量、变量、复杂数据类型、游标、用户自定义异常
*/
BEGIN
/*
* 执行部分——PL/SQL语句和SQL语句
*/
EXCEPTION
/*
* 异常处理部分——处理运行异常
*/
END;
/*块结束标记 */

要实现PL/SQL程序设计,先介绍如下的基本内容:

二、标识符

PL/SQL程序设计中的标识符定义与SQL的标识符定义的要求相同:

  • 标识符名第一个字符必须为字母
  • 标识符名不分大小写
  • 标识符名不能超过30字符
  • 不能用‘-’(减号)
  • 不能是SQL保留字

注意: 一般不要把变量名声明与表中字段名完全一样,如果这样可能得到不正确的结果。

三、变量

1. 变量定义

声明:

variable_name Type;

示例:

my_var NUMBER(4);

赋值:

variable := expression ;

示例:

my_var := 32 * 8 + 79;
-- 声明并赋值
cnt NUMBER(2) := 3;

2. 变量作用域

在PL/SQL编程中,如果在变量的定义上没有做到统一的话,可能会隐藏一些危险的错误,这样的原因主要是变量的作用域所致。变量的作用域是指变量的有效作用范围,与其它高级语言类似,PL/SQL的变量作用范围特点是:

  • 变量的作用范围是在你所引用的程序单元(块、子程序、包)内。即从声明变量开始到该块的结束。
  • 一个变量(标识)只能在你所引用的块内是可见的。
  • 当一个变量超出了作用范围,PL/SQL引擎就释放用来存放该变量的空间(因为它可能不用了)。
  • 在子块中重新定义该变量后,它的作用仅在该子块内。

四、运算符

1. 关系运算符

运算符 说明
= 等于
<> , != , ~= , ^= 不等于
< 小于
> 大于
<= 小于等于
>= 大于等于

2. 逻辑运算符

运算符 说明
AND 逻辑与
OR 逻辑或
NOT 逻辑非,取反

3. 算术运算符

运算符 说明
+
-
*
/

4. 其它运算符

运算符 说明
IS NULL 是空值
BETWEEN AND 介于两者之间
IN 在一列值中间
:= 赋值运算符
=> 关系号
.. 范围运算符
|| 字符连接符

五、数据类型

前面已经介绍过Oracle中的基本数据类型,除了这些基本数据类型外,Oracle中还有其它的数据类型,我们一一来分析。

1. BOOLEAN

该数据用于定义布尔变量,其变量的值为TRUE、FALSE或NULL。注意此类型只能在PL/SQL中使用,表列是没有此类型的。

2. %TYPE

通常用于指定表的某个列的数据类型,可以理解为“的类型”(小技巧:%读“的”)。

示例:

emp_id employee.id%TYPE;

使用%TYPE特性的优点在于:

  • 所引用的数据库列的数据类型可以不必知道。
  • 所引用的数据库列的数据类型可以实时改变,容易保持一致,也不用修改PL/SQL程序。

3. %ROWTYPE

%ROWTYPE操作符,返回一个记录类型,其数据类型和数据库表的数据结构相一致。

示例:

rec employee%ROWTYPE;

使用%ROWTYPE特性的优点在于:

  • 所引用的数据库中列的个数和数据类型可以不必知道。
  • 所引用的数据库中列的个数和数据类型可以实时改变,容易保持一致,也不用修改PL/SQL程序。

4. 复合数据类型

4.1. 记录(Record)

记录类型类似于C语言中的结构数据类型,它把分离的、逻辑相关的、基本数据类型的变量组成一个整体存储起来,它必须包括至少一个标量型或RECORD数据类型的成员,称作PL/SQL RECORD的域(FIELD),其作用是存放互不相同但逻辑相关的信息。

语法:

TYPE record_name IS RECORD(
varable1 data_type1 [NOT NULL] [:= default_value ],
varable2 data_type2 [NOT NULL] [:= default_value ],
......,
varablen data_typen [NOT NULL] [:= default_value ]
);

在使用记录数据类型变量时,需要先在声明部分先定义记录的组成、记录的变量,然后在执行部分引用该记录变量本身或其中的成员。

示例1:

DECLARE
-- 定义记录类型
TYPE TEST_REC IS RECORD(
rec_name VARCHAR2(30) NOT NULL := '匿名',
info VARCHAR2(100)
);
-- 声明记录变量
rec_emp TEST_REC;
BEGIN
rec_emp.rec_name :='刘强东';
rec_emp.info :='谈京东的业务发展';
DBMS_OUTPUT.PUT_LINE(rec_emp.rec_name||' ' ||rec_emp.info);
END;

说明:我们可以使用DBMS_OUTPUT.PUT_LINE(outdata)DBMS_OUTPUT.PUT(outdata)将处理结果输出到屏幕上。

运行结果:

刘强东  谈京东的业务发展

示例2(示例中所用到的表及数据见文末):

DECLARE
--定义与employee表中的几个列相同的记录数据类型
TYPE RECORD_TYPE_EMPLOYEES IS RECORD(
e_id employee.id%TYPE,
e_name employee.name%TYPE,
e_birth employee.birthday%TYPE,
e_address employee.address%TYPE,
e_did employee.did%TYPE
);
--声明一个该记录数据类型的记录变量
emp_record RECORD_TYPE_EMPLOYEES; BEGIN
SELECT id, name, birthday, address, did INTO emp_record
FROM employee
WHERE id = &emp_id; DBMS_OUTPUT.PUT_LINE('雇员名称:'||emp_record.e_name
||' 出生日期:'||emp_record.e_birth
||' 地址:'||emp_record.e_address);
END;

说明:可以用SELECT语句对记录变量进行赋值,只要保证记录字段与查询结果列表中的字段相配即可。&emp_id表示接收用户的输入。

紧跟着&符号后面的变量被称为替换变量。替换变量对数据库引擎是“不可见的”。其实PL/SQL会用用户输入的文本内容来替换变量引用。

如果你想在代码的不同地方引用相同的替换变量,那就需要在第一个替换变量前面放两个&符号,这样才会为你保留这个值以便后续使用。

输入2,输出结果:

雇员名称:刘兰  出生日期:03-9月 -85  地址:四川成都

4.2. 表(TABLE)

4.2.1. 索引表

索引表也称为PL/SQL表,它是Oracle早期版本用于处理PL/SQL数组的数据类型。索引表的元素个数没有限制,并且下标可以为负值。

它与记录类型相似,但它是对记录类型的扩展。它可以处理多行记录,使得可以在PL/SQL中模仿数据库中的表。

注意,索引表只能作为PL/SQL复合数据类型使用,而不能作为表列的数据类型使用。

语法结构:

TYPE table_name IS TABLE OF element_type [NOT NULL]
INDEX BY [BINARY_INTEGER | PLS_INTEGER | VARCHAR2];

关键字INDEX BY表示创建一个主键索引,以便引用记录表变量中的特定行。

表是集合类型,集合类型常用方法有:

方法 说明
EXISTS(n) 如果集合的第n个成员存在,则返回true
COUNT 返回已经分配了存储空间即赋值了的成员数量
FIRST 返回成员的最低下标值
LAST 返回成员的最高下标值
PRIOR(n) 返回下标为n的成员的前一个成员的下标。如果没有则返回NULL
NEXT(N) 返回下标为n的成员的后一个成员的下标。如果没有则返回NULL
TRIM TRIM:删除末尾一个成员。
TRIM(n) :删除末尾n个成员
DELETE DELETE:删除所有成员。
DELETE(n) :删除第n个成员。DELETE(m, n) :删除从n到m的成员。
EXTEND EXTEND:添加一个null成员。
EXTEND(n):添加n个null成员。
EXTEND(n,i):添加n个成员,其值与第i个成员相同。
LIMIT 返回在varray类型变量中出现的最高下标值

集合方法调用语法为:

collection_name.method_name[(parameters)]

示例1:

DECLARE
/* 定义索引表类型 */
TYPE name_index IS TABLE OF employee.name%type INDEX BY binary_integer;
TYPE charindex is table of employee.name%type index by varchar2(10);
/* 声明变量 */
names name_index;
names2 charindex;
BEGIN
names(1) := 'love';
names(2) := 'lily';
names2('girl') := 'Lucy';
names2('boy') := 'Tom';
dbms_output.put_line(names(1));
dbms_output.put_line(names(2));
dbms_output.put_line(names2('girl'));
dbms_output.put_line(names2('boy'));
END;

输出结果:

love
lily
Lucy
Tom

示例2:

DECLARE
/* 定义索引表类型 */
TYPE name_index IS TABLE OF employee.name%type INDEX BY binary_integer;
TYPE charindex is table of employee.name%type index by varchar2(10);
/* 声明变量 */
names name_index;
names2 charindex;
BEGIN
SELECT name INTO names(1) FROM employee WHERE id=3;
SELECT empname INTO names2('name') FROM employee WHERE id=5;
dbms_output.put_line(names(1));
dbms_output.put_line(names2('name'));
END;

输出结果:

张强
向小梅

示例3:

DECLARE
TYPE DEPT_TABLE_TYPE IS TABLE OF DEPT%ROWTYPE INDEX BY BINARY_INTEGER;
dept_table DEPT_TABLE_TYPE;
cnt number(2) :=4;
BEGIN
FOR i IN 1 .. cnt LOOP
SELECT * INTO dept_table(i) FROM DEPT WHERE id=i;
END LOOP;
FOR i IN 1 .. cnt LOOP
DBMS_OUTPUT.PUT_LINE('Department id: '||dept_table(i).id);
DBMS_OUTPUT.PUT_LINE('Department name: '|| dept_table(i).name);
END LOOP;
END;

输出结果:

Department id: 1
Department name: 财务部
Department id: 2
Department name: 市场部
Department id: 3
Department name: 综合部
Department id: 4
Department name: 研发部

4.2.2 嵌套表

嵌套表的元素下标从1开始,并且元素个数没有限制。嵌套表数组元素值可以是稀疏的。

注意:索引表类型不能作为表列的数据类型使用,但嵌套表类型可以作为表列的数据类型。

语法结构:

TYPE type_name IS TABLE OF element_type;

示例1:

DECLARE
TYPE EMP_TABLE_TYPE IS TABLE OF employee.name%TYPE;
emp_table EMP_TABLE_TYPE;
BEGIN
emp_table := EMP_TABLE_TYPE(' ',' ',' ');--这里必须使用构造方法初始化嵌套表变量。
SELECT name INTO emp_table(2) FROM employee
WHERE id=&emp_id;
DBMS_OUTPUT.PUT_LINE('姓名:'||emp_table(2));
END;

输入2,输出结果:

姓名:刘兰

在表列中也可以使用嵌套表。

在表列中使用嵌套表类型,必须首先使用CREATE TYPE命令建立嵌套表类型。另外注意,必须要为嵌套表列指定专门的存储表。

示例2:

CREATE TYPE phone_type IS TABLE OF varchar2(20);

CREATE TABLE employee(
id number(4),
name varchar2(10),
sal number(6,2),
phone phone_type
)nested table phone store as phone_table; -- 在嵌套表中插入数据
BEGIN
INSERT INTO employee VALUES(1, 'TOM', 800, phone_type('028-90909800', '13913001300'));
END; -- 在嵌套表中检索数据
DECLARE
phone_table phone_type;
BEGIN
SELECT phone INTO phone_table FROM employee WHERE id=1;
FOR i IN 1..phone_table.COUNT LOOP
dbms_output.put_line('电话号码:'||phone_table(i));
END LOOP;
END; -- 在嵌套表中更新数据
DECLARE
phone_table phone_type:=phone_type('028-10001000', '139800900100');
BEGIN
UPDATE employee SET phone=phone_table WHERE id=1;
END;

4.3. 数组(VARRAY)

数组是具有相同数据类型的一组成员的集合。每个成员都有一个唯一的下标,它取决于成员在数组中的位置。

语法结构:

TYPE varray_name IS VARRAY(size) OF element_type [NOT NULL];

示例:

DECLARE
--定义一个最多保存5个VARCHAR(25)数据类型成员的VARRAY数据类型
TYPE ARRAY_TYPE IS VARRAY(5) OF VARCHAR(25);
--声明一个该VARRAY数据类型的变量
my_array ARRAY_TYPE; BEGIN
--用构造函数语法赋予初值
my_array := ARRAY_TYPE
('中国', '美国', '英国', '日本', NULL); DBMS_OUTPUT.PUT_LINE('地区名称:'||my_array(1)||'、'
||my_array(2)||'、'
||my_array(3)||'、'
||my_array(4));
DBMS_OUTPUT.PUT_LINE('赋予初值NULL的第5个成员的值:'||my_array(5));
--也可以这样对成员赋值
my_array(5) := '法国';
DBMS_OUTPUT.PUT_LINE('第5个成员的值:'||my_array(5));
END;

输出结果:

地区名称:中国、美国、英国、日本
赋予初值NULL的第5个成员的值:
第5个成员的值:法国

5. 绑定变量

绑定变量是在主机环境中定义的变量。在PL/SQL 程序中可以使用绑定变量作为他们将要使用的其它变量。为了在PL/SQL 环境中声明绑定变量,使用命令VAR或VARIABLE。

当在SQL*Plus中与PL/SQL块之间进行数据交互时,需要使用SQL*Plus绑定变量来完成。

当在PL/SQL中引用非PL/SQL变量时,必须要在非PL/SQL变量前加冒号(“:”)。

示例:

VARIABLE name varchar2(10);
/
BEGIN
SELECT name INTO :name FROM employee
WHERE id = 1;
end;
/
print name;

输出结果:

name
---------
李飞

六、常用类型转换函数

CHAR 转换为 NUMBER:

使用 TO_NUMBER 函数来完成字符到数字的转换,如:

v_total := TO_NUMBER('100.0') + 25.5;

NUMBER 转换为CHAR:

使用 TO_CHAR 函数可以实现数字到字符的转换,如:

v_comm := TO_CHAR('12.34') || '元' ;

字符转换为日期:

使用 TO_DATE 函数可以实现 字符到日期的转换,如:

v_date := TO_DATE('2015.06.11','yyyy.mm.dd');

日期转换为字符:

使用 TO_CHAR 函数可以实现日期到字符的转换,如:

v_to_day := TO_CHAR(SYSDATE, 'yyyy.mm.dd hh24:mi:ss') ;

七、RETURNNING的使用

示例1:

DECLARE
row_id ROWID;
info VARCHAR2(40);
BEGIN
INSERT INTO dept VALUES (10, '外交部')
RETURNING rowid, name||':'||to_char(id) INTO row_id, info;
DBMS_OUTPUT.PUT_LINE('ROWID:'||row_id);
DBMS_OUTPUT.PUT_LINE(info);
END;

说明:

数据类型ROWID用于存放数据的行号。

RETURNING子句作用:用于检索INSERT语句中所影响的数据行数,当INSERT语句使用VALUES子句插入数据时,RETURNING 字句还可将列表达式、ROWID和REF值返回到输出变量中。使用RETURNING子句是应注意以下几点限制:

  • 不能与DML语句和远程对象一起使用;
  • 不能检索LONG类型信息;
  • 当通过视图向基表中插入数据时,只能与单基表视图一起使用。

示例2:

DECLARE
row_id ROWID;
info VARCHAR2(40);
BEGIN
UPDATE dept SET id=20 WHERE name='外交部'
RETURNING rowid, name||':'||to_char(id) INTO row_id, info;
DBMS_OUTPUT.PUT_LINE('ROWID:'||row_id);
DBMS_OUTPUT.PUT_LINE(info);
END;

说明:

RETURNING子句用于检索被修改行的信息。当UPDATE语句修改单行数据时,RETURNING子句可以检索被修改行的ROWID和REF值,以及行中被修改列的列表达式,并可将他们存储到PL/SQL变量或复合变量中;当UPDATE语句修改多行数据时,RETURNING子句可以将被修改行的ROWID和REF值,以及列表达式值返回到复合变量数组中。在UPDATE中使用RETURNING 子句的限制与INSERT语句中对RETURNING子句的限制相同。

示例3:

DECLARE
row_id ROWID;
info VARCHAR2(40);
BEGIN
DELETE dept WHERE id=20
RETURNING rowid, name||':'||to_char(id) INTO row_id, info;
DBMS_OUTPUT.PUT_LINE('ROWID:'||row_id);
DBMS_OUTPUT.PUT_LINE(info);
END;

说明:

RETURNING子句用于检索被删除行的信息:当DELETE语句删除单行数据时,RETURNING子句可以检索被删除行的ROWID和REF值,以及被删除列的列表达式,并可将他们存储到PL/SQL变量或复合变量中;当DELETE语句删除多行数据时,RETURNING子句可以将被删除行的ROWID和REF值,以及列表达式值返回到复合变量数组中。在DELETE中使用RETURNING子句的限制与INSERT语句中对RETURNING子句的限制相同。

八、注释

在PL/SQL里,有两种注释:

  • 使用’–-’(双减号)注释,它的作用范围是只能在一行有效。
  • 使用’/* */’注释,这是多行注释,可注释一行,也可注释多行。

示例:

DECLARE
--定义v_sal变量
v_sal NUMBER(6,2);
BEGIN
/*
给变量赋值,
然后打印此变量
*/
v_sal := 1000;
dbms_output.put_line(v_sal);
END;

各示例中所涉及的表及测试数据

-- 创建表
create table DEPT -- 部门
(
id NUMBER(4) not null constraint PK_DEPT_ID primary key,
name VARCHAR2(20)
); create table EMPLOYEE -- 员工
(
id NUMBER(4) not null constraint PK_EMP_ID primary key,
name VARCHAR2(20) not null,
birthday DATE,
address VARCHAR2(100),
did NUMBER(4),
constraint FK_EMP_DEPT foreign key (DID) references DEPT (ID)
); -- 添加测试数据
INSERT INTO DEPT VALUES(1, '财务部');
INSERT INTO DEPT VALUES(2, '市场部');
INSERT INTO DEPT VALUES(3, '综合部');
INSERT INTO DEPT VALUES(4, '研发部');
INSERT INTO DEPT VALUES(5, '网络部'); INSERT INTO EMPLOYEE VALUES(1, '李飞', TO_DATE('1975.07.03','yyyy.mm.dd'), '四川成都', 1);
INSERT INTO EMPLOYEE VALUES(2, '刘兰', TO_DATE('1985.09.03','yyyy.mm.dd'), '四川成都', 1);
INSERT INTO EMPLOYEE VALUES(3, '张强', TO_DATE('1987.11.22','yyyy.mm.dd'), '广东广州', 2);
INSERT INTO EMPLOYEE VALUES(4, '刘武龙', TO_DATE('1979.07.18','yyyy.mm.dd'), '陕西西安', 2);
INSERT INTO EMPLOYEE VALUES(5, '向小梅', TO_DATE('1982.03.03','yyyy.mm.dd'), '四川成都', 2);
INSERT INTO EMPLOYEE VALUES(6, '周斌', TO_DATE('1985.11.08','yyyy.mm.dd'), '四川成都', 4);
INSERT INTO EMPLOYEE VALUES(7, '王强', TO_DATE('1985.01.25','yyyy.mm.dd'), '四川成都', 4);
上一篇:oracle PL/SQL基础编程


下一篇:[Oracle] PL/SQL学习笔记