oracle包的简单创建和调用-例子

版权声明：。。。 https://blog.csdn.net/JerryITGO/article/details/79321367

oracle包的简单创建和调用-例子

创建包头

-- 创建包头
create or replace package pack_test1 is
  -- 定义过程1
  procedure p_test1(p_1 in varchar2);
  -- 定义函数1
  function f_test1(p_1 in varchar2) return varchar2;
end pack_test1;

创建包体

-- 创建包体(名字必须和包头一样)
create or replace package body pack_test1 is
  -- 包全局变量1
  v_param1 varchar(20) := 'default';

  -- 实现过程1
  procedure p_test1(p_1 in varchar2) is 
  begin 

    dbms_output.put_line('p_1的值为：'|| p_1);
    dbms_output.put_line('全局变量的值为：'||v_param1);
    -- 改变全局变量
    v_param1 := p_1;
    dbms_output.put_line('改变后的全局变量值为：'||v_param1);

  end;

  -- 实现函数1
  function f_test1(p_1 in varchar2) return varchar2 is 
    v_rt varchar2(50);
  begin 
    dbms_output.put_line('获取的全局变量值为：'||v_param1);

    v_rt := v_param1||'-'||p_1;

    dbms_output.put_line('返回值为：'||v_rt);

    return v_rt;
  end f_test1;


end pack_test1;

包调用

调用

-- 调用过程
call pack_test1.p_test1('参数1');

-- 调用函数
select pack_test1.f_test1('参数2') from dual;

调用结果打印

p_1的值为：参数1
全局变量的值为：default
改变后的全局变量值为：参数1
获取的全局变量值为：参数1
返回值为：参数1-参数2

其他

  在PL/SQL中，包头创建语句可以直接点进去编辑，但是包体创建以后需要修改修改就不好找了，可以通过以下SQL语句查找回来修改修改并重新编译

select text
from all_source
where owner = 'YOUR_ACCOUNT_NAME'
and type = 'PACKAGE BODY'
and name = 'PACK_TEST1'
order by line

查询结果