一、PL/SQL

（一）什么是PL/SQL

PL/SQL（Procedure Language/SQL）是 Oracle 对 sql 语言的过程化扩展，指 在 SQL 命令语言中增加了过程处理语句（如分支、循环等），使 SQL 语言具有 过程处理能力。把 SQL 语言的数据操纵能力与过程语言的数据处理能力结合起 来，使得 PLSQL 面向过程但比过程语言简单、高效、灵活和实用。 基本语法结构

[declare--声明变量]begin--代码逻辑[exception--异常处理]end;

（二）变量

声明变量的语法： 变量名 类型（长度）； 变量赋值的语法： 变量名:=变量值变量的声明需求： 声明变量水费单价、水费字数、吨数、金额。 对水费单价、字数、进行赋值 。吨数根据水费字数换算，规则为水费字数除以 1000，并且四舍五入，保留两位小数。计算金额，金额=单价*吨数。 输出单价 、数量和金额。

--变量的用法--declarev_price number(10,2);--水费单价v_usenum number; --水费字数v_usenum2 number(10,2);--吨数v_money number(10,2);--金额 beginv_price:=2.45;--水费单价v_usenum:=8012;--字数--字数换算为吨数v_usenum2:= round( v_usenum/1000,2);--计算金额v_money:=round(v_price*v_usenum2,2);dbms_output.put_line('单价：'||v_price||'吨 数:'||v_usenum2||'金额：'||v_money); end;

Select into 方式 赋值语法结构：select 列名 into 变量名 from 表名 where 条件 注意：结果必须是一条记录 ，有多条记录和没有记录都会

declarev_price number(10,2);--单价v_usenum number;--水费字数v_num0 number;--上月字数v_num1 number;--本月字数v_usenum2 number(10,2);--使用吨数v_money number(10,2);--水费金额begin--对单价进行赋值v_price:=3.45;--变量赋值select usenum,num0,num1 into v_usenum,V_num0,V_num1 fromT_ACCOUNT where year='' and month='01' and owneruuid=1;v_usenum2:= round(v_usenum/1000,2);v_money:=v_price*v_usenum2;DBMS_OUTPUT.put_line('单价：'||v_price||'吨数：'||v_usenum2||'金额：'||v_money||'上月字数：'||v_num0||'本月字数'||v_num1);end;

（三）属性类型

%TYPE 引用型 ，作用：引用某表某列的字段类型

declarev_price number(10,2);--单价v_usenum T_ACCOUNT.USENUM%TYPE;--水费字数v_num0 T_ACCOUNT.NUM0%TYPE;--上月字数v_num1 T_ACCOUNT.NUM1%TYPE;--本月字数v_usenum2 number(10,2);--使用吨数v_money number(10,2);--水费金额begin--对单价进行赋值v_price:=3.45;--v_usenum:=8090;select usenum,num0,num1 into v_usenum,V_num0,V_num1 fromT_ACCOUNT where year='' and month='01' and owneruuid=1;--使用吨数v_usenum2:= round(v_usenum/1000,2);--计算金额v_money:=v_price*v_usenum2;DBMS_OUTPUT.put_line('单价：'||v_price||'吨数：'||v_usenum2||'金额：'||v_money||'上月字数：'||v_num0||'本月字数'||v_num1);end;

%ROWTYPE 记录型 ，作用: 标识某个表的行记录类型

--变量的用法--declarev_price number(10,2);--单价v_account T_ACCOUNT%ROWTYPE;--记录型v_usenum2 number(10,2);--使用吨数v_money number(10,2);--水费金额begin--对单价进行赋值v_price:=3.45;--赋值select * into v_account from T_ACCOUNT where year='' and month='01' and owneruuid=1;--使用吨数v_usenum2:= round(v_account.usenum/1000,2);--计算金额v_money:=v_price*v_usenum2;DBMS_OUTPUT.put_line('单价：'||v_price||'吨数：'||v_usenum2||'金额：'||v_money||'上月字数：'||v_account.num0||'本月字数'||v_account.num1);end;

（四）异常

