【转载】oracle包和存储过程实例_MySQL, Oracle及数据库讨论区_Weblogic技术|Tuxedo技术|中间件技术|Oracle论坛|JAVA论坛|Linux/Unix技术|hadoop论坛

总帖数

每页帖数

1/1页

返回列表

查看: 4222 | 回复: 0

主题： 【转载】oracle包和存储过程实例

众里寻他

注册用户

等级：少尉
经验：383
发帖：27
精华：1
注册：2013-2-25
状态：离线
发送短消息息给众里寻他

加好友发送短消息息给众里寻他

发消息

发表于：

2013-2-27 9:49:29 | [全部帖] [楼主帖]

楼主

oracle package 小例子，以及一个存储过程的应用

Java代码

create or replace package query_project_pck
as
type pro_ref_cursor_type is ref cursor;
type pro_table is table of varchar(100);
type pro_record is record(name varchar(100),id varchar(100));
procedure pro_procedure(name varchar,id varchar);
end query_project_pck; -- define package
create or replace procedure query_pro(pro_result out query_project_pck.pro_ref_cursor_type) is
begin
open pro_result for
select pro.xmid, pro.xmmc,pro.updatetime from T_LPROMIS_XMGL_GBBXMXX pro return pro_record_type;
end; --create procedure using ref cursor
-- test procedure using ref cursor
declare
pro_cursor query_project_pck.pro_ref_cursor_type;
id T_LPROMIS_XMGL_GBBXMXX.Xmid%type;
name T_LPROMIS_XMGL_GBBXMXX.Xmmc%type;
pro_record pro_record_type;
begin
query_pro(pro_cursor);
loop
fetch pro_cursor
into pro_record;
exit when pro_cursor%notfound;
dbms_output.put_line(pro_record.id || ' ' || pro_record.name || ' '|| pro_record.updatetime );
end loop;
close pro_cursor;
--for pro_record in pro_cursor loop
-- dbms_output.put_line(pro_record.xmid,pro_record.xmmc);
--end loop;
end;

操作引用/回复

总帖数

每页帖数

1/1页

返回列表

Weblogic中间件技术论坛