Oracle自定义函数1

用户定义函数是存储在数据库中的代码块，可以把值返回到调用程序。调用时如同系统函数一样，如max(value)函数，其中，value被称为参数。函数参数有3种类型。

IN 参数类型：表示输入给函数的参数。

OUT 参数类型：表示参数在函数中被赋值，可以传给函数调用程序。

IN OUT参数类型：表示参数既可以传值也可以被赋值。

１、语法格式：

SQL语法方式创建的语法格式为：

CREATE OR REPLACE FUNCTION function_name         /*函数名称*/
(
Parameter_name1,mode1 datatype1,　　　　　　　　　　　 /*参数定义部分*/
Parameter_name2,mode2 datatype2,
Parameter_name3,mode3 datatype3
…
)
RETURN return_datatype　　　　　　　　　　　　　　　　/*定义返回值类型*/
IS/AS
BEGIN
       Function_body　　　　　　　　　　　　　　　　　 /*函数体部分*/
      RETURN scalar_expression                        /*返回语句*/
END function_name;

说明：

function_name:：用户定义的函数名。函数名必须符合标示符的定义规则，对其所有者来说，该名在数据库中是唯一的。

parameter：用户定义的参数。用户可以定义一个或多个参数。

mode：参数类型。

datatype：用户定义参数的数据类型。

return_type:：用户返回值的数据类型。

函数返回scalar_expression表达式的值，function_body函数体由pl/sql语句构成。

２、示例

函数代码：

create or replace function T01001_count
return number
is
count_T01001 number;
begin
select count(*) into count_T01001 from T01001;
return(count_T01001);
end T01001_count;                  --记得一定要打分号

调用：
declare
i number;
begin
i:=T01001_count();
dbms_output.put_line(to_char(i));
end;　　　　　　　　　　　　　　　　 --记得一定要打分号

注意：

(1)    如果函数没有参数，那么函数名后不应该要括号；

(2)    创建函数的时候end后面一定要记得写函数名

--没有参数的函数    
create or replace function get_user return varchar2 is   
  v_user varchar2(50);    
begin   
  select username into v_user from user_users;    
  return v_user;    
end get_user;    
   
--测试    
方法一    
select get_user from dual;    
   
方法二    
SQL> var v_name varchar2(50)    
SQL> exec :v_name:=get_user;    
   
PL/SQL 过程已成功完成。    
   
SQL> print v_name    
   
V_NAME    
------------------------------    
TEST    
   
方法三    
SQL> exec dbms_output.put_line(‘当前数据库用户是：‘||get_user);    
当前数据库用户是：TEST    
   
PL/SQL 过程已成功完成。   
--没有参数的函数
create or replace function get_user return varchar2 is
v_user varchar2(50);
begin
select username into v_user from user_users;
return v_user;
end get_user;
--测试
方法一
select get_user from dual;
方法二
SQL> var v_name varchar2(50)
SQL> exec :v_name:=get_user;
PL/SQL 过程已成功完成。
SQL> print v_name
V_NAME
------------------------------
TEST
方法三
SQL> exec dbms_output.put_line(‘当前数据库用户是：‘||get_user);
当前数据库用户是：TEST
PL/SQL 过程已成功完成。
Sql代码 
--带有IN参数的函数    
create or replace function get_empname(v_id in number) return varchar2 as   
  v_name varchar2(50);    
begin   
  select name into v_name from employee where id = v_id;    
   return v_name;    
exception    
  when no_data_found then   
    raise_application_error(-20001, ‘你输入的ID无效！‘);    
end get_empname;   
--带有IN参数的函数
create or replace function get_empname(v_id in number) return varchar2 as
v_name varchar2(50);
begin
select name into v_name from employee where id = v_id;
return v_name;
exception
when no_data_found then
raise_application_error(-20001, ‘你输入的ID无效！‘);
end get_empname;

附：

函数调用限制
1、SQL语句中只能调用存储函数(服务器端),而不能调用客户端的函数
2、SQL只能调用带有输入参数,不能带有输出,输入输出函数
3、SQL不能使用PL/SQL的特有数据类型(boolean,table,record等)
4、SQL语句中调用的函数不能包含INSERT,UPDATE和DELETE语句