在运行程序时出现的错误叫做异常 ，发生异常后，语句将停止执行，控制权转移到 PL/SQL 块的异常处理部分 ，异常有两种类型： 预定义异常 ：当 PL/SQL 程序违反 Oracle 规则或超越系统限制时隐式 引发 用户定义异常：用户可以在 PL/SQL 块的声明部分定义异常，自定义的 异常通过 RAISE 语句显式引发预定义异常Oracle 预定义异常 21 个 语法结构：

exceptionwhen 异常类型 then异常处理逻辑

根据上例中的代码，添加异常处理部分

--变量的用法--declarev_price number(10,2);--水费单价v_usenum T_ACCOUNT.USENUM%type; --水费字数v_usenum2 number(10,3);--吨数v_money number(10,2);--金额 beginv_price:=2.45;--水费单价select usenum into v_usenum from T_ACCOUNT whereowneruuid=1 and year='' and month='01';--字数换算为吨数v_usenum2:= round( v_usenum/1000,3);--计算金额v_money:=round(v_price*v_usenum2,2);dbms_output.put_line('单价：'||v_price||'吨 数:'||v_usenum2||'金额：'||v_money);exceptionwhen NO_DATA_FOUND thendbms_output.put_line('未找到数据，请核实');when TOO_MANY_ROWS thendbms_output.put_line('查询条件有误，返回多条信息，请核实');end;

（五）条件判断

基本语法 1

if 条件 then业务逻辑end if;

基本语法 2

if 条件 then业务逻辑else业务逻辑end if;

基本语法 3

if 条件 then业务逻辑elsif 条件 then业务逻辑else业务逻辑end if;

需求：设置三个等级的水费 5 吨以下 2.45 元/吨 5 吨到 10 吨部分 3.45 元/吨 ， 超过 10 吨部分 4.45 ，根据使用水费的量来计算阶梯水费。

declarev_price1 number(10,2);--不足 5 吨的单价v_price2 number(10,2);--超过 5 吨不足 10 吨单价v_price3 number(10,2);--超过 10 吨单价v_account T_ACCOUNT%ROWTYPE;--记录型v_usenum2 number(10,2);--使用吨数v_money number(10,2);--水费金额begin--对单价进行赋值v_price1:=2.45;v_price2:=3.45;v_price3:=4.45;--赋值select * into v_account from T_ACCOUNT where year='' and month='01' and owneruuid=1;--使用吨数v_usenum2:= round(v_account.usenum/1000,2);--计算金额(阶梯水费)if v_usenum2<=5 then--第一个阶梯v_money:=v_price1*v_usenum2;elsif v_usenum2>5 and v_usenum2<=10 then --第二个阶梯v_money:=v_price1*5 + v_price2*( v_usenum2-5); else --第三个阶梯v_money:=v_price1*5 +v_price2*5 + v_price3*( v_usenum2-10 );end if;DBMS_OUTPUT.put_line('吨数：'||v_usenum2||'金额：'||v_money||'上月字数： '||v_account.num0||'本月字数'||v_account.num1);exceptionwhen NO_DATA_FOUND thenDBMS_OUTPUT.put_line('没有找到数据');when TOO_MANY_ROWS thenDBMS_OUTPUT.put_line('返回的数据有多行');end;

（六）循环

1．无条件循环语法结构：

loop--循环语句end loop;

范例：输出从1开始的100个数

declarev_num number:=1;begin loopdbms_output.put_line(v_num);v_num:=v_num+1;exit when v_num>100;end loop; end ;

2、条件循环语法结构

while 条件loopend loop;

范例：输出从1开始的100个数

declarev_num number:=1;beginwhile v_num<=100loopdbms_output.put_line(v_num);v_num:=v_num+1; end loop; end ;

3、for循环基本语法

for 变量 in 起始值..终止值loopend loop;

范例：输出从1开始的100个数

beginfor v_num in 1..100loopdbms_output.put_line(v_num); end loop;end;

（七）游标

1.什么是游标

游标是系统为用户开设的一个数据缓冲区,存放 SQL 语句的执行结果。我们 可以把游标理解为 PL/SQL 中的结果集。

2.语法结构及示例

在声明区声明游标，语法如下：

cursor 游标名称 is SQL 语句

使用游标语法

open 游标名称loopfetch 游标名称 into 变量 exit when 游标名称%notfoundend loop;close 游标名称

