Oracle 函数 Function

定义

     函数用于计算和返回一个结果值，把经常需要进行的计算写成函数,函数的调用是表达式的一部分。
     函数与过程在创建的形式上有些相似，也是编译后放在内存中供用户使用。
     函数必须有一个返回值，而过程没有做强制的规定。
     return在声明部分需要定义一个返回参数的类型，而在函数体中必须有一个return语句。如果函数结束时还没有遇到返回语句，就会发生错误。

创建

create or replace function fn_first
return varchar2    --不需要长度
is
result varchar2(100);    --declare，长度定义。
begin
null;
return(result);
end fn_first;

调用方法一

declare
var_str varchar(100);
begin
var_str := fn_first(); 
dbms_output.put_line(var_str);　　

 调用方法二

select  fn_first() from dual;

项目应用

   带输入参数

create or replace function sf_pub_strminusint
(p_beg in varchar2,
 p_end in varchar2
)
return int
/**
auth   
func  两个随机号相减得数
**/
as
     v_ret  int;
     vs_geb  varchar2(30);
     vs_str  varchar2(30);
     vn_beg  int;
     vs_dne  varchar2(30);
     vn_end  int;
begin
    --反转
    select reverse(p_beg) into vs_geb from dual;
    --正则
    select regexp_substr(vs_geb,'[0-9]+',1,1) into vs_str from dual;
    --取得随机码
    select to_number(reverse(vs_str)) into vn_beg from dual;
    --止号
    select reverse(p_end) into vs_dne from dual;
    --正则
    select regexp_substr(vs_dne,'[0-9]+',1,1) into vs_str from dual;
    --取得随机码
    select to_number(reverse(vs_str)) into vn_end from dual;
    v_ret:=vn_end-vn_beg+1;
    return v_ret;
end sf_pub_strminusint;　　

  以对象返回数据列表

create or replace function fn_test
( pid in number
)
return
  tabtest
is
 result tabtest =tabtest();
 userid number(12);
 vname varchar(200);
 orgid  number(12);
 type tab is table of number;
 tab_test1 tab;
 /***
 create or replace type ctest as object
 (
  cuser  number(12),  --不可注释
  cname  varchar(200),
  corg   number(12)
 )
 create or replace type tabtest is table of ctest
 测试
 select  from table(cast(fn_test({0})as tabtest))
 ***/
begin
 select id bulk collect into tab_test1 from tuser where id=pid;
 result =tabtest();
 for i in 1..tab_test1.count loop
  select id,name,belongorg into userid,vname,orgid from tuser where id=tab_test1(i);
 
  result.extend;
  result(result.count)=ctest(null,null,null);
  result(result.count).cuser=userid;
  result(result.count).cname=vname;
  result(result.count).corg =orgid;
  end loop;
  return(result);
  end fn_test;