程序设计领导形象设计圆作业设计ao工艺污水处理厂设计附属工程施工组织设计清扫机器人结构设计
PL/SQL
, PL/SQL可以 在ORACLE的 开发工具中使用。
, 其它开发工具也可以调用PL/SQL编写的过程和函数,如Power Builder 等都可以
调用服务器端的PL/SQL过程。
?1.3 运行PL/SQL程序
PL/SQL程序的运行是通过ORACLE中的一个引擎来进行的。这个引擎可能在ORACLE的服务器端,也可能在 ORACLE 应用开发的客户端。引擎执行PL/SQL中的过程性语句,然后将SQL语句发送给数据库服务器来执行。再将结果返回给执行端。
第二章 PL/SQL块结构和组成元素
?2.1 PL/SQL块
PL/SQL程序由三个块组成,即声明部分、执行部分、异常处理部分。
PL/SQL块的结构如下:
DECLARE
/* 声明部分: 在此声明PL/SQL用到的变量,类型及游标,以及局部的存储过程和函数 */
BEGIN
/* 执行部分: 过程及SQL 语句 , 即程序的主要部分 */ EXCEPTION
/* 执行异常部分: 错误处理 */
END;
其中 执行部分是必须的。
PL/SQL块可以分为三类:
1. 无名块:动态构造,只能执行一次。
2. 子程序:存储在数据库中的存储过程、函数及包等。当在数据库上建立好后可以在其它
程序中调用它们。
3. 触发器:当数据库发生操作时,会触发一些事件,从而自动执行相应的程序。
?2.2 PL/SQL结构
, PL/SQL块中可以包含子块;
, 子块可以位于 PL/SQL中的任何部分;
, 子块也即PL/SQL中的一条命令;
?2.3 标识符
PL/SQL程序设计中的标识符定义与SQL 的标识符定义的要求相同。要求和限制有:
, 标识符名不能超过30字符;
, 第一个字符必须为字母;
, 不分大小写;
, 不能用’-‘(减号);
, 不能是SQL保留字。
提示: 一般不要把变量名声明与表中字段名完全一样,如果这样可能得到不正确的结果.
例如:下面的例子将会删除所有的纪录,而不是KING 的记录;
DECLARE
Ename varchar2(20) :=’KING’;
BEGIN
DELETE FROM emp WHERE ename=ename; END;
变量命名在PL/SQL中有特别的讲究,建议在系统的设计阶段就要求所有编程人员共同遵守一定的要求,使得整个系统的文档在规范上达到要求。下面是建议的命名方法:
标识符 命名规则编码规则下载淘宝规则下载天猫规则下载麻将竞赛规则pdf麻将竞赛规则pdf 例子
V_name V_name 程序变量
C_Name C_company_name 程序常量
Name_cursor Emp_cursor 游标变量
E_name E_too_many 异常标识
Name_table_type Emp_record_type 表类型
Name_table Emp 表
Name_record Emp_record 记录类型
P_name P_sal SQL*Plus 替代变量
G_name G_year_sal 绑定变量
?2.4 PL/SQL 变量类型
在前面的介绍中,有系统的数据类型,也可以自定义数据类型。下表是ORACLE类型和PL/SQL中的变量类型的合法使用列表:
?2.4.1 变量类型
在ORACLE8i中可以使用的变量类型有:
类型 子类 说 明 范 围 ORACLE限制 CHAR Character 0,32767 2000 定长字符串 String 可选,确省=1 Rowid Nchar 民族语言字符集
VARCHAR2 Varchar, String 4000 0,32767 可变字符串 NVARCHAR24000 民族语言字符集
BINARY_INT带符号整数,为整数计算优 EGER 化性能
NUMBER(p,sDec 小数, NUMBER 的子类型 )
Double 高精度实数 precision 整数, NUMBER 的子类型 Integer 整数, NUMBER 的子类型 Int 与NUMBER等价 Numeric 与NUMBER等价 Real 整数, 比 integer 小 Small int
LONG 变长字符串 32,767字节 0->21474836
47
DATE 公元前4712年1月日期型 1日至公元后4712年12月31日
BOOLEAN TRUE, 布尔型 不使用 FALSE,NULL ROWID 存放数据库行号 UROWID 通用行标识符,字符类型
例1. 插入一条记录并显示;
DECLARE
Row_id UROWID;
info VARCHAR2(40);
BEGIN
INSERT INTO dept VALUES (90, ‘SERVICE’, ‘BEIJING’)
RETURNING rowid, dname||’:’||to_char(deptno)||’:’||loc
INTO row_id, info;
DBMS_OUTPUT.PUT_LINE(‘ROWID:’||row_id);
DBMS_OUTPUT.PUT_LINE(info);
END;
其中:RETURNING子句用于检索INSERT语句中所影响的数据行数,当INSERT语句使用VALUES 子句插入数据时,RETURNING 字句还可将列表达式、ROWID和REF值返回到输出变量中。在使用RETURNING 子句是应注意以下几点限制: 1(不能并行DML语句和远程对象一起使用;
2(不能检索LONG 类型信息;
3(当通过视图向基表中插入数据时,只能与单基表视图一起使用。
例2. 修改一条记录并显示
DECLARE
Row_id UROWID;
info VARCHAR2(40);
BEGIN
UPDATE dept SET deptno=80 WHERE DNAME=‘SERVICE’
RETURNING rowid, dname||’:’||to_char(deptno)||’:’||loc
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 UROWID;
info VARCHAR2(40);
BEGIN
DELETE dept WHERE DNAME=‘SERVICE’
RETURNING rowid, dname||’:’||to_char(deptno)||’:’||loc
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子句的限制相同。
?2.4.2 复合类型
ORACLE 在 PL/SQL 中除了提供象前面介绍的各种类型外,还提供一种称为复合类型的类型---记录和表.
?2.4.2.1 记录类型
记录类型是把逻辑相关的数据作为一个单元存储起来,它必须包括至少一个标量型或RECORD 数据类型的成员,称作PL/SQL RECORD 的域(FIELD),其作用是存放互不相同但逻辑相关的信息。
定义记录类型语法如下:
TYPE record_type IS RECORD(
Field1 type1 [NOT NULL] [:= exp1 ],
Field2 type2 [NOT NULL] [:= exp2 ],
. . . . . .
Fieldn typen [NOT NULL] [:= expn ] ) ;
例4 :
DECLARE
TYPE test_rec IS RECORD(
Code VARCHAR2(10),
Name VARCHAR2(30) NOT NULL :=’a book’);
V_book test_rec;
BEGIN
V_book.code :=’123’;
V_book.name :=’C++ Programming’;
DBMS_OUTPUT.PUT_LINE(v_book.code||v_book.name); END;
可以用 SELECT语句对记录变量进行赋值,只要保证记录字段与查询结果列表中的字段相配即可。
?2.4.2.2 使用%TYPE
定义一个变量,其数据类型与已经定义的某个数据变量的类型相同,或者与数据库表的某个列的数据类型相同,这时可以使用%TYPE。 使用%TYPE特性的优点在于:
, 所引用的数据库列的数据类型可以不必知道; , 所引用的数据库列的数据类型可以实时改变。
例5:
DECLARE
-- 用 %TYPE 类型定义与表相配的字段
TYPE t_Record IS RECORD(
T_no emp.empno%TYPE,
T_name emp.ename%TYPE,
T_sal emp.sal%TYPE );
-- 声明接收数据的变量
v_emp t_Record;
BEGIN
SELECT empno, ename, sal INTO v_emp FROM emp WHERE empno=7788;
DBMS_OUTPUT.PUT_LINE
(TO_CHAR(v_emp.t_no)||v_emp.t_name||TO_CHAR(v_emp.t_sal));
END;
例6:
DECLARE
v_empno emp.empno%TYPE :=&empno;
Type r_record is record (
v_name emp.ename%TYPE,
v_sal emp.sal%TYPE,
v_date emp.hiredate%TYPE);
Rec r_record;
BEGIN
SELECT ename, sal, hiredate INTO Rec FROM emp WHERE empno=v_empno;
DBMS_OUTPUT.PUT_LINE(Rec.v_name||'---'||Rec.v_sal||'--'||Rec.v_date);
END;
?2.4.3 使用%ROWTYPE
PL/SQL 提供%ROWTYPE操作符, 返回一个记录类型, 其数据类型和数据库表的数据结构相一致。
使用%ROWTYPE特性的优点在于:
, 所引用的数据库中列的个数和数据类型可以不必知道; , 所引用的数据库中列的个数和数据类型可以实时改变。
例7:
DECLARE
v_empno emp.empno%TYPE :=&empno;
rec emp%ROWTYPE;
BEGIN
SELECT * INTO rec FROM emp WHERE empno=v_empno;
DBMS_OUTPUT.PUT_LINE('姓名:'||rec.ename||'工资:'||rec.sal||'工作时间:'||rec.hiredate);
END;
?2.4.4 LOB类型*
ORACLE提供了LOB (Large OBject)类型,用于存储大的数据对象的类型。ORACLE目前主要支持BFILE, BLOB, CLOB 及 NCLOB 类型。
BFILE (Movie)
存放大的二进制数据对象,这些数据文件不放在数据库里,而是放在操作系统的某个目录里,数据库的表里只存放文件的目录。
BLOB(Photo)
存储大的二进制数据类型。变量存储大的二进制对象的位置。大二进制对象的大小<=4GB。
CLOB(Book)
存储大的字符数据类型。每个变量存储大字符对象的位置,该位置指到大字符数据块。大字符对象的大小<=4GB。
NCLOB
存储大的NCHAR字符数据类型。每个变量存储大字符对象的位置,该位置指到大字符数据块。大字符对象的大小<=4GB。
?2.4.5 Bind 变量
绑定变量是在主机环境中定义的变量。在PL/SQL 程序中可以使用绑定变量作为他们将要使用的其它变量。为了在PL/SQL 环境中声明绑定变量,使用命令VARIABLE。例如:
VARIABLE return_code NUMBER
VARIABLE return_msg VARCHAR2(20)
可以通过SQL*Plus命令中的PRINT 显示绑定变量的值。例如:
PRINT return_code
PRINT return_msg
例7:
VARIABLE result NUMBER
BEGIN
SELECT (sal*12)+nvl(comm, 0) INTO :result FROM emp WHERE empno=7788;
END;
PRINT result
?2.4.6 INDEX BY TABLES
包括两个基本成分:
(数据处理类型为BINARY_INTEGER主键;
(标量或记录数据类型的列(
TYPE type_name IS TABLE OF
{column_type | variable%TYPE | table.column%TYPE } [NOT NULL] |
table%ROWTYPE
[ INDEX BY BINARY_INTEGER];
方法 描述
EXISTS(n) Return TRUE if the nth element in a PL/SQL table exists; COUNT Returns the number of elements that a PL/SQL table currently contains; FIRST Return the first and last (smallest and lastest) index numbers in a
LAST PL/SQL table. Returns NULL if the PL/SQL table is empty. PRIOR(n) Returns the index number that precedes index n in a PL/SQL table; NEXT(N) Returns the index number that succeeds index n in a PL/SQL table; TRIM TRIM removes one element from the end of a PL/SQL table.
TRIM(n) removes n element from the end of a PL/SQL table. DELETE DELETE removes all elements from a PL/SQL table.
DELETE(n) removes the nth elements from a PL/SQL table.
DELETE(m, n) removes all elements in the range m to n from a PL/SQL
table.
例8:
DECLARE
TYPE dept_table_type IS TABLE OF
dept%ROWTYPE INDEX BY BINARY_INTEGER;
my_dname_table dept_table_type;
v_count number(2) :=4;
BEGIN
FOR int IN 1 .. v_count LOOP
SELECT * INTO my_dname_table(int) FROM dept WHERE deptno=int*10;
END LOOP;
FOR int IN my_dname_table.FIRST .. my_dname_table.LAST LOOP
DBMS_OUTPUT.PUT_LINE(‘Department number: ‘||my_dname_table(int).deptno);
DBMS_OUTPUT.PUT_LINE(‘Department name: ‘|| my_dname_table(int).dname);
END LOOP;
END;
?2.4.7 数据类型的转换*
隐式类型转换
BIN_INT CHAR DATE LONG NUMBER PLS_INT UROWID VARCHAR2 BIN_INT CHAR DATE LONG NUMBER RAW UROWID VARCHAR2
?2.5 运算符和表达式(数据定义)
?2.5.1 关系运算符
运算符 意义
= 等于
<> , != , ~= , ^= 不等于
< 小于
> 大于
<= 小于或等于
>= 大于或等于
?2.5.2 一般运算符
运算符 意义
+ 加号
- 减号
* 乘号
/ 除号
:= 赋值号
=> 关系号
.. 范围运算符
|| 字符连接符
?2.5.3 逻辑运算符
运算符 意义
IS NULL 是空值
BETWEEN 介于两者之间
IN 在一列值中间
AND 逻辑与
OR 逻辑或
NOT 取返,如IS NOT NULL, NOT IN
?2.6 变量赋值
在PL/SQL编程中,变量赋值是一个值得注意的地方,它的语法如下:
variable := expression ;
variable 是一个PL/SQL变量, expression 是一个PL/SQL 表达式.
?2.6.1 字符及数字运算特点
空值加数字仍是空值:NULL + < 数字> = NULL
空值加(连接)字符,结果为字符:NULL || <字符串> = < 字符串>
?2.6.2 BOOLEAN 赋值
布尔值只有TRUE, FALSE及 NULL 三个值。如:
DECLARE
done BOOLEAN;
/* the following statements are legal: */
BEGIN
done := FALSE;
WHILE NOT done LOOP
Null;
END LOOP;
END;
?2.6.3 数据库赋值
数据库赋值是通过 SELECT语句来完成的,每次执行 SELECT语句就赋值一次,一般要求被赋值的变量与SELECT中的列名要一一对应。如: 例9:
DECLARE
emp_id emp.empno%TYPE :=7788;
emp_name emp.ename%TYPE;
wages emp.sal%TYPE;
BEGIN
SELECT ename, NVL(sal,0) + NVL(comm,0) INTO emp_name, wages
FROM emp WHERE empno = emp_id;
Dbms_output.put_line(emp_name||’----‘||to_char(wages)); END;
提示:不能将SELECT语句中的列赋值给布尔变量。
?2.6.4 可转换的类型赋值
, CHAR 转换为 NUMBER:
使用 TO_NUMBER 函数来完成字符到数字的转换,如:
v_total := TO_NUMBER(‘100.0’) + sal;
, NUMBER 转换为CHAR:
使用 TO_CHAR函数可以实现数字到字符的转换,如:
v_comm := TO_CHAR(‘123.45’) || ’元’ ;
, 字符转换为日期:
使用 TO_DATE函数可以实现 字符到日期的转换,如:
v_date := TO_DATE('2001.07.03','yyyy.mm.dd');
, 日期转换为字符
使用 TO_CHAR函数可以实现日期到字符的转换,如:
v_to_day := TO_CHAR(SYSDATE, 'yyyy.mm.dd hh24:mi:ss') ;
?2.7 变量作用范围及可见性
在PL/SQL编程中,如果在变量的定义上没有做到统一的话,可能会隐藏一些危险的错误,这样的原因主要是变量的作用范围所致。与其它高级语言类似,PL/SQL的变量作用范围特点是:
, 变量的作用范围是在你所引用的程序单元(块、子程序、包)内。即从声明变量开
始到该块的结束。
, 一个变量(标识)只能在你所引用的块内是可见的。
, 当一个变量超出了作用范围,PL/SQL引擎就释放用来存放该变量的空间(因为它
可能不用了)。
, 在子块中重新定义该变量后,它的作用仅在该块内。
例10:
DECLARE
Emess char(80);
BEGIN
DECLARE
V1 NUMBER(4);
BEGIN
SELECT empno INTO v1 FROM emp WHERE LOWER(job)=’president’;
DBMS_OUTPUT.PUT_LINE(V1);
EXCEPTION
When TOO_MANY_ROWS THEN
DBMS_OUTPUT.PUT_LINE (‘More than one president’);
END;
DECLARE
V1 NUMBER(4);
BEGIN
SELECT empno INTO v1 FROM emp WHERE LOWER(job)=’manager’;
EXCEPTION
When TOO_MANY_ROWS THEN
DBMS_OUTPUT.PUT_LINE (‘More than one manager’);
END;
EXCEPTION
When others THEN
Emess:=substr(SQLERRM,1,80);
DBMS_OUTPUT.PUT_LINE (emess); END;
?2.8 注释
在PL/SQL里,可以使用两种符号来写注释,即:
, 使用双 ‘-‘ ( 减号) 加注释
PL/SQL允许用 – 来写注释,它的作用范围是只能在一行有效。如:
V_Sal NUMBER(12,2); -- 工资变量。
, 使用 /* */ 来加一行或多行注释,如: /***********************************************/ /* 文件名: statistcs_sal.sql */ /***********************************************/
提示:被解释存放在数据库中的 PL/SQL 程序,一般系统自动将程序头部的注释去掉。只
有在 PROCEDURE 之后的注释才被保留;另外程序中的空行也自动被去掉。
?2.9 简单例子
?2.9.1 简单数据插入例子
例11:
/* 本例子仅是一个简单的插入,不是实际应用。 */ DECLARE
v_ename VARCHAR2(20) := ‘Bill’;
v_sal NUMBER(7,2) :=1234.56;
v_deptno NUMBER(2) := 10;
v_empno NUMBER(4) := 8888; BEGIN
INSERT INTO emp ( empno, ename, JOB, sal, deptno , hiredate )
VALUES ( v_empno, v_ename, ‘Manager’, v_sal, v_deptno,
TO_DATE(’1954.06.09’,’yyyy.mm.dd’) );
COMMIT;
END;
?2.9.2 简单数据删除例子
例12:
/* 本例子仅是一个简单的删除例子,不是实际应用。 */
DECLARE
v_empno number(4) := 8888;
BEGIN
DELETE FROM emp WHERE empno=v_empno;
COMMIT;
END;
第三章 PL/SQL流程快递问题件怎么处理流程河南自建厂房流程下载关于规范招聘需求审批流程制作流程表下载邮件下载流程设计控制语句
介绍PL/SQL的流程控制语句, 包括如下三类: , 控制语句: IF 语句
, 循环语句: LOOP语句, EXIT语句 , 顺序语句: GOTO语句, NULL语句 ?3.1 条件语句
IF <布尔表达式> THEN
PL/SQL 和 SQL语句 END IF;
IF <布尔表达式> THEN
PL/SQL 和 SQL语句 ELSE
其它语句
END IF;
IF <布尔表达式> THEN
PL/SQL 和 SQL语句 ELSIF < 其它布尔表达式> THEN
其它语句
ELSIF < 其它布尔表达式> THEN
其它语句
ELSE
其它语句
END IF;
提示: ELSIF 不能写成 ELSEIF
例1:
DECLARE
v_empno emp.empno%TYPE :=&empno;
V_salary emp.sal%TYPE;
V_comment VARCHAR2(35); BEGIN
SELECT sal INTO v_salary FROM emp WHERE empno=v_empno;
IF v_salary<1500 THEN
V_comment:= ‘Fairly less’;
ELSIF v_salary <3000 THEN
V_comment:= ‘A little more’;
ELSE
V_comment:= ‘Lots of salary’;
END IF;
DBMS_OUTPUT.PUT_LINE(V_comment); END;
?3.2 CASE 表达式
CASE selector
WHEN expression1 THEN result1
WHEN expression2 THEN result2
WHEN expressionN THEN resultN
[ ELSE resultN+1]
END;
例2:
DECLARE
V_grade char(1) := UPPER(‘&p_grade’);
V_appraisal VARCHAR2(20); BEGIN
V_appraisal :=
CASE v_grade
WHEN ‘A’ THEN ‘Excellent’
WHEN ‘B’ THEN ‘Very Good’
WHEN ‘C’ THEN ‘Good’
ELSE ‘No such grade’
END;
DBMS_OUTPUT.PUT_LINE(‘Grade:‘||v_grade||’ Appraisal: ‘|| v_appraisal);
END;
?3.3 循环
1. 简单循环
LOOP
要执行的语句;
EXIT WHEN <条件语句> /*条件满足,退出循环语句*/
END LOOP;
例 3.
DECLARE
int NUMBER(2) :=0;
BEGIN
LOOP
int := int + 1;
DBMS_OUTPUT.PUT_LINE('int 的当前值为:'||int);
EXIT WHEN int =10;
END LOOP;
END;
2. WHILE 循环
WHILE <布尔表达式> LOOP
要执行的语句;
END LOOP;
例4.
DECLARE
x NUMBER;
BEGIN
x:= 1;
WHILE x<10 LOOP
DBMS_OUTPUT.PUT_LINE('X的当前值为:'||x);
x:= x+1;
END LOOP;
END;
3. 数字式循环
FOR 循环计数器 IN [ REVERSE ] 下限 .. 上限 LOOP
要执行的语句;
END LOOP;
每循环一次,循环变量自动加1;使用关键字REVERSE,循环变量自动减1。跟在IN
REVERSE 后面的数字必须是从小到大的顺序,而且必须是整数,不能是变量或表达式。
可以使用EXIT 退出循环。
例5.
BEGIN
FOR int in 1..10 LOOP
DBMS_OUTPUT.PUT_LINE('int 的当前值为: '||int);
END LOOP;
END;
例 6.
CREATE TABLE temp_table(num_col NUMBER);
DECLARE
V_counter NUMBER := 10;
BEGIN
INSERT INTO temp_table(num_col) VALUES (v_counter );
FOR v_counter IN 20 .. 25 LOOP
INSERT INTO temp_table (num_col ) VALUES ( v_counter );
END LOOP;
INSERT INTO temp_table(num_col) VALUES (v_counter );
FOR v_counter IN REVERSE 20 .. 25 LOOP
INSERT INTO temp_table (num_col ) VALUES ( v_counter );
END LOOP;
END ;
DROP TABLE temp_table;
?3.3 标号和GOTO
PL/SQL中GOTO语句是无条件跳转到指定的标号去的意思。语法如下:
GOTO label;
. . . . . .
<