需求：打印业主类型为 1 的价格表 ，代码：

declarev_pricetable T_PRICETABLE%rowtype;--价格行对象cursor cur_pricetable is select * from T_PRICETABLE whereownertypeid=1;--定义游标beginopen cur_pricetable;--打开游标loopfetch cur_pricetable into v_pricetable;--提取游标到变量exit when cur_pricetable%notfound;--当游标到最后一行下面退出循环dbms_output.put_line( '价格:'||v_pricetable.price ||'吨位：'||v_pricetable.minnum||'-'||v_pricetable.maxnum ); end loop; close cur_pricetable;--关闭游标end ;

运行结果：3.带参数的游标我们的查询语句的条件值有可能是在运行时才能决定的，比如性业主类型， 可能是运行时才可以决定，那如何实现呢？我们接下来学习带参数的游标，修改 上述案例

declarev_pricetable T_PRICETABLE%rowtype;--价格行对象cursor cur_pricetable(v_ownertypeid number) is select * from T_PRICETABLE where ownertypeid=v_ownertypeid;--定义游标beginopen cur_pricetable(2);--打开游标loop fetch cur_pricetable into v_pricetable;--提取游标到变量exit when cur_pricetable%notfound;--当游标到最后一行下面退出循环dbms_output.put_line('价格:'||v_pricetable.price ||'吨位：'||v_pricetable.minnum||'- '||v_pricetable.maxnum ); end loop; close cur_pricetable;--关闭游标end ;

4. for 循环提取游标值

我们每次提取游标，需要打开游标 关闭游标 循环游标 提取游标 控制循环的 退出等等，好麻烦！有没有更简单的写法呢？有！用 for 循环一切都那么简单， 上例的代码可以改造为下列形式

declarecursor cur_pricetable(v_ownertypeid number) is select * from T_PRICETABLE where ownertypeid=v_ownertypeid;--定义游标beginfor v_pricetable in cur_pricetable(3)loop dbms_output.put_line('价格:'||v_pricetable.price ||'吨位：'||v_pricetable.minnum||'-'||v_pricetable.maxnum ); end loop; end ;

二、存储函数

（一）什么是存储函数

存储函数又称为自定义函数。可以接收一个或多个参数，返回一个结果。 在函数中我们可以使用 P/SQL 进行逻辑的处理。

（二）存储函数语法结构

创建或修改存储过程的语法如下

CREATE [ OR REPLACE ] FUNCTION 函数名称（参数名称 参数类型, 参数名称 参数类型, ...）RETURN 结果变量数据类型IS变量声明部分;BEGIN逻辑部分;RETURN 结果变量;[EXCEPTION 异常处理部分]END;

（三）案例

需求： 创建存储函数，根据地址 ID 查询地址名称。 语句:

create function fn_getaddress(v_id number) return varchar2isv_name varchar2(30);beginselect name into v_name from t_address where id=v_id;return v_name;end;

测试函数：select fn_getaddress(3) from dual 结果： 需求：查询业主 ID，业主名称，业主地址，业主地址使用刚才我们创建的函数 来实现。

select id 编号,name 业主名称,fn_getaddress(addressid) 地址 from t_owners

查询结果：

三、存储过程

（一）什么是存储过程

存储过程是被命名的 PL/SQL 块，存储于数据库中，是数据库对象的一种。 应用程序可以调用存储过程，执行相应的逻辑。 存储过程与存储函数都可以封装一定的业务逻辑并返回结果，存在区别如下： 1、存储函数中有返回值，且必须返回；而存储过程没有返回值，可以通过 传出参数返回多个值。 2、存储函数可以在 select 语句中直接使用，而存储过程不能。过程多数是 被应用程序所调用。 3、存储函数一般都是封装一个查询结果，而存储过程一般都封装一段事务 代码。

（二）存储过程语法结构

创建或修改存储过程的语法如下:

CREATE [ OR REPLACE ] PROCEDURE 存储过程名称（参数名 类型, 参数名 类型, 参数名 类型）IS|AS变量声明部分;BEGIN逻辑部分[EXCEPTION 异常处理部分]END;

