oracle自定义函数、自定义包使用

Sql代码

  1. –没有参数的函数   
  2. create or replace function get_user return varchar2 is  
  3.    v_user varchar2(50);   
  4. begin  
  5.   select username into v_user from user_users;   
  6.   return v_user;   
  7. end get_user;   
  8.   
  9. –测试   
  10. 方法一   
  11. select get_user from dual;   
  12.   
  13. 方法二   
  14. SQL> var v_name varchar2(50)   
  15. SQL> exec :v_name:=get_user;   
  16.   
  17. PL/SQL 过程已成功完成。   
  18.   
  19. SQL> print v_name   
  20.   
  21. V_NAME   
  22. ——————————   
  23. TEST   
  24.   
  25. 方法三   
  26. SQL> exec dbms_output.put_line(‘当前数据库用户是:’||get_user);   
  27. 当前数据库用户是:TEST   
  28.   
  29. 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_nameV_NAME——————————TEST方法三SQL> exec dbms_output.put_line(‘当前数据库用户是:’||get_user);当前数据库用户是:TESTPL/SQL 过程已成功完成。Sql代码

  1. –带有IN参数的函数   
  2. create or replace function get_empname(v_id in number) return varchar2 as  
  3.    v_name varchar2(50);   
  4. begin  
  5.   select name into v_name from employee where id = v_id;   
  6.    return v_name;   
  7. exception   
  8.   when no_data_found then  
  9.      raise_application_error(-20001, ‘你输入的ID无效!’);   
  10. 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;

一、自定义函数的定义和调用入门

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;

4、测试调用的存储过程:
同其它的存储过程一样测试(略)

以上脚本在oracle817上测试通过

欢迎访问我的blog

http://blog.csdn.net/xjzdr/

本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/xjzdr/archive/2008/01/31/2074210.aspx

发表评论

电子邮件地址不会被公开。 必填项已用 * 标注

您可以使用这些 HTML 标签和属性: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>