ORACLE 存储过程详解(转)
一.在plsql中创建一个存储过程
本文转自 https://blog.csdn.net/zezezuiaiya/article/details/79557621
打开plsql,右键procedures,新建。
如果新建毫无反应
直接文件-新建-程序窗口-空白,新建一个程序窗口:
存储过程创建语法:
-
create [or replace] procedure 存储过程名(param1 in type,param2 out type)
-
as
-
变量1 类型(值范围);
-
变量2 类型(值范围);
-
Begin
-
Select count(*) into 变量1 from 表A where列名=param1;
-
-
If (判断条件) then
-
Select 列名 into 变量2 from 表A where列名=param1;
-
Dbms_output。Put_line(‘打印信息’);
-
Elsif (判断条件) then
-
Dbms_output。Put_line(‘打印信息’);
-
Else
-
Raise 异常名(NO_DATA_FOUND);
-
End if;
-
-
Exception
-
When others then
-
Rollback;
-
End;
二:实例:写存储过程(例子)
-
--创建一个名为p_contract_purchase_import的存储过程
-
create or replace procedure p_contract_purchase_import(
-
--以下写存储过程的外部参数(传入的参数)
-
--格式为:参数名 in 参数类型
-
--注意,这里的varchar不标注大小
-
V_IN_SUBCOMPANYID in VARCHAR2, --专业分公司
-
V_IN_PURCONTRACTMONEY in NUMBER, --采购合同金额
-
V_IN_PARTYBNAME in VARCHAR2, --供应商名称
-
--设置一个返回值
-
v_o_ret out number --返回结果0:成功;1:失败; 4:查不到供应商; 5:添加关联失败;6:新增采购合同失败
-
-
)
-
-
--以下写内部参数
-
--格式为:参数名称 参数类型
-
--注意,这里的varchar需要标注大小
-
as
-
V_SUPPLIERID INTEGER; --供应商编号
-
V_PARTYBACCOUNT VARCHAR2(100);--收款账号
-
V_SQLERRM VARCHAR2(4000);--错误详情
-
-
--存储过程开始
-
begin
-
--为某些变量赋初值
-
--格式为 变量名 := 值
-
v_o_ret := 1;
-
V_SUPPLIERID := '';
-
V_PARTYBACCOUNT := '';
-
-
--写具体的操作语句(sql)
-
--if语句
-
if(V_IN_PARTYBNAME is not null) then
-
begin
-
select t.SUPPLIERID,t.PARTYBACCOUNT,t.PARTYBBANK ,t.PARTYBNAME
-
into V_SUPPLIERID,V_PARTYBACCOUNT,V_PARTYBBANK,V_PARTYBNAME
-
from T_SUPPLIER t where t.PARTYBNAME=trim(V_IN_PARTYBNAME) and t.SUBCOMPANYID=trim(V_IN_SUBCOMPANYID);
-
--抛异常
-
exception
-
when others then
-
v_o_ret := 4 ; --找不到该供应商
-
V_PARTYBNAME := V_IN_PARTYBNAME;
-
-
-- 将异常原因写入存储过程日志表
-
V_SQLERRM := SQLERRM;
-
INSERT INTO T_LOG_DBERR
-
(ERRTIME, ERRMODEL, ERRDESC)
-
VALUES
-
(SYSDATE,
-
'PROCEDURES',
-
'p_contract_purchase_import:ret=' || v_o_ret ||','||
-
V_SQLERRM);
-
COMMIT;
-
end ;
-
end if;
-
-
······
-
-
end ;
-
commit;
-
v_o_ret :=0 ;
-
-
-
return;
-
-
EXCEPTION
-
WHEN OTHERS THEN
-
ROLLBACK;
-
-- 插入异常原因
-
V_SQLERRM := SQLERRM;
-
INSERT INTO T_LOG_DBERR
-
(ERRTIME, ERRMODEL, ERRDESC)
-
VALUES
-
(SYSDATE,
-
'PROCEDURES',
-
'p_contract_purchase_import:ret=' || v_o_ret ||','||
-
V_SQLERRM);
-
COMMIT;
-
-
--存储过程结束
-
end p_contract_purchase_import;
1.注意begin 和 end成对
2.务必将错误内容打印出来。否则,有的时候,就算调试看出来时哪一个语句的错误,也闹不明白错在哪里
三.存储过程调试
1.按F8或是菜单栏第三行第二个执行按键编译存储过程。此时,如果有语法上的明显错误,plsql会给予提示。
2.在procedures中找到要调试的存储过程,右键,选测试。注意,要记得勾选添加调试信息啊。
3.打开调试窗口,填写输入参数
4.点测试窗口的调试按键(如图中画圈的位置)开始调试
5.逐步调试,如下图:
图中1:点击单步调试,主要就是使用这个来进行调试。执行到的代码会高亮显示,此外,注意图中4的位置,可以在这里输入变量的名字,来查看变量的当前值。
图中2/3:分别为跳出单步执行和全部执行,调试时不推荐使用。
单步调试过程中,如果执行到哪一步直接跳转到了exception结束,那么,就是这一步出来问题,可以记住这个位置,再次调试,通过查看这附近变量的值,以及查看错误日志记录的错误详情,来确认出错的具体原因并进行修改。
四.在java中调用
存储过程调试好之后,就可以在java中调用该存储过程。
-
logger.info("调用存储过程p_contract_purchase_import");
-
//存储过程名称。有多少个传入参数打几个问号(包括v_o_ret)
-
String procName="{Call p_contract_purchase_import(?,?,?,?) }";
-
DataSource ds = SessionFactoryUtils.getDataSource(this.getHibernateTemplate().getSessionFactory());
-
Connection conn = null;
-
CallableStatement call = null;
-
//ResultSet rs =null;
-
-
try
-
{
-
//创建连接
-
conn = ds.getConnection();
-
call = conn.prepareCall(procName);
-
//传入数据
-
call.setString(1, (importList.get(0)).trim());
-
if(ratio_amount==null) {
-
call.setString(2,null);
-
} else {
-
call.setLong(2, ratio_amount);
-
}
-
call.setString(3, (importList.get(2)).trim());
-
-
//第四个参数是作为返回值存在的
-
call.registerOutParameter(4, Types.BIGINT);
-
//执行存储过程
-
call.executeUpdate();
-
//获取返回的结果
-
ret = call.getInt(17) ;
-
logger.info("ret:"+ret); ;//call.getInt(6));
-
-
try
-
{
-
//关闭连接
-
call.close();
-
call = null ;
-
conn.close();
-
conn = null ;
-
} catch (SQLException e) {
-
// TODO Auto-generated catch block
-
}
-
-
}catch (SQLException e){
-
logger.error("打开存储过程错误:",e);
-
}
-
finally{
-
try {
-
if (call != null) {
-
call.close();
-
}
-
if (conn != null) {
-
conn.close();
-
}
-
} catch (SQLException e) {
-
// TODO Auto-generated catch block
-
conn = null;
-
}
-
}
需要注意的是,call.setLong()不可以传入空值。如果内容有可能为空的话,set之前需要判断是否为空,不为空才能使用setLong()方法,否则,要使用setString方法。
五:注意事项:
- 存储过程参数不带取值范围,in表示传入,out表示输出
- 变量带取值范围,后面接分号
- 在判断语句前最好先用count(*)函数判断是否存在该条操作记录
- 用select … into … 给变量赋值
- 在代码中抛异常用 raise+异常名
已命名的异常:
命名的系统异常 | 产生原因 |
---|---|
ACCESS_INTO_NULL | 未定义对象 |
CASE_NOT_FOUND | CASE 中若未包含相应的 WHEN ,并且没有设置ELSE 时 |
COLLECTION_IS_NULL | 集合元素未初始化 |
CURSER_ALREADY_OPEN | 游标已经打开 |
DUP_VAL_ON_INDEX | 唯一索引对应的列上有重复的值 |
INVALID_CURSOR | 在不合法的游标上进行操作 |
INVALID_NUMBER | 内嵌的 SQL 语句不能将字符转换为数字 |
NO_DATA_FOUND | 使用 select into 未返回行,或应用索引表未初始化的 |
TOO_MANY_ROWS | 执行 select into 时,结果集超过一行 |
ZERO_DIVIDE | 除数为 0 |
SUBSCRIPT_BEYOND_COUNT | 元素下标超过嵌套表或 VARRAY 的最大值 |
SUBSCRIPT_OUTSIDE_LIMIT | 使用嵌套表或 VARRAY 时,将下标指定为负数 |
VALUE_ERROR | 赋值时,变量长度不足以容纳实际数据 |
LOGIN_DENIED | PL/SQL 应用程序连接到 oracle 数据库时,提供了不正确的用户名或密码 |
NOT_LOGGED_ON | PL/SQL 应用程序在没有连接 oralce 数据库的情况下访问数据 |
PROGRAM_ERROR | PL/SQL 内部问题,可能需要重装数据字典& pl./SQL系统包 |
ROWTYPE_MISMATCH | 宿主游标变量与 PL/SQL 游标变量的返回类型不兼容 |
SELF_IS_NULL | 使用对象类型时,在 null 对象上调用对象方法 |
STORAGE_ERROR | 运行 PL/SQL 时,超出内存空间 |
SYS_INVALID_ID | 无效的 ROWID 字符串 |
TIMEOUT_ON_RESOURCE | Oracle 在等待资源时超时 |
六:基本语法
1. 基本结构
-
CREATE OR REPLACE PROCEDURE 存储过程名字
-
(
-
参数1 IN NUMBER,
-
参数2 IN NUMBER
-
) IS
-
变量1 INTEGER :=0;
-
变量2 DATE;
-
BEGIN
-
--执行体
-
END 存储过程名字;
2. SELECT INTO STATEMENT
将select查询的结果存入到变量中,可以同时将多个列存储多个变量中,必须有一条记录,否则抛出异常(如果没有记录抛出NO_DATA_FOUND)
例子:
-
BEGIN
-
SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx;
-
EXCEPTION
-
WHEN NO_DATA_FOUND THEN
-
xxxx;
-
END;
3. IF 判断
-
IF V_TEST=1 THEN
-
BEGIN
-
do something
-
END;
-
END IF;
4. while 循环
-
WHILE V_TEST=1 LOOP
-
BEGIN
-
XXXX
-
END;
-
END LOOP;
5. 变量赋值
V_TEST := 123;
6. 用for in 使用cursor
-
IS
-
CURSOR cur IS SELECT * FROM xxx;
-
BEGIN
-
FOR cur_result in cur LOOP
-
BEGIN
-
V_SUM :=cur_result.列名1+cur_result.列名2
-
END;
-
END LOOP;
-
END;
7. 带参数的cursor
-
CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID;
-
OPEN C_USER(变量值);
-
LOOP
-
FETCH C_USER INTO V_NAME;
-
EXIT FETCH C_USER%NOTFOUND;
-
do something
-
END LOOP;
-
CLOSE C_USER;
8. 用pl/sql developer debug
连接数据库后建立一个Test WINDOW,在窗口输入调用SP的代码,F9开始debug,CTRL+N单步调试
八:关于oracle存储过程的若干问题备忘
1.在oracle中,数据表别名不能加as,如:
-
select a.appname from appinfo a;-- 正确
-
select a.appname from appinfo as a;-- 错误
也许,是怕和oracle中的存储过程中的关键字as冲突的问题吧
2.在存储过程中,select某一字段时,后面必须紧跟into,如果select整个记录,利用游标的话就另当别论了。
-
select af.keynode into kn from APPFOUNDATION af
-
where af.appid=aid and af.foundationid=fid;-- 有into,正确编译
-
select af.keynode from APPFOUNDATION af
-
where af.appid=aid and af.foundationid=fid;-- 没有into,编译报错,提示:Compilation
-
-
Error: PLS-00428: an INTO clause is expected in this SELECT statement
3.在利用select…into…语法时,必须先确保数据库中有该条记录,否则会报出”no data found”异常。
可以在该语法之前,先利用select count(*) from 查看数据库中是否存在该记录,如果存在,再利用select…into…
4.在存储过程中,别名不能和字段名称相同,否则虽然编译可以通过,但在运行阶段会报错
-
--正确
-
select keynode into kn from APPFOUNDATION where appid=aid and foundationid=fid;
-
-
--错误
-
select af.keynode into kn from APPFOUNDATION af
-
where af.appid=appid and af.foundationid=foundationid;
-
-- 运行阶段报错,提示ORA-01422:exact fetch returns more than requested number of rows
5.在存储过程中,关于出现null的问题
假设有一个表A,定义如下:
-
create table A(
-
id varchar2(50) primary key not null,
-
vcount number(8) not null,
-
bid varchar2(50) not null -- 外键
-
);
如果在存储过程中,使用如下语句:
select sum(vcount) into fcount from A where bid='xxxxxx';
如果A表中不存在bid=”xxxxxx”的记录,则fcount=null(即使fcount定义时设置了默认值,如:fcount number(8):=0依然无效,fcount还是会变成null),这样以后使用fcount时就可能有问题,所以在这里最好先判断一下:
-
if fcount is null then
-
fcount:=0;
-
end if;
这样就一切ok了。