参数只指定类型，不指定长度 ，过程参数的三种模式： IN 传入参数（默认） OUT 传出参数 ，主要用于返回程序运行结果 IN OUT 传入传出参数

（三）案例

1.创建不带传出参数的存储过程：添加业主信息

--增加业主信息序列create sequence seq_owners start with 11;--增加业主信息存储过程create or replace procedure pro_owners_add (v_name varchar2,v_addressid number,v_housenumber varchar2, v_watermeter varchar2,v_type number)isbegininsert into T_OWNERS values( seq_owners.nextval,v_name,v_addressid,v_housenumber,v_watermeter,sysdate,v_type );commit;end;

PL/SQL 中调用存储过程

call pro_owners_add('赵伟',1,'999-3','132-7',1);

JDBC 调用存储过程

/*** 增加* @param owners*/public static void add(Owners owners){java.sql.Connection conn=null;java.sql.CallableStatement stmt=null;try {conn=BaseDao.getConnection();stmt=conn.prepareCall("{call pro_owners_add(?,?,?,?,?)}");stmt.setString(1, owners.getName());stmt.setlong(2, owners.getAddressid());stmt.setString(3, owners.getHousenumber());stmt.setString(4, owners.getWatermeter());stmt.setlong(5, owners.getOwnertypeid());stmt.execute();}catch (SQLException e) {e.printStackTrace();}finally {BaseDao.closeAll(null, stmt, conn);}return id; }

四、触发器

（一）什么是触发器

数据库触发器是一个与表相关联的、存储的 PL/SQL 程序。每当一个特定的 数据操作语句(Insert,update,delete)在指定的表上发出时，Oracle 自动地执行触发 器中定义的语句序列。触发器可用于数据确认 实施复杂的安全性检查 做审计，跟踪表上所做的数据操作等 数据的备份和同步触发器分类前置触发器（BEFORE） 后置触发器（AFTER）

（二）创建触发器的语法

语法：

CREATE [or REPLACE] TRIGGER 触发器名BEFORE | AFTER[DELETE ][[or] INSERT] [[or]UPDATE [OF 列名]]ON 表名[FOR EACH ROW ][WHEN(条件) ]declare……beginPLSQL 块End ；

FOR EACH ROW 作用是标注此触发器是行级触发器 语句级触发器

在触发器中触发语句与伪记录变量的值

（三）案例

1. 前置触发器需求：当用户输入本月累计表数后，自动计算出本月使用数 。代码：

create or replace trigger tri_account_updatenum1beforeupdate of num1on t_accountfor each rowdeclarebegin:new.usenum:=:new.num1-:new.num0;end;

2. 后置触发器

需求：当用户修改了业主信息表的数据时记录修改前与修改后的值

--创建业主名称修改日志表:用于记录业主更改前后的名称create table t_owners_log(updatetime date,ownerid number,oldname varchar2(30),newname varchar2(30));--创建后置触发器，自动记录业主更改前后日志create trigger tri_owners_logafterupdate of nameon t_ownersfor each rowdeclarebegininsert into t_owners_log values(sysdate,:old.id,:old.name,:new.name);end;

测试：

--更新数据update t_owners set name='杨小花' where id=3;commit;--查询日志表select * from t_owners_log;

五、综合案例

1. 编写 PL/SQL ，用水吨数 12 吨，业主类型为 1，计算阶梯水费。思路分析： 水费是实行阶梯计算的，我们查询价格表中业主类型为 1 的水费价格记录

minnum 为下限值 ，maxnum 为上限值。上边的记录的含义是

5 吨以下的价格为 2.45 超过 5 吨不足 10 吨的价格为 3.45 超过 10 吨以上的价格为 4.45如果吨数为 12。计算如下：

考虑到阶梯的层次可能是不确定的，所以我们需要通过游标查询出阶梯价格记 录，然后计算每一阶梯的水费，然后相加。伪代码如下：

