[独孤九剑]Oracle知识点梳理（九）数据库常用对象之常见package

1 create or replace package pkg_person
2 is
3 　　Type refTable is ref cursor;
4 　　function fun_GetPersonName(argName in varchar2,argGender out varchar2) return varchar2;
5 　　procedure proc_GetPersonList(argName in varchar2,argGender in varchar2,argResult out refTable);
6 end pkg_person;

 1 create or replace package pkg_person
 2 is
 3 　　function fun_GetPersonName(argName in varchar2,argGender out varchar2) return varchar2
 4 　　as
 5 　　　　Result person.name%TYPE;
 6 　　begin
 7 　　　　select name,gender into Result,argGender from person where name=argName and rownum=1;
 8 　　　　return Result;--返回值
 9 　　end fun_GetPersonName;
10 
11 　　procedure proc_GetPersonList(argName in varchar2,argMsg out varchar2,argResult out refTable)
12 　　as 
13 　　　　vName varchar2(64);-- 定义变量，要设置长度 
14 　　begin
15 　　　　vName:=argName; --赋值，每条语句要以分号结束
16 　　　　open argResult is select * from person where name like vName||‘%‘;--将查询结果记录到返回游标中
17 　　　　--当然，还可以进行其他复杂的判断，转换等操作
18 　　　　argMsg:=‘正常‘;
19 　　　　commit;
20 
21 　　　　Exception
22 　　　　　　when others then argMsg=‘异常‘;
23 　　　　　　rollback; --如果之前执行的是事务性的语句，有必要保证数据安全
24 
25 　　end proc_GetPersonList;
26 
27 end pkg_person;