查看函数院源代码
oracle会将函数名及其源代码信息存放到数据字典中user_source 
select text from user_source where name=‘GET_EMPNAME‘;

删除函数
drop function get_empname

　　不带任何参数

　　create or replace function get_user return varchar2 is

　　Result varchar2(50);

　　begin

　　select username into Result from user_users;

　　return(Result);

　　end get_user;

　　执行:

　　带in参数的

　　create or replace function get_sal(empname in varchar2) return number is

　　Result number;

　　begin

　　select sal into Result from emp where ename=empname;

　　return(Result);

　　end get_sal;

　　执行: SQL> var sal number

　　SQL> exec :sal:=get_sal(‘scott‘);

　　带out参数的函数

　　create or replace function get_info(e_name varchar2,job out varchar2) return number is

　　Result number;

　　begin

　　select sal,job into Result,job from emp where ename=e_name;

　　return(Result);

　　end get_info;

　　执行: SQL> var job varchar2(20)

　　SQL> var dname varchar2(20)

　　SQL> exec :dname:=get_info(‘SCOTT‘,:job)

　　带in out参数的函数

　　create or replace function result(num1 number,num2 in out number) return number is

　　v_result number(6);

　　v_remainder number;

　　begin

　　v_result :=num1/num2;

　　v_remainder :=mod(num1,num2);

　　num2 :=v_remainder;

　　return(v_result);

　　Exception

　　when zero_divide then

　　raise_application_error(-20000,‘不能除0‘);

　　end result;

　　执行: var result1 number;

　　var result2 number;

　　exec :result2:=30

　　exec :result1:=result(100,:result2)

　　eg:

　　1　、一个最简单的自定义函数Fun_test1的定义。

　　create or replace function Fun_test1(p_1 number)--Fun_test1是函数名，有一个输入参数p_1，是number型的。返回值也是number型的

　　return number

　　IS

　　begin

　　if p_1>0 then

　　return 1;

　　elsif p_1=0 then

　　return 0;

　　else

　　return -1;

　　end if;

　　end;

　　--这个函数只是可以知道自定义函数的定义和格式。其实没什么用途。

　　2、Fun_test1自定义函数的调用的存储过程Pro_Fun_test1_1示例：

　　create or replace procedure Pro_Fun_test1_1(

　　p1_in in number,

　　p2_out out number

　　)

　　AS

　　begin

　　p2_out:=Fun_test1(p1_in);

　　end Pro_Fun_test1_1;

　　--一个输入参数，一个输出参数

　　3、Fun_test1自定义函数的调用的存储过程Pro_Fun_test1_2示例：

　　create or replace procedure Pro_Fun_test1_2(

　　p1_in in number,

　　p2_out out number

　　)

　　AS

　　t_1 number;

　　begin

　　select Fun_test1(p1_in)+100 INTO p2_out

　　from bill_org where org_ID=1;

　　end Pro_Fun_test1_2;

　　--自定义函数的调用方法和Oracle的其它内部函数是一样的。

　　二、包的定义和使用入门

　　包一般是过程和函数的集合,对过程和函数进行更好的封装,一般不针对字段。

　　包的构成包括包头和包体。

　　1、包头的定义：

　　包头仅仅只是对包中的方法进行说明,而没有实现

　　语法：

　　create or replace package myPackage_1

　　is

　　procedure syaHello(vname varchar2);--申明了该包中的一个过程

　　end;

　　2、包体的定义：

　　包体是对包头中定义的过程、函数的具体实现。

　　create or replace package body myPackage_1

　　is

　　procedure syaHello(vname varchar2)--对包中定义的过程的实现

　　is

　　begin

　　dbms_output.put_line(‘Hello ‘||vname);

　　end;

　　end;

　　要注意的是：

　　create or replace package后面的名称必须和create or replace package body后面的名称一致，

　　如果将create or replace package body后面的名称改为，‘MYPACKAGE‘