金额=0循环价格表{if( 上限值为空 或者 总吨数<上限值 ) -- 最高阶梯{//此为最后阶梯 ，数量为超过上限值部分的吨数金额=金额+ 价格*（总吨数- 上限值）退出循环}else{//此为非最后阶梯 ，数量为区间内的吨数金额=金额+ 价格*（上限值- 下限值）} }

语句：

declarev_ownertypeid number;--业主类型 IDv_usenum2 number(10,2);--总吨数v_money number(10,2);--总金额cursor cur_pricetable(v_type number) is select * fromt_pricetable where ownertypeid=v_type;--价格游标v_pricetable t_pricetable%rowtype;--每阶梯价格对象beginv_ownertypeid:=1;v_usenum2:=12;v_money:=0;for v_pricetable in cur_pricetable(v_ownertypeid)loopif v_pricetable.maxnum is null orv_usenum2<=v_pricetable.maxnum then--最后阶梯 （总吨数-下限值）*价格v_money:=v_money+ v_pricetable.price*(v_usenum2-v_pricetable.minnum);exit;else--非最后阶梯 (上限值-下限值)* 价格v_money:=v_money+ v_pricetable.price*(v_pricetable.maxnum-v_pricetable.minnum);end if; end loop;DBMS_OUTPUT.put_line('阶梯水费金额：'||v_money);end;

2. 存储函数综合案例：创建计算阶梯水费的函数，参数为业主类型、吨数。

create or replace function fn_calmoney(v_ownertypeidnumber,v_usenum2 number)return numberisv_pricetable t_pricetable%rowtype;--价格行对象v_money number(10,2);--金额cursor cur_pricetable(v_type number) is select * fromt_pricetable where ownertypeid=v_type order by minnum;--定义游标beginv_money:=0;--金额for v_pricetable in cur_pricetable(v_ownertypeid)loop --计算阶梯水费--如果水费小于最大值，或最大值为 null 表示此阶梯为最后一个阶梯，--价格*（总吨数-此阶梯下限值）if v_usenum2<= v_pricetable.maxnum orv_pricetable.maxnum is null thenv_money:=v_money+ v_pricetable.price* ( v_usenum2 -v_pricetable.minnum); exit; else -- 价格*（此阶梯上限值-此阶梯下限值）v_money:=v_money+ v_pricetable.price*(v_pricetable.maxnum-v_pricetable.minnum ); end if;end loop; return v_money;end;

测试此函数：

select fn_calmoney(1,12) from dual;

3. 触发器综合案例：当用户输入本月累计数后，自动计算阶梯水费。

create or replace trigger tri_account_updatenum1beforeupdate of num1on t_accountfor each rowdeclarev_usenum2 number(10,2);--吨数begin--使用数赋值:new.usenum:=:new.num1-:new.num0; v_usenum2:= round( :new.usenum/1000,3);--计算吨数:new.money:=fn_calmoney(:new.ownertype,v_usenum2);--对金额列赋值end ;

修改某记录，观察结果。4. 存储过程综合案例。需求：增加业主信息时，同时在账务表（account）增加一条记录，年份与月份 为当前日期的年月，初始值（num0）为 0,其它字段信息（区域）与 t_owners 表一致 ，难点分析： 1. 如何取得年和月 用 to_char()函数 2. 如何取得区域 ID 参数中没有直接提供区域 ID，我们可以通过 addressid到 address 表查询创建存储过程：

create or replace procedure pro_owners_add(v_name varchar2,v_addressid number,v_housenumber varchar2,v_watermeter varchar2,v_type number,v_ownersuuid out number)isv_area number;--区域编号v_year char(4);--年份v_month char(2);--月份begin--提取序列值到变量select seq_owners.nextval into v_ownersuuid from dual;--根据地址编号查询区域编号select areaid into v_area from t_address whereid=v_addressid;--年份v_year:=to_char(sysdate ,'yyyy');--月份v_month:=to_char(sysdate,'mm');--增加业主信息insert into t_owners values( v_ownersuuid,v_name,v_addressid,v_housenumber,v_watermeter,sysdate,v_type );--增加账务表信息insert into t_account (id,owneruuid,ownertype,areaid,year,month,num0) values(seq_account.nextval,v_ownersuuid,v_type,v_area,v_year, v_month,0 );commit;exceptionwhen NO_DATA_FOUND thenv_ownersuuid:=-1;rollback;end;

如果觉得《Oracle(四)：PL/SQL 存储函数 存储过程 触发器》对你有帮助，请点赞、收藏，并留下你的观点哦！