回顾:
1.record类型
定义record类型,声明变量,保存s_dept表中id = 31部门信息
declare
/* 定义record类型 */ type deptrecord is record( id number, name s_dept.name%type, r_id number ); /* 声明变量 */ var_dept deptrecord; var_id number:=&id; begin
select * into var_dept from s_dept where id=var_id; dbms_output.put_line(var_dept.id||','|| var_dept.name||','|| var_dept.r_id); end;
2.动态SQL
使用动态SQL语句,删除 testdsql 表中指定id 信息
declare sqlstr varchar2(100); var_id number:=1; begin -- sqlstr:='delete from testdsql_zsm_00 where id=' -- ||var_id; sqlstr:='delete from testdsql_zsm_00 where id=:b0'; dbms_output.put_line(sqlstr); execute immediate sqlstr using var_id; commit; end;
1.游标:
1.1概念:
游标是映射在结果集中一行数据的位置指针或位置实体。
1.2作用:
处理多行结果集!
用户可以通过游标访问多行结果集中的任何一行数据,即可以对该行数据做操作,比如,把数据提取出来
1.3使用游标步骤:
1) 声明游标
在声明区声明游标名
cursor 游标名 is select语句;
var_emp empcursor%rowtype;//声明游标变量
2)打开游标
在执行区打开游标
open 游标名;
3)提取数据
执行区提取数据
fetch 游标名 into 游标变量;
4)关闭游标
当提取和处理数据结束后,应该及时关闭游标释放系统资源
close 游标名;
1.4使用游标 读取s_emp 表中的全部数据
declare /* 声明游标 */ cursor empcursor is select * from s_emp; /* 声明变量 */ var_emp empcursor%rowtype; begin /* 打开游标 */ open empcursor; /* 提取数据 */ fetch empcursor into var_emp; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); fetch empcursor into var_emp; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); fetch empcursor into var_emp; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); /* 关闭游标 */ close empcursor; end;
1.5游标属性
found 提取到数据,为真;没有提取到,则为假 在open之前,返回非法游标,fetch之前返回null
notfound 没提取到数据,为真;提取到,则为假 .. .. .. ..
isopen 游标是否是打开状态,打开返回真,失败返回假
rowcount 游标的偏移量 没有打开返回非法游标
1.6使用简单循环 配合 notfound 属性 遍历游标
declare /* 声明游标 */ cursor empcursor is select * from s_emp; /* 声明变量 */ var_emp empcursor%rowtype; begin /* 打开游标 */ open empcursor; /* 循环提取数据 */ loop fetch empcursor into var_emp; exit when empcursor%notfound; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); end loop; /* 关闭游标 */ close empcursor; end;
1.7使用while循环 配合found属性 遍历游标
declare /* 声明游标 */ cursor empcursor is select * from s_emp; /* 声明变量 */ var_emp empcursor%rowtype; begin /* 打开游标 */ open empcursor; /* 循环提取数据 */ fetch empcursor into var_emp; while empcursor%found loop dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); fetch empcursor into var_emp; end loop; /* 关闭游标 */ close empcursor; end;
1.8使用for循环遍历游标
for循环(智能循环) (自动打开游标、提取数据、关闭游标)
declare cursor empcursor is select * from s_emp; begin for var_emp in empcursor loop dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); end loop; end;
1.9带参游标
参数的数据类型不能包含长度或精度的修饰,但是可以使用%type
声明:
cursor 游标名(形参列表) is select语句 where .... ;
传参: 在打开游标时传实参
open 游标名(实参列表);
declare cursor empcursor(var_id number) is select * from s_emp where id>var_id; begin for var_emp in empcursor(10) loop dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); end loop; end;
1.10参考游标 ref cursor
动态SQL + 游标
参考游标的使用步骤: sqlstr := 'select * from s_emp'; 1) 定义一个参考游标类型 type 参考游标类型名 is ref cursor; 2) 声明参考游标类型变量 var_empcursor 参考游标类型名; 3) 把动态sql语句和参考游标变量结合 open var_empcursor for sqlstr; ...... 案例:使用参考游标 遍历s_emp表中的全部数据 declare sqlstr varchar2(100); type emprefcursor is ref cursor; var_empcursor emprefcursor; var_emp s_emp%rowtype; begin sqlstr:='select * from s_emp'; open var_empcursor for sqlstr; loop fetch var_empcursor into var_emp; exit when var_empcursor%notfound; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); end loop; close var_empcursor; end; 带有占位符的sql语句 declare sqlstr varchar2(100); type emprefcursor is ref cursor; var_empcursor emprefcursor; var_emp s_emp%rowtype; begin sqlstr:='select * from s_emp where id>:b0'; -- using后可以使用变量,也可以使用值。一般用变量 open var_empcursor for sqlstr using 10; loop fetch var_empcursor into var_emp; exit when var_empcursor%notfound; dbms_output.put_line(var_emp.id||','|| var_emp.first_name||','|| var_emp.salary); end loop; close var_empcursor; end;
2.PLSQL中的异常
2.1 系统预定义异常
Oracle 系统自身为用户提供可以在PLSQL中使用的预定义异常,用于检查用户代码失败的一般原因。
系统预定义异常由系统定义和引发,用户只需根据名字捕获和处理异常
案例: declare var_name varchar2(25); var_id number:=&id; begin select first_name into var_name from s_emp where id = var_id; select first_name into var_name from s_emp where first_name like 'M%'; dbms_output.put_line(var_name); exception when no_data_found then dbms_output.put_line('no emp'); when others then dbms_output.put_line(sqlcode||'.....'||sqlerrm); end;
常用的异常:
no_data_found : select ..into 语句没有返回行
too_many_rows: select..into 语句返回多于一行的结果集
invalid_cursor: 非法游标
cursor_already_open: 游标已打开
dup_val_on_index: 唯一索引对应的列上有重复值
zero_divide: 除数为0
案例:处理多个异常 declare var_name varchar2(25); var_id number:=&id; begin select first_name into var_name from s_emp where id = var_id; select first_name into var_name from s_emp where first_name like 'M%'; dbms_output.put_line(var_name); exception when no_data_found then dbms_output.put_line('no emp'); when too_many_rows then dbms_output.put_line(' too many rows'); when others then dbms_output.put_line(sqlcode||'.....'||sqlerrm); end;
2.2自定义异常:
2.2.1 定义异常的步骤:
1)定义异常
异常名 exception ;
2)根据条件引发异常
if 引发异常条件 then
raise 异常名;
end if;
3)捕获异常和处理异常
when 异常名 then
处理异常
2.2.2 案例:更新员工表中指定员工的工资,员工不存在时提示异常
declare var_id s_emp.id%type:=&id; /* 定义异常 */ no_result exception; begin update s_emp set salary=salary+500 where id=var_id; if sql%notfound then raise no_result; end if; commit; exception when no_result then dbms_output.put_line('no result'); end;
隐式游标:在执行一个SQL语句时,Oracle会自动创建一个隐式游标。这个游标是内存中为处理该条SQL语句的工作区。
隐士游标只要用于处理数据操作语句(insert、delete、update)的执行结果
3.存储过程 procedure
3.1匿名块和有名块
匿名块:
匿名块不保存在与数据库中;每次使用都要 进行编译;不能在其他块调用
有名块:
可以存储在数据库中;可以在任何需要的地方调用
有名块包括:procedure function package trigger
3.2存储过程的创建
语法:
create [ or replace ] procedure 过程名 [ (参数列表) ]
is|as
--临时变量
begin
exception
end;
3.3无参过程的创建和调用
1)创建:输出两数中的较大值
create or replace procedure getmax_zsm_00 is var_a number:=10; var_b number:=100; begin if var_a > var_b then dbms_output.put_line(var_a); else dbms_output.put_line(var_b); end if; end;
2)创建无参的存储过程
begin getmax_zsm_00; end;
3.4 带参的存储过程
3.4.1 使用的注意事项
1)参数的数据类型不能包含长度或精度的修饰
2)参数可以有多种模式,并且可以有默认值
参数名 {in | out |in out} 类型 {:= | default}值
参数模式:
in 输入参数 负责向过程传入值 系统默认
out 输出参数 负责传出值 实参必须是变量 不必赋值 在过程内必须赋值
in out 输入输出参数 既负责传入又负责传出 实参是赋值后的变量在过程内可以赋值
只有in模式的参数才可以有默认值
3.4.2案例:
案例:创建一个带参的存储过程,传入两个数字,输出最大值 create or replace procedure getmax_zsm_00( var_a in number:=10,var_b number) is begin if var_a > var_b then dbms_output.put_line(var_a); else dbms_output.put_line(var_b); end if; end;
3.4.3带参的存储过程的调用
declare var_x number:=123; var_y number:=12; begin getmax_zsm_00(1,10); getmax_zsm_00(var_x,100); getmax_zsm_00(var_x,var_y); -- getmax_zsm_00(1); end;
3.4.4 参数赋值方式
1) 按照位置赋值
2)按照名字赋值 参数名=> 值
declare var_x number:=123; var_y number:=12; begin getmax_zsm_00(1,10); getmax_zsm_00(var_x,100); getmax_zsm_00(var_b=>10,var_a=>200); getmax_zsm_00(var_b=>1); end;
3.4.5
3.4.5 练习:创建一个存储过程,传入两个数字,输出最大值,同时把两数之和保存在第二个变量,并测试 create or replace procedure getmax_zsm_00( var_a in number,var_b in out number) is begin if var_a > var_b then dbms_output.put_line(var_a); else dbms_output.put_line(var_b); end if; var_b:=var_a + var_b; end; -- 调用 declare var_x number:=100; begin getmax_zsm_00(10,var_x); dbms_output.put_line(var_x); end;
3.5 查看存储过程
desc 过程名;
desc user_source;
4.函数 Function
4.1 plsql 中的函数和过程的区别
1)关键字不同,过程是procedure 函数是 function
2) 过程没有返回类型和返回值,函数有返回类型和返回值
3)调用方式不同 ,过程在PLSQL中是直接调用,函数在PLSQL中需要组成表达式调用(使用变量接收返回值、作为函数或过程的参数)
4.2语法
create or replace function 函数名[参数列表] return 数据类型
is | as
-- 临时变量
begin
-- 必须有return语句
end;
4.3 创建一个函数 ,传入两个数字,返回最小值
create or replace function getmin_zsm_00( var_a number,var_b number) return number is begin if var_a < var_b then return var_a; else return var_b; end if; end; declare var_x number:=100; var_y number:=1; var_result number; begin var_result:=getmin_zsm_00(var_x,var_y); dbms_output.put_line(var_result); dbms_output.put_line(getmin_zsm_00(123,10)); end;
5.包 package
5.1概念
把一组逻辑上相关的过程、函数、变量、类型等组织到一起的一种逻辑结构
5.2 系统提供的包
dbms_output: 输入输出包
dbms_random: 随机包
dbms_job: 定时任务调度包
查看包中的数据: desc 包名; desc dbms_random; function value(low number,high number) return number 包名.成员 select dbms_random.value(1,100) from dual; 5.3 自定义包 1)定义包 package -- 类似于C中.h文件 create [or replace] package 包名 is -- 函数、过程的声明,类型的定义,变量的声明等 end[ 包名]; -- 定义一个包,包含一个过程和一个函数 create or replace package mypackage_zsm_00 is procedure getmax(var_a number,var_b number); function getmin(var_a number,var_b number) return number; end; 2) 定义包的主体(包的实现) create [or replace] package body 包名 is -- 函数、过程的实现 end[ 包名]; create or replace package body mypackage_zsm_00 is procedure getmax(var_a number,var_b number) is begin if var_a > var_b then dbms_output.put_line(var_a); else dbms_output.put_line(var_b); end if; end; function getmin(var_a number,var_b number) return number is begin if var_a < var_b then return var_a; else return var_b; end if; end; end; -- 测试 declare var_x number:=11; var_y number:=1234; var_res number; begin mypackage_zsm_00.getmax(var_x,var_y); var_res:=mypackage_zsm_00.getmin(var_x,var_y); dbms_output.put_line(var_res); end;
6.触发器 trigger
6.1概念
触发器是一种特殊的‘存储过程’,它定义了一些和数据库相关事件(如insert、delete、update等)执行时应该执行的 ‘功能代码块’,通常用来管理
复杂的完整性约束、或监控对表的修改,对数据审计功能
6.2 语法 create [or replace] trigger 触发器名 {before|after} {insert|update|delete} on 表名 [for each row] declare begin exception end; 6.3 语句级触发器 emp_zsm_00 create or replace trigger tri_emp_zsm_00 before update on emp_zsm_00 declare begin dbms_output.put_line('table updated'); end; update emp_zsm_00 set salary=salary + 100 where id=1; update emp_zsm_00 set salary=salary + 100 where id<1; update emp_zsm_00 set salary=salary + 100 where id>1; 6.4 行级触发器 create or replace trigger tri_emp_zsm_00 before update on emp_zsm_00 for each row declare begin dbms_output.put_line('table updated'); end; update emp_zsm_00 set salary=salary + 100 where id=1; update emp_zsm_00 set salary=salary + 100 where id<1; update emp_zsm_00 set salary=salary + 100 where id>1; 标识符: :old 原值标识符 :new 新值标识符 表名%rowtype类型 insert :new update :old :new delete :old create or replace trigger tri_emp_zsm_00 before update on emp_zsm_00 for each row declare begin dbms_output.put_line('table updated'); dbms_output.put_line('old:'||:old.id||','||:old.salary); dbms_output.put_line('new:'||:new.id||','||:new.salary); end; update emp_zsm_00 set salary=salary + 100 where id=1; update emp_zsm_00 set salary=salary + 100 where id<1; update emp_zsm_00 set salary=salary + 100 where id>1; 注意:触发器中不能包含任何有关事务的操作 事务 谁发起 谁结束 6.5 使用触发器产生主键的值 -- 创建一个表 create table testtrigger_zsm_00( id number primary key,name varchar2(20)); -- 创建一个序列 create sequence trigger_id_zsm_00; -- 创建触发器 create or replace trigger tri_pk_zsm_00 before insert on testtrigger_zsm_00 for each row begin select trigger_id_zsm_00.nextval into :new.id from dual; end; -- 插入一条语句 insert into testtrigger_zsm_00(name) values('test1');
练习: 1.使用游标 遍历s_dept表中的全部数据 2.创建一个存储过程,传入数字n(大于1的整数),计算1..n的累加和,保存在第二个参数,并测试。