　　否则将会出现诸如下面的错误：

　　必须说明标识符 ‘MYPACKAGE‘

　　3、调用包用的自定义方法：

　　create or replace procedure Pro_test_package(

　　p1_in string

　　)

　　AS

　　begin

　　myPackage_1.syaHello(p1_in);

　　end Pro_test_package;

　　eg2:

　　--没有参数的函数

　　create or replace function get_user return varchar2 is v_user varchar2(50);

　　begin

　　select username into v_user from user_users;

　　return v_user;

　　return v_user;

　　--测试

　　方法一

　　select get_user from dual;

　　方法二

　　SQL> var v_name varchar2(50)

　　SQL> exec :v_name:=get_user;

　　--带有IN参数的函数

　　create or replace function get_empname(v_id in number) return varchar2 as v_name varchar2(50);

　　begin

　　select name into v_name from employee where id = v_id;

　　return v_name;

　　exception

　　when no_data_found then raise_application_error(-20001, ‘你输入的ID无效!‘);

　　end get_empname;

　　附：

　　函数调用限制

　　1、SQL语句中只能调用存储函数(服务器端),而不能调用客户端的函数

　　2、SQL只能调用带有输入参数,不能带有输出,输入输出函数

　　3、SQL不能使用PL/SQL的特有数据类型(boolean,table,record等)

　　4、SQL语句中调用的函数不能包含INSERT,UPDATE和DELETE语句

　　查看函数院源代码

　　oracle会将函数名及其源代码信息存放到数据字典中user_source

　　select text from user_source where name=‘GET_EMPNAME‘;

　　删除函数

　　drop function get_empname;

　　判断任务过期时间：

　　create or replace function GetUrgentState(m_TaskID varchar2,

　　m_SendTime date,

　　m_flag varchar2)

　　return varchar2 IS

　　myDate date;

　　ExpireTime date;

　　strsql varchar2(200);

　　begin

　　myDate := m_SendTime;

　　strsql := ‘select max(EXPIRETIME) from t_wf_supervise where TASKID =‘‘‘ ||

　　m_TaskID || ‘‘‘‘;

　　execute immediate strsql

　　into ExpireTime;

　　--没有到期时间 就是正常状态

　　if ExpireTime is null then

　　if m_flag = ‘String‘ then

　　return ‘正常‘;

　　end if;

　　if m_flag = ‘Img‘ then

　　return ‘cb_execute.gif‘;

　　end if;

　　end if;

　　--未发送任务，就是判断当前时间

　　if m_SendTime is null then

　　myDate := sysdate;

　　end if;

　　if ExpireTime < myDate then

　　if m_flag = ‘String‘ then

　　return ‘超期‘;

　　end if;

　　if m_flag = ‘Img‘ then

　　return ‘cb_limit.gif‘;

　　end if;

　　end if;

　　--小于3天的任务预警

　　if ExpireTime - myDate < 3 then

　　if m_flag = ‘String‘ then

　　return ‘预警‘;

　　end if;

　　if m_flag = ‘Img‘ then

　　return ‘cb_warning.gif‘;

　　end if;

　　else

　　if m_flag = ‘String‘ then

　　return ‘正常‘;

　　end if;

　　if m_flag = ‘Img‘ then

　　return ‘cb_execute.gif‘;

　　end if;

　　end if;

　　end;

　　查询其它表数据：

　　create or replace function GetPreNode(m_PreTaskID varchar2) return varchar2 IS

　　nodename varchar2(50);

　　strsql varchar2(200);

　　begin

　　if m_PreTaskID is null then

　　return ‘‘;

　　end if;

　　strsql := ‘select max(nodename) from t_Wf_Tasklist where TaskID =‘‘‘ ||

　　m_PreTaskID|| ‘‘‘‘;

　　execute immediate strsql

　　into nodename;

　　return nodename;

　　end;

　　格式化标题输出：

　　create or replace function FormatTitle(m_title varchar2,

　　m_length number,

　　m_FillChar varchar2) return varchar2 IS

　　begin

　　if lengthb(m_title) > m_length*2 then

