Oracle数据库学习：PL/SQL

什么是PL/SQL

PL/SQL 是过程语言(Procedural Language)与结构化查询语言(SQL)结合而成的扩展语言;
使用PL/SQL 可以编写具有很多高级功能的程序
虽然通过多个SQL语句也可以实现相同的功能，但对于应用程序开发过程中, 需要多次与数据库打交道,
PL/SQL可以针对于某一种功能特定的实现…(类似Java的方法) 一定程度上避免了频繁于数据库的请求 (减低服务器压力)
优点：

PL/SQL具有编程语言的特点, 它把一组SQL语句放到一个模块中执行，使其更具模块化程序的特点；

PL/SQL可以采用过程语言的程序结构，可以在其中写逻辑判断循环…

与其它编程语言类似，PL/SQL对于程序中的异常也有其响应的处理方式;

PL/SQL块，具有更好的可移植性; 可以移植到另一个Oracle数据库中…

减少了程序网络的交互(数据了访问), 提高程序性能;

PL/SQL体系结构：

PL/SQL块：
由PL/SQL引擎来编译和执行PL/SQL块; 该引擎存在于 Oracle服务器中；
PL/SQL引擎： 执行所有过程语句，将SQL语句发送给Oracle的SQL语句执行器

PL/SQL简介：

PL/SQL 是一种块结构的语言：
它把一组SQL语句放到一个模块中执行，使其更具模块化程序的特点；
匿名块 是一个未在数据库中命名的PL/SQL块, 在运行时传递到PL/SQL引擎中执行…
PL/SQL中可以使用： select insert update delete…事务语句以及sql函数；增删改别忘了 COMMIT 提交事务~
PL/SQL中不允许直接使用：create deop alter 但可以通过动态SQL来执行它们…
一个PL/SQL语句由三个部分组成：声明部分 执行部分 异常处理部分

PL/SLQ结构块：

--PL/SQL块基本结构：
DECLARE-- DECLARE 可选,声明部分: --在此声明PL/SQL用到的变量,常量,类型,游标 以及局部的存储过程和函数;
BEGIN-- BEGIN~end 必须项,执行部分:-- 在此编写执行的过程 及 SQL语句,即程序的主要部分;EXCEPTION-- EXCEPTION 可选,指定出现错误时需要执行的操作
END;-- end: 表示Pl/sql块的结束,别忘了分号结尾;-- 上面是PL/SQL块的基本结构, BEGIN~END; 是必须的 声明部分和异常处理部分并不是必须的..
-- 是PL/SQL中的单行注释    /**/ 多行注释;

运算符和表达式：
关系运算符：

运算符	意义	运算符	意义
<	小于	>	大于
<=	小于或等于	>=	大于或等于
=	等于	<>, !=, ~=, ^=	不等于

一般预算符：

运算符	运算符	运算符	运算符
+加号	-减	* 乘	/除
:=赋值号	=>关系号	. . 范围运算符	︳︳字符连接符

逻辑预算符：

运算符	意义	运算符	意义
IS NULL	空值	BETWEEN AND	介于两者之间
iN	在一列值之间	AND	逻辑与
OR	逻辑或	NOT	取反, 如 IS NOT NULL 或 NOT IN

DECLARE变量的声明：

语法：

/**
使用DECLARE 关键字,用于定义变量或者常量:PL/SQL块的可执行部分引用变量和常量前,必须先在DECLARE  对其进行声明;
*/   DECLARE variable_name [CONSTANT] type[(size)] [NOT NULL] [:=value];
BEGINEXCEPTION
END;
-- variable_name:变量名称
-- [CONSTANT]   :可选表示是否为常量
-- type         :表示变量的数据类型
-- [(size)]     :可选,数据类型的长度
-- [NOT NULL]   :可选,该变量是否可以为空
-- [:=value]    :可选,使用 := 给对于对象赋值 初始值;

PL/SQL变量名规范

变量命名规则
变量名首字母必须是英文字母
其后可以是字母、数字或者特殊字符$、#和下划线
变量名长度不超过30个字符
变量名中不能有空格不能是SQL保留字不能用 - (减号)
唯一比较好的就是不区分大小写了吧…

实例Demo

