Oracle存储过程的实际用法解剖

以下的文章主要讲述的是Oracle存储过程的实际的用法，本文是以想关的实际应用代码的方式来引出Oracle存储过程的实际操作流程，以下就是相关内容的具体描述，望你浏览之后会有所收获。

create table stuInfo  
(  
stuID int primary key,  
stuName varchar2(20)  
)  
create or replace procedure proc1  
is  
begin  
insert into stuInfo values(1,'liheng');  
end;  
create or replace procedure proc2  
(  
v_ID int,  
v_Name varchar2  
)  
is  
begin  
insert into stuInfo values(v_ID,v_Name);  
commit;

记得要提交

end;  
create or replace procedure proc3  
(  
v_ID int,  
v_Name out varchar2  
)  
is  
varName stuInfo.Stuname%type;  
begin  
select stuName into varName from stuInfo where stuID=v_ID;  
v_Name:=varName;  
end;

返回全部记录

create or replace package PKG_STUINFO is  
type stuInfoCursorType is ref cursor;  
procedure getStuInfo (stuInfoCursor out stuInfoCursorType);  
end;  
create or replace package body PKG_STUINFO is  
procedure getStuInfo (stuInfoCursor out stuInfoCursorType)  
is  
var_cursor stuInfoCursorType;  
begin  
open var_cursor for select * from stuInfo;  
stuInfoCursor:=var_cursor;  
end;  
end;

根据编号返回记录

create or replace package PKG_STUINFO is  
type stuInfoCursorType is ref cursor;  
procedure getStuInfo (v_ID int,stuInfoCursor out stuInfoCursorType);  
end;  
create or replace package body PKG_STUINFO is  
procedure getStuInfo (v_ID int,stuInfoCursor out stuInfoCursorType)  
is  
var_cursor stuInfoCursorType;  
begin  
if v_ID=0 then  
open var_cursor for select * from stuInfo;  
else  
open var_cursor for select * from stuInfo where stuID=v_ID;  
end if;  
stuInfoCursor:=var_cursor;  
end;  
end;

根据姓名返回记录

create or replace package PKG_STUINFO is  
type stuInfoCursorType is ref cursor;  
procedure getStuInfo (v_Name varchar2,stuInfoCursor out stuInfoCursorType);  
end;  
create or replace package body PKG_STUINFO is  
procedure getStuInfo (v_Name varchar2,stuInfoCursor out stuInfoCursorType)  
is  
var_cursor stuInfoCursorType;  
begin  
if v_Name =' ' then  
open var_cursor for select * from stuInfo;  
else  
open var_cursor for select * from stuInfo where stuName like '%'||v_Name||'%';  
end if;  
stuInfoCursor:=var_cursor;  
end;  
end;