　　return substr(m_title, 0,m_length) || m_FillChar;

　　else

　　return m_title;

　　end if;

　　end;

时间： 2024-10-02 22:02:32

Oracle自定义函数1的相关文章

Oracle自定义函数

核心提示:函数用于返回特定数据.执行时得找一个变量接收函数的返回值; 语法如下: create or replace function function_name ( argu1 [mode1] datatype1, argu2 [mode2] datatype2, ........ ) return datatype is begin end; 执行 var v1 varchar2(100) exec :v1:=function_na 函数用于返回特定数据.执行时得找一个变量接收函数的返回值;

oracle 自定义函数

函数 函数与存储过程相似,也是数据库中存储的已命名PL-SQL程序块.函数的主要特征是它必须有一个返回值.通过return来指定函数的返回类型.在函数的任何地方可以通过return expression语句从函数返回,返回类型必须和声明的返回类型一致. 语法: create [or replace] function function_name [(parameter_list)] return datatype {is/as} [local_declarations] begin execut

Oracle 自定义函数Function

示例代码: [sql] view plain copy CREATE OR REPLACE  FUNCTION "MY_DATABASE"."F_GET_USER_COUNT_BY_DEPART" ( DEPART_ID_VAL in long ) return varchar2 is USER_STATE varchar(16); USER_COUNT number; begin select count(*) into USER_COUNT from TB_US

Oracle自定义函数记录

函数主要是用来操作各种数据,并返回相应的操作结果.用户自定义函数是存储在数据库中的代码块,可以把值返回到调用程序.函数的语法:Create [or replace] function function_name [in datatype,out datatype, in out datatype]Return datatypeIs|as--..函数:1.函数可在sql中的以下部分被调用:select.where.having.connect by.start with.order by.grou

oracle自定义函数:将字符串中的特殊字符转化为逗号

create or replace function F_SPLIT_CONDITION(START_STRING VARCHAR2, V_FLAG VARCHAR2)/***将给出的START_STRINGN字符串按V_FLAG替换为逗号分隔的字符串*例如:12-34-56 替换为'12','34','56'*使用loop循环实现*/RETURN VARCHAR2 IS L_STRING VARCHAR2(100);--输出字符串 L_INDX INTEGER; --特殊字符 V_STRING

Oracle自定义聚集函数

今天工作中看见别人写的自定义聚集函数,所以一门心思的想搞懂,就在网上找资料了. 自定义聚集函数 自定义聚集函数接口简介 Oracle提供了很多预定义好的聚集函数,比如Max(), Sum(), AVG(), 但是这些预定义的聚集函数基本上都是适应于标量数据(scalar data), 对于复杂的数据类型,比如说用户自定义的Object type, Clob等, 是不支持的. 但是,幸运的是, 用户可以通过实现Oracle的Extensibility Framework中的ODCIAggregat

Jpa 重写方言dialect 使用oracle / mysql 数据库自定义函数

在使用criteria api进行查询时 criteriaBuilder只提供了一个部分标准的sql函数,但当我们需要使用oracle特有的行转列函数wm_concat或 mysql特有的行转列函数group_concat时,就只能自己封装了, criteriaBuilder提供了一个封装函数的方法: /** * Create an expression for the execution of a database * function. * @param name function name

Oracle自定义行转列函数

--行转列自定义函数,只针对TABLE1表 --paramType是参数类型,用于判断,param1和param2是条件参数 create or replace function My_concat(paramType in integer,param1 in varchar2,param2 in varchar2) return varchar2 is resultStr varchar2(2000); begin if paramType = 1 then --定义游标 for temp_c

ORACLE创建自定义函数返回varchar类型

需求描述:两张表,如下,需要查询tmp1表中id_new在tmp2中的nameselect from tmp1; select from tmp2;方法一:好处:简单,直接sql展示劣处:如果主表数据量太大,十几亿的话,性能会大大下降,此时建议第二种方法select a.id_old,to_char(wm_concat(distinct a.id_new)) id_new,to_char(wm_concat(distinct b.name)) namefrom tmp2 b,(select a.