-- scott用户下emp举例
select * from emp;--PL/SQL 根据输入id,获得当前用户名 JOB
-- 方式一:PL/SQL块 注意分号~
declare--声明变量 id ename job, 每一个变量之间 ; 分号分隔...--id 通过 :=值 进行赋默认值,并通过 &xxx由Oracle工具输入参数;v_id number :=&myid;  --还可以把: &myid手动输入换位固定的 :=7934; 固定的id号;v_ename varchar2(50);v_JOB varchar2(50);
beginselect ename , job into v_ename,v_JOB from emp where empno = v_id;dbms_output.put_line('用户名'||v_ename||'职位: '||v_JOB);
end;
--  还可以通过: select into                          给变量进行赋值
--  select 列1,列2 into 变量1,变量2 form 表          形式进行下标自动映射赋值..因此列类型和变量类型 顺序都要尽量对应
-- dbms_output.put_line();                           Oracle还可以通过该语句进行数据打印输出...-- 方式二: 解决了不清楚变量与列的类型
declarev_id    emp.empno%type :=&id; v_ename emp.ename%type;v_JOB   emp.job%type;v_emp   emp%Rowtype;
beginselect ename , job into v_ename,v_JOBfrom emp where empno = v_id;dbms_output.put_line('用户名'||v_ename||'职位: '||v_JOB);select * into v_emp from emp where empno = v_id;dbms_output.put_line('用户名'||v_emp.ename||'职位: '||v_emp.job);
end;
-- 表.列%type:  可以在不清楚列类型时候给设置类型;
-- 表%ROWTYPE:  可以在不知道表中列个数 和 数据类型时候,可以通过  表%ROWTYPE 获取一个表类型变量...

注意：
SELECT 语句在PL/SQL中的写法稍微有改变,
SELECT INTO　查询结果只能返回一条记录, 并赋值到变量中保存；如果返回多条数据或没有都会报错;
PL/SQL　中对于多条记录的查询, 后面会学习游标进行存储多个结果集;

PL/SQL控制语句：

PL/SQL可以通过控制结构, 来控制命令执行的流程。
标准的SQL 没有流程控制的概念, 而PL/SQL提供了丰富的流程控制语句;
控制结构共有三种类型：条件控制循环控制顺序控制

条件控制

条件控制用于控制条件执行一系列的语句：条件控制包括 IF语句和 CASE语句
IF-THEN语句

 IF 布尔表达式 THENPL/SQL和SQL执行语句END IF;

IF-THEN-ELSE语句

 IF 布尔表达式 THENPL/SQL和SQL执行语句1ELSEPL/SQL和SQL执行语句2END IF;

IF-THEN-ELSIF语句

 IF 布尔表达式1 THENPL/SQL和SQL执行语句1ELSIF 布尔表达式2 THEN                  --注意：是ELSIF而不是ELSEIFPL/SQL和SQL执行语句2ELSEPL/SQL和SQL执行语句3END IF;

CASE：类似于Java的Switch在Oracle 9i 后引入，依据表达式，选择相应的when子句执行

 CASE 条件表达式WHEN 值1 THEN          PL/SQL和SQL执行语句1;WHEN 值2 THEN PL/SQL和SQL执行语句2;.....WHEN 值n THEN PL/SQL和SQL执行语句n;[ELSE else_statements;]              --可选：相当于default 都不符合则执行..END CASE;

循环控制

循环控制用户重复执行一系列语句，循环控制包括: LOOP WHERE FOR
EXIT 语句用于退出循环
EXIT WHERE <条件语句> 条件成立则退出循环…

LOOP死循环

LOOPPL/SQL和SQL执行语句;
END LOOP;
--实现计数器功能，当计数器为10或者大于10时退出
DECLAREv_count integer := 1;                                   --声明变量
BEGINLOOP                                                   --死循环开始v_count:=v_count+1;                                    --变每次+1IF v_count>=10 THEN                                 --判断变量 大于等于10 EXIT;                                         --退出循环  END IF;                                             --IF 结束END LOOP;                                                --死循环结束
END;                                                        --PL/SQL块结束

WHILE-LOOP循环: 类似于while循环

WHILE 布尔表达式  LOOPPL/SQL和SQL执行语句;
END LOOP;

