以下的文章主要讲述的是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;
上述的相关内容就是对Oracle存储过程的用法的描述,希望会给你带来一些帮助在此方面。
【编辑推荐】