Oracle関数Function

定義＃テイギ＃
関数は結果値を計算して返し、よく必要な計算を関数として書き、関数の呼び出しは式の一部です.関数はプロシージャと作成形式が似ていますが、コンパイル後にメモリに保存してユーザーが使用できるようにします.関数には戻り値が必要ですが、プロシージャには強制的な規定はありません.RETURN宣言セクションでは、戻りパラメータのタイプを定義する必要がありますが、関数体にはRETURN文が必要です.関数の終了時に戻り文が見つからない場合は、エラーが発生します.
作成

create or replace function Fn_First
return varchar2    --     
is
Result varchar2(100);    --declare，    。
begin
NULL;
return(Result);
end Fn_First;

呼び出し方法1

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

呼び出し方法2

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;