FOR-LOOP循环: 类似与for循环

FOR 变量名 in 最小值..最大值 loop         循环执行的语句；
END LOOP;-- ..两点表示在其中范围~eg: 1..20  循环从1开始20结束;
beginfor i in 1..20 loopinsert 表 value(i,值1,值2,值3);COMMIT;                              --提交事务~end loop;    COMMIT;                                 --或放在最后统一提交事务~-- 后面在加一个异常处理，如果出现异常 ROLLBACK; 回滚数据;
end;

顺序控制

控制语句用户按顺序执行语句 NULL 个人觉得用的不多…

--NULL:-- NULL语句可以是一个可执行的语句,相当于一个占位符,不会执行任何的操作 的空语句;-- 它可以使某些语句变的有意义,提高程序的可读性,保证其它语句结构的完整性 和 正确性;
DECLAREv_count Number := 5;                                    --声明变量
BEGINIF v_count >=10 thennull;                                 --IF中需要有执行,不然报错; 为了使结构成立有意义使用 NULLElsedbms_output.put_line('值太小的'||v_count);END IF;
END;

动态SQL

什么是动态SQL
编译期间SQL 语句是不确定的，并且在运行时允许发生变化
动态SQL应用场合
要执行一个DDL 语句时需要增加程序的灵活性时使用包DBMS_SQL动态执行SQL语句时;
动态SQL简直是PL/SQL的一大亮点而且可以搭配：条件控制…使用而产生不同的SQL语句用于执行不同的操作

--动态sql
--查询用户总共有多少表
select count(1) from dba_tables
select count(1) from dba_tables where table_name = upper('WSM');
--查询所有表
select * from dba_tables --查询用户存在WSM表吗？ 如果有删除/没有则创建;  注意切换一个可以创建的用户哦！System用户！
declarev_count number;       --用于判断是否存在表;                 v_sql varchar2(500);  --执行的sql变量,varchar2类型长度500 毕竟存储的是sql长一点好~
beginselect count(1)       --获取countinto v_countfrom dba_tables where table_name = upper('WSM');       --upper() 方法将字符串中的小写字母转为大写字母if v_count>0 then                 --判断是否存在v_sql := 'drop table WSM';     --拼接SQL  else                              --else 拼接SQL           v_sql := 'create table WSM('||'id number,'||'name varchar2(20)'||')'; end if;--执行动态sqlexecute immediate v_sql;
end;
-- 前面说PL/SQL中不可以使用 DDL语句;
-- 而 execute immediate SQL; 可以解决该问题...

EXECUTE IMMEDIATE语句

EXECUTE IMMEDIATE dynamic_sql
dynamic_sql: 表示一个SQL语句或者一个PL/SQL语句块的字符串表达式, 可以通过EXECUTE IMMEDIATE语句执行…

常用语法

--基本语法：
BEGINexecute immediate '执行的SQL';
END;-- 如果在存储过程 或 PL/SQL块执行还可以;
-- 给变量进行赋值 INTO
-- 对于需要参数执行的SQL(增删改查条件数据..),通过 Using 传参(根据顺序进行参数匹配注意类型也对应哦..);
execute immediate 'select 列1,列2 from 表 where id=:id' into 变量1,变量2 USING 条件id;declare   v_name  varchar2(20);
begin   execute immediate 'select ename from emp where empno=:a' into v_name USING 7369; --USING指定 7369编号;   dbms_output.put_line(v_name);
end; /*
注意事项：EXECUTE IMMEDIATE将不会提交一个DML事务执行，应该显式提交(对于增删改需要  commit;  )   当执行SQL语句时，不要用分号，当执行PL/SQL块时，在其尾部用分号.对于处理动态语句,EXECUTE IMMEDIATE 比以前可能用到的更容易并且更高效.
*/

对于execute 是真的非常好用, 尤其在存储过程~ 但是对于拼接一些特殊字符要非常注意！！
比如引号 ‘ 这真是恶心死我了搜了很多有的是用 ’‘’ 三个引号间隔拼接为一个 ‘ 的对于新手非常难受;

