oracle 存储过程

Oracle 存储过程

 

 

简要记录存储过程语法与Java程序的调用方式

　　一 存储过程

　　　　首先，我们建立一个简单的表进行存储过程的测试

create table 
xuesheng(id integer, xing_ming varchar2(25), yu_wen number, shu_xue number);

insert into xuesheng values(1,'zhangsan',80,90)
insert into xuesheng values(2,'lisi',85,87)

1）无返回值的存储过程

create or replace procedure xs_proc_no is
begin
  insert into xuesheng values (3, 'wangwu', 90, 90);
  commit;
end xs_proc_no;

2）有单个数据值返回的存储过程

create or replace procedure xs_proc(temp_name in varchar2,
                                    temp_num  out number) is
  num_1 number;
  num_2 number;
begin
  select yu_wen, shu_xue
    into num_1, num_2
    from xuesheng
   where xing_ming = temp_name;
  --dbms_output.put_line(num_1 + num_2);
  temp_num := num_1 + num_2;
end;

其中，以上两种与sql server基本类似，而对于返回数据集时，上述方法则不能满足我们的要求。在Oracle中，一般使用ref cursor来返回数据集。示例代码如下：

3）有返回值的存储过程(列表返回)

首先，建立我们自己的包。并定义包中的一个自定义ref cursor

create or replace package mypackage as
  type my_cursor is ref cursor;
end mypackage;

在定义了ref cursor后，可以书写我们的程序代码

create or replace procedure xs_proc_list(shuxue   in number,
                                         p_cursor out mypackage.my_cursor) is
begin
  open p_cursor for
    select * from xuesheng where shu_xue > shuxue;
end xs_proc_list;

二、程序调用

在本节中，我们使用java语言调用存储过程。其中，关键是使用CallableStatement这个对象，代码如下：

?

String oracleDriverName = "oracle.jdbc.driver.OracleDriver";

// 以下使用的Test就是Oracle里的表空间

String oracleUrlToConnect = "jdbc:oracle:thin:@127.0.0.1:1521:orcl";

Connection myConnection = null;

try {

Class.forName(oracleDriverName);

} catch (ClassNotFoundException ex) {

ex.printStackTrace();

}

try {

myConnection = DriverManager.getConnection(oracleUrlToConnect,

"xxxx", "xxxx");//此处为数据库用户名与密码

} catch (Exception ex) {

ex.printStackTrace();

}

try {

CallableStatement proc=null;

proc=myConnection.prepareCall("{call xs_proc(?,?)}");

proc.setString(1, "zhangsan");

proc.registerOutParameter(2, Types.NUMERIC);

proc.execute();

String teststring=proc.getString(2);

System.out.println(teststring);

} catch (Exception ex) {

ex.printStackTrace();

}

对于列表返回值的存储过程，在上述代码中做简单修改。如下

CallableStatement proc=null;
            proc=myConnection.prepareCall("{call getdcsj(?,?,?,?,?)}");
            proc.setString(1, strDate);
            proc.setString(2, jzbh);
            proc.registerOutParameter(3, Types.NUMERIC);
            proc.registerOutParameter(4, OracleTypes.CURSOR);
            proc.registerOutParameter(5, OracleTypes.CURSOR);
            proc.execute();
            ResultSet rs=null;
            int total_number=proc.getInt(3);
            rs=(ResultSet)proc.getObject(4);

上述存储过程修改完毕。另外，一个复杂的工程项目中的例子：查询一段数据中间隔不超过十分钟且连续超过100条的数据。即上述代码所调用的getdcsj存储过程

?

create or replace procedure getDcsj(var_flag in varchar2,

var_jzbh in varchar2,

number_total out number,

var_cursor_a out mypackage.my_cursor,

var_cursor_b out mypackage.my_cursor) is

total number;

cursor cur is

select sj, flag

from d_dcsj

where jzbh = var_jzbh

order by sj desc

for update;

last_time date;

begin

for cur1 in cur loop

if last_time is null or cur1.sj >= last_time - 10 / 60 / 24 then

update d_dcsj set flag = var_flag where current of cur;

last_time := cur1.sj;

else

select count(*) into total from d_dcsj where flag = var_flag;

dbms_output.put_line(total);

if total < 100 then

update d_dcsj set flag = null where flag = var_flag;

last_time := null;

update d_dcsj set flag = var_flag where current of cur;

else

open var_cursor_a for

select *

from d_dcsj

where flag = var_flag

and jzbh = var_jzbh

and zh = 'A'

order by sj desc;

number_total := total;

open var_cursor_b for

select *

from d_dcsj

where flag = var_flag

and jzbh = var_jzbh

and zh = 'B'

order by sj desc;

number_total := total;

exit;

end if;

end if;

end loop;

select count(*) into total from d_dcsj where flag = var_flag;

dbms_output.put_line(total);

if total < 100 then

open var_cursor_a for

select * from d_dcsj where zh = 'C';

open var_cursor_b for

select * from d_dcsj where zh = 'C';

else

open var_cursor_a for

select *

from d_dcsj

where flag = var_flag

and jzbh = var_jzbh

and zh = 'A'

order by sj desc;

number_total := total;

open var_cursor_b for

select *

from d_dcsj

where flag = var_flag

and jzbh = var_jzbh

and zh = 'B'

order by sj desc;

number_total := total;

end if;

commit;

end;

/