程序包简介
-
程序包(PACKAGE,简称包)是一组相关过程、函数、变量、常量和游标等PL/SQL程序设计元素的组合,作为一个完整的单元存储在数据库中,用名称来标识包。它具有面向对象程序设计语言的特点,是对这些PL/SQL 程序设计元素的封装。包类似于c#和JAVA语言中的类,其中变量相当于类中的成员变量,过程和函数相当于类方法。把相关的模块归类成为包,可使开发人员利用面向对象的方法进行存储过程的开发,从而提高系统性能。
-
与高级语言中的类相同,包中的程序元素也分为公用元素和私用元素两种,这两种元素的区别是他们允许访问的程序范围不同,即它们的作用域不同。公用元素不仅可以被包中的函数、过程所调用,也可以被包外的PL/SQL程序访问,而私有元素只能被包内的函数和过程序所访问。
-
当然,对于不包含在程序包中的过程、函数是独立存在的。一般是先编写独立的过程与函数,待其较为完善或经过充分验证无误后,再按逻辑相关性组织为程序包。
程序包组成
-
一个包由两个分开的部分组成:
包说明(PACKAGE):包说明部分声明包内数据类型、变量、常量、游标、子程序和异常错误处理等元素,这些元素为包的公有元素。
包主体(PACKAGE BODY):包主体则是包定义部分的具体实现,它定义了包定义部分所声明的游标和子程序,在包主体中还可以声明包的私有元素。
包说明和包主体分开编译,并作为两部分分开的对象存放在数据库字典中,可查看数据字典user_source, all_source, dba_source,分别了解包说明与包主体的详细信息。
程序包定义
-
程序包的定义分为程序包说明定义和程序包主体定义两部分组成。
-
程序包说明用于声明包的公用组件,如变量、常量、自定义数据类型、异常、过程、函数、游标等。包说明中定义的公有组件不仅可以在包内使用,还可以由包外其他过程、函数。但需要说明与注意的是,我们为了实现信息的隐藏,建议不要将所有组件都放在包说明处声明,只应把公共组件放在包声明部分。包的名称是唯一的,但对于两个包中的公有组件的名称可以相同,这种用“包名.公有组件名“加以区分。
-
包体是包的具体实现细节,其实现在包说明中声明的所有公有过程、函数、游标等。当然也可以在包体中声明仅属于自己的私有过程、函数、游标等。创建包体时,有以下几点需要注意:
包体只能在包说明被创建或编译后才能进行创建或编译。
在包体中实现的过程、函数、游标的名称必须与包说明中的过程、函数、游标一致,包括名称、参数的名称以及参数的模式(IN、OUT、IN OUT)。并建设按包说明中的次序定义包体中具体的实现。
在包体中声明的数据类型、变量、常量都是私有的,只能在包体中使用而不能被印刷体外的应用程序访问与使用。
在包体执行部分,可对包说明,包体中声明的公有或私有变量进行初始化或其它设置。
-
创建程序包说明语法格式:
CREATE [ OR REPLACE ] PACKAGE package_name
[ AUTHID {CURRENT_USER | DEFINER} ]
{ IS | AS }
[ 公有数据类型定义[公有数据类型定义 ] …]
[ 公有游标声明[公有游标声明 ] …]
[ 公有变量、常量声明[公有变量、常量声明 ] …]
[ 公有函数声明[公有函数声明 ] …]
[ 公有过程声明[公有过程声明 ] …]
END [ package_name ] ;
-- 其中:AUTHID CURRENT_USER和AUTHID DEFINER选项说明应用程序在调用函数时所使用的权限模式,它们与CREATE FUNCTION语句中invoker_right_clause子句的作用相同。
- 创建程序包主体语法格式:
CREATE [ OR REPLACE ] PACKAGE BODY package_name
{ IS | AS }
[ 私有数据类型定义[私有数据类型定义 ] …]
[ 私有变量、常量声明[私有变量、常量声明 ] …]
[ 私有异常错误声明[私有异常错误声明 ] …]
[ 私有函数声明和定义[私有函数声明和定义 ] …]
[ 私有函过程声明和定义[私有函过程声明和定义 ] …]
[ 公有游标定义[公有游标定义 ] …]
[ 公有函数定义[公有函数定义 ] …]
[ 公有过程定义[公有过程定义 ] …]
BEGIN
执行部分(初始化部分)
END package_name;
-- 其中:在包主体定义公有程序时,它们必须与包定义中所声明子程序的格式完全一致。
包的开发步骤
-
与开发存储过程类似,包的开发需要几个步骤:
1. 将每个存储过程调式正确;
2. 用文本编辑软件将各个存储过程和函数集成在一起;
3. 按照包的定义要求将集成的文本的前面加上包定义;
4. 按照包的定义要求将集成的文本的前面加上包主体;
5. 使用SQLPLUS或开发工具进行调式。
案例
- 定义
create or replace package TEST_PAKE as
-- 存储过程
procedure test (
p_arg1 in varchar2 ,
p_arg2 out varchar2);
-- 函数
function test_func (
p_arg1 in number )
return varchar2;
end;
- 正文
create or replace package body TEST_PAKE as
procedure test (
p_arg1 in varchar2 , -- in输入参数,out输出参数
p_arg2 out varchar2 )
as
id number; -- 参数
begin
p_arg2 := p_arg1; -- 把输入参数赋值给输出参数
dbms_output.put_line('执行存储过程'||p_arg1);
end;
function test_func (
p_arg1 in number )
return varchar2
is
id number;
begin
dbms_output.put_line('执行函数');
-- 把输出参数返回
return p_arg1;
end;
end TEST_PAKE;
- 调用
DECLARE
name VARCHAR2(20);
age number;
begin
TEST_PAKE.test('李', name);
dbms_output.put_line('姓名'|| name);
age := TEST_PAKE.test_func(20);
dbms_output.put_line('名字'|| name);
end;
- 结果