可以使用ASCLL码来代替引号或是其它特殊字符~
chr(39) 就表示一个单引号~ 39 ASCLL码表示一个单引号;
这是我在完成存储过程中的一个条件查询拼接时间条件范围查询：
v_where:= v_where||' AND EXP_DATE >= TO_DATE('||chr(39)||v_qdate||chr(39)||','||chr(39)||'yyyy-fmmm-fmdd'||chr(39)||')';
当前时写简直恶心死了, 先将字符转换为时间进行判断, 过程还要当心引号！！

异常处理 EXCEPTION

什么是异常：
在运行过程中出现的错误叫做异常,
发生异常后, 语句将停止执行，PL/SQL引擎立即将控制权转到 PL/SQL的异常处理部分
注意：
这里说的是执行过程中的异常, 并不包含编译的异常…
异常处理exception 用来处理正常执行过程中未预料的事件…
两种比较经典的异常： 预定义异常 和 用户自定义异常

预定义异常：

Oracle预定义异常情况大约有 24个,
对于这种异常情况的处理无须在程序中定义, 可由Oracle自动引发…
当 PL/SQL 程序违反 Oracle 规则或超越系统限制时隐式引发；
常见预定义异常：

OTHERS
处理程序异常不会漏过任何异常, 它相当于Java的 Exception 无论什么异常都可以捕获
所以一般声明在最后, 进行捕获遗落的异常处理…
图上代码实例：
异常处理之后加一个 ROLLBACK; 回滚一下效果更好…
实例意思是：循环新增三个商品类别(当前数据有点随便…) 如果过程中有异常进行捕获处理…则插入成功！

用户自定义异常：

用户可以在 PL/SQL 块的声明部分定义异常，
自定义的异常通过 RAISE语句 显式引发;
实例Demo

-- 切换Scott用户
select * from emp-- 根据输入id 查询对应用户工资
declarev_empno number :=&myid;v_ename varchar2(50);v_sal number;e_exp exception;                               -- exception异常类型;
begin-- 查询数据赋值;select ename , sal into v_ename,v_sal from emp where empno = v_empno;-- 打印输出dbms_output.put_line(v_ename||'点击量:'||v_sal);if v_sal<2000 then                              -- 如果工资小于两千                            raise e_exp;                                 -- 抛出异常..end if;
exceptionwhen no_data_found thendbms_output.put_line('没有找到数据');rollback;                            when e_exp then                              -- 处理手动异常...dbms_output.put_line('工资小于两千');rollback;when others then                             -- 处理任何异常..dbms_output.put_line('程序异常');rollback;
end;

扩

除了以上的异常情况处理…
RAISE_APPLICATION_ERROR
还可以重新定义异常错误消息，为应用程序提供一种与Oracle交互方法d
语法：
RAISE_APPLICATION_ERROR(err_number,err_message);
err_number: 表示为用户异常标识指定的编号, 注意范围必须是 -20999~20000之间负整数’
err_message: 用户为异常指定的文本信息…长度可达 2049字节…

游标

游标基本原理

Oracle 在执行一个包含 SELECT INSERT DELETE UPDATE …的语句时候
会在内存中创建出一个缓存区，将执行结果放在这个缓冲区中, 而游标是指向该区的一个指针…

游标分类：

Oracle中提供了两种游标类型, 静态游标(本次讲解) 动态游标
静态游标：是在编译器就知道明确的SELECT 语句的游标… 又细分为显示游标/隐式游标

声明游标

CURSOR cursor_name [( parameter[,parameter]…)]
[RETURN return_type] IS selectsql;/*
CURSOR：       用于声明一个游标,一般配合PL/SQL 声明使用...
cursor_name：  自定义游标名;
parameter：    可选参数,用于指定参数类型、模式等
return_type：  可选,指定游标的返回类型
selectsql:     需要处理的select语句，不能含INTO子句
*/

打开游标

open cursor_name;
-- cursor_name: 指定的游标名,来打开游标...

提取游标

FETCH cursor_name INTO variable_list;
-- cursor_name:    指定的游标名,来打开游标...
-- variable_list： 用于接收,游标中数据的变量名...注意类型匹配哦,使用时和普通的 SELECT 列1,列2 INTO 变量1,变量2 ... 类似;

关闭游标

close 游标名;
-- 使用CLOSE语句关闭一个游标
-- 关闭游标后，所有资源都将被释放，且不能再次被打开

实例Demo

declare
--声明部分             --创建变量Ename varchar2(20);--创建一个静态游标, IS指定SELECTCURSOR AA IS SELECT Ename FROM EMP;
begin
--执行部分OPEN AA;   --打开游标,一般都是第一行声明...--调用游标;FETCH AA INTO Ename;        --第一次调用dbms_output.put_line(Ename);FETCH AA INTO Ename;        --第二次调用dbms_output.put_line(Ename);Close AA;  --关闭游标,一般都是最后一行...
end;-- 两次分别输出了,两个用户名...

读取多行记录时，可以采用循环的方式 : LOOP循环 WHILE循环 FOR循环
显示游标的属性：

属性名称	说明
%found	返回true和false，表示是否有数据
%isopen	返回true和false，表示游标是否打开
%notfound	返回true和false，表示是否没有数据，`一般调用前建议判断是否有值在使用..`
%rowcount	表示受影响的数据一共有多少行

WHERE循环条件可以直接设置： 游标%notfound 进行循环…

使用显示游标删除或更新

个人看了一段时间才明白, 可能介绍不全… 而且觉得很鸡肋！！

使用游标时候，如果处理过程中需要删除或更新行可以借鉴下面做法…;
在定义游标时候必须使用：SELECT…FOR UPDATE语句
在执行 DELETE 和 UPDATE时使用：WHERE CURRENT OF 子句指定游标当前行详情如下！

声明

CURSOR 游标名 IS SELECT 查询语句 FOR UPDATE [of columns];
-- FOR UPDATE： 删除/跟新关键字
-- [of columns: 查询语句单表时候,可省略...对于多表的查询,需要根据 of 列;
--              锁定针对某一个表的操作,该游标 删/改只能对于该表...--使用时：根据WHERE后面条件...
UPDATE 表 SET 列
WHERE CURRENT OF 游标名;DELETE FROM 表
WHERE CURRENT OF 游标名;

实例Demo

select * from emp
--下面以给工资低于2000的雇员增加100元工资为例，说明使用显示游标更新数据的方法。示例如下：
declare
cursor emp_cursor is
select ename,sal from emp for update;
v_ename emp.ename%type;--定义变量
v_sal emp.sal%type;
begin
open emp_cursor;--打开游标
loop
fetch emp_cursor into v_ename,v_sal;--提取游标数据赋值给变量
exit when emp_cursor%notfound;
if v_sal <2000 then --当变量v_sal 小于2000时执行更新操作
update emp set sal=sal+100 where current of emp_cursor;
end if ;
end loop;
close emp_cursor;--关闭游标
end;

存储过程

将SQL或者PL/SQL代码块集中用于完成特定功能的集合
过程的结构
声明部分：包括类型、变量、游标
执行部分：完成功能而编写的SQL语句或则是PL/SQL代码块
异常处理部分
从根本上来讲就是命名的PL/SQL块, 它可以比赋予参数并存储在数据库中 可以由一个应用程序或其它PL/SQL调用使用

创建存储过程

CREATE [OR REPLACE] PROCEDURE <procedure_name> [(<parameter list>)]
IS|AS [local variable declaration]          --可选,局部声明;
BEGIN<executable statements>               --可执行语句
[EXCEPTION<exception handlers>]                 --可选,异常处理执行...
END [procedure_name] ;--<procedure_name>:                存储过程名称;
--[(<parameter list>)]             可选,存储过程的参数列表
--[OR REPLACE]                     可选,如果不包含 OR REPLACE 则表示仅仅新建一个存储过程,存在则报错;
--                                      如果包含   OR REPLACE 如果已存在则覆盖..

实战

----------------无参存储过程 myproc1 ---------------------
--判断员工EMP表,每个员工在对应部门的平均薪资...评价
create or replace procedure myproc1
as-- 定义变量v_name emp.ename%type;    v_sal  emp.sal%type;v_dept emp.empno%type;v_dept_avgsal number;v_sql varchar2(200);      --动态SQL变量-- 定义游标cursor cur_resultis select ename,sal,deptno from emp order by deptno;
begin-- 打开游标open cur_result;-- 死循环结束loop-- 调用游标..fetch cur_result into v_name,v_sal,v_dept;-- 判断条件终止循环..if cur_result%notfound thenexit;end if;-- 定义SQLv_sql:='select avg(sal) from emp where deptno =:a'; -- 执行SQL获取 当前部门平均薪资execute immediate v_sql into v_dept_avgsal using v_dept ;-- 判断平均薪资if v_sal>v_dept_avgsal thendbms_output.put_line(v_name||':很优秀');elsif v_sal=v_dept_avgsal thendbms_output.put_line(v_name||':良好');elsedbms_output.put_line(v_name||':需要努力了');end if ;end loop;             --循环结束       close cur_result;     --关闭游标   exception             --异常处理when others thendbms_output.put_line('程序出异常了！');end myproc1;            --存储过程结束;                         ----------------有参存储过程 add_EMP -------------------
-- 添加员工记录
CREATE OR REPLACE PROCEDURE add_EMP(--输入参数eno     NUMBER,                  --员工编号name    VARCHAR2,                --名称salary  varchar2,                --薪水job     varchar2 DEFAULT 'CLERK',--员工部分,默认CLERK dno     number
) IS
BEGININSERT INTO EMP(empno,ename,sal,job,deptno) VALUES(eno,name,salary,job,dno);
END;

存储过程创建完, 数据库定义执行完后并不会立刻执行，而是在数据库中存在…
和序列索引一样存储在某个位置, 方便后面使用时直接调用即可…(数据库/应用程序…执行时可以调用降低数据库和程序之间交流..降低资源)

过程的调用与删除

调用存储过程

EXEC[UTE] 存储过程名( 参数列表 );

有参存储过程参数传递的三种方式？


--按位置传递参数
EXEC add_EMP(3,'WSM',1000,'CLERK',10);
--按名称传递参数
EXEC add_EMP(eno=>3,name=>'WSM',salary=>1000,job=>'CLERK',dno=>10);
--混合方式传递参数：前面使用顺序传参,后面使用名称传参
EXEC add_EMP(3,'WSM',salary=>1000,job=>'CLERK',dno=>10);
--但,前面顺序之后使用了名称之后就不可以在使用顺序了,因为顺序有可能已经乱了--注意使用前用户要具有操作 存储过程的授权;
--存储过程创建之后只有,创建者和管理员才具有调用操作,如果普通用户需要还要赋权！！
--授权语句：
GRANT EXECUTE ON 存储过程名 TO 用户名;
--撤销权限
REVOKE EXECUTE ON 存储过程名 FROM 用户名;

存储过程的参数模式：

IN
用于接受调用程序的值默认的参数模式
OUT
用于向调用程序返回值
IN OUT
用于接受调用程序的值，并向调用程序返回更新的值
IN表示向存储过程传递参数，OUT表示从存储过程返回参数。而IN OUT 表示传递参数和返回参数；

------------------创建入参和出参的过程--------------------
-- 根据部门查询出对应 人员姓名和职位;
create or replace procedure myproc2                       -- 声明 有参存储过程(  参数   );
(      in_dept     in   number,                             -- in   入参,进入过程执行的参数,需要提供;     这里指对应部门;out_result  out  sys_refcursor                       -- out  出参,执行过程之后返回的结果参数,称为出参;   这里是一个游标,返回一个结果集;
)
asv_sql varchar2(500);                                 -- 声明变量sql;
beginv_sql:='select ename , job from emp where deptno = :a'; open out_result for v_sql using in_dept;             -- 指向sql 给对应占位符;
end myproc2;-- 执行 myproc2 存储过程~
declare-- 声明变量,用于接收 或 存储过程需要的参数;v_deptno number:=20;                       -- 参数1v_result sys_refcursor;                    -- 出参 动态游标:结果v_name   varchar2(50);v_job    varchar2(50);
beginscott.myproc2(v_deptno,v_result);                   -- 调用存储过程(给出对应的参数 部门no 出餐游标)~ loopfetch v_result into v_name, v_job;if v_result%notfound thenexit;end if;dbms_output.put_line(v_name ||':'|| v_job);end loop;close v_result;
end;