oracle包以及简单操作样例.docx

1、oracle包以及简单操作样例一、包的概念PL/SQL为了满足程序模块化的需要，除了块(block)和子程序结构外，还引入了包的构造。（1）包是一种数据库对象，将逻辑上相关的PL/SQL类型、对象和子程序组合成一个更大的单位，是一组相关过程、函数、变量、常量和游标等PL/SQL程序设计元素的组合，它具有面向对象程序设计语言的特点，是对这些PL/SQL 程序设计元素的封装。（2）包类似于C+和JAVA语言中的类，其中变量相当于类中的成员变量，过程和函数相当于类方法。把相关的模块归类成为包，可使开发人员利用面向对象的方法进行存储过程的开发，从而提高系统性能。（3）与类相同，包中的程序元素也分为公用

2、元素和私用元素两种，这两种元素的区别是他们允许访问的程序范围不同，即它们的作用域不同。公用元素不仅可以被包中的函数、过程所调用，也可以被包外的PL/SQL程序访问，而私有元素只能被包内的函数和过程序所访问。（4）PL/SQL的包具有信息隐蔽性(information hiding)，仅在算法和数据结构设计有关层可见。可将过程说明和过程体组成一个程序单位。也可将过程说明与它的过程体分开，在这种情况下，将过程放置在一个包中，可隐蔽实现的细节。也可在包中定义过程，而该过程在包说明中没有定义过程说明，这样定义的过程仅在包内使用。（5）在PL/SQL程序设计中，使用包不仅可以使程序设计模块化，对外隐藏包

3、内所使用的信息（通过使用私用变量），而写可以提高程序的执行效率。因为，当程序首次调用包内函数或过程时，ORACLE将整个包调入内存，当再次访问包内元素时，ORACLE直接从内存中读取，而不需要进行磁盘I/O操作，从而使程序执行效率得到提高。如果ORACLE具有Procedure选件，包可以编译、存贮在ORACLE数据库中，其内容可为许多应用共享。二、包的作用包可以将任何出现在块声明的语句(过程，函数，游标，游标，类型，变量)放于包中，相当于一个容器。将声明语句放入包中的好处是:用户可以从其他PL/SQL块中对其进行引用，因此包为PL/SQL提供了全程变量。三、包定义：（1）一个包由两个分开的部

4、分组成：（2）包定义（PACKAGE）：包定义部分是为应用程序的接口，声明包内数据类型、变量、常量、游标、子程序和异常错误处理等元素，这些元素为包的公有元素。（3）包主体（PACKAGEBODY）：包主体则是包定义部分的具体实现，它定义了包定义部分所声明的游标和子程序，在包主体中还可以声明包的私有元素。-如果在包主体中的游标或子程序没有在包并没有在包头中定义，那么这个游标或子程序是私有的。（4）包定义和包主体分开编译，并作为两部分分开的对象存放在数据库字典中。（包定义一定要在包主体前面，包主体可以没有，但包定义一定要有）包定义格式：CREATE OR REPLACE PACKAGE packa

5、ge_nameIS | AS公有数据类型定义公有数据类型定义公有游标声明公有游标声明公有变量、常量声明公有变量、常量声明公有子程序声明公有子程序声明END package_name;包体定义格式：CREATE OR REPLACE PACKAGE BODY package_nameIS | AS私有数据类型定义私有数据类型定义私有变量、常量声明私有变量、常量声明私有子程序声明和定义私有子程序声明和定义公有子程序定义公有子程序定义BEGINPL/SQL 语句END package_name;其中：在包主体定义公有程序时，它们必须与包定义中所声明子程序的格式完全一致。plsqlDeveloper给

6、出的例子包头：create or replace package mypackage is- Author :- Created : 2010-6-13 15:06:17- Purpose :- Public type declarationstype is ;- Public constant declarations constant := ;- Public variable declarations ;- Public function and procedure declarationsfunction ( ) return ;end mypackage;包体：create or r

7、eplace package mypackage is- Author :- Created : 2010-6-13 15:06:17- Purpose :- Public type declarationstype is ;- Public constant declarations constant := ;- Public variable declarations ;- Public function and procedure declarationsfunction ( ) return ;end mypackage;定义包头应当遵循以下原则：1) 包元素位置可以任意安排。然而在声

8、明部分，对象必须在引用前进行声明。2) 包头可以不对任何类型的元素进行说明。例如，包头可以只带过程和函数说明语句，而不声明任何异常和类型。3) 对过程和函数的任何声明都必须只对子程序和其参数进行描述，不能有任何代码的说明，代码的实现只能在包体中出现。它不同于块声明，在块声明中，过程和函数的代码可同时出现在声明部分。包体是与包头相互独立的 ， 包体只能在包头完成编译后才能进行编译。 包体中带有包头中描述的子程序的具体实现的代码段。 除此之外 ， 包体还可以包括具有包体人全句属性的附加声明部分， 但这些附加声明对于包头是不见的。包不能嵌入在PL/SQL块或子程序中，然而使用支持PL/SQL的任何工

9、具可定义包。要使包为全体使用，必须用CREATE命令建立，存贮在一个ORACLE数据库中。可在SQL*PLUS、SQL*DBA或从ORACLE预编译宿主程序中利用CREATE PACKAGE和CREATE PACKAGE BODY 语句建立。四、包的开发步骤：与开发存储过程类似，包的开发需要几个步骤：将每个存储过程调式正确用文本编辑软件将各个存储过程和函数集成在一起按照包的定义要求将集成的文本的前面加上包定义按照包的定义要求将集成的文本的前面加上包主体使用开发工具进行调式注意:包的名称和包体的名称要保持一致五、包举例（1）定义包：create or replace package mypack

10、age is- 声明全局常量c_pi constant number := 3.14;- 计算圆面积function getArea(id in number) return number;end mypackage;（2）定义包体：create or replace package body mypackisfunction getArea(r in number)return numberisv_area number;beginv_area := r*r* c_pi;return v_area;end;end;（3）调用包：A declarev_area number;beginv_ar

11、ea := mypack.getArea(5);dbms_output.put_line(v_area);end;Bselect mypack.getArea(10) from dual;六、重载 : 包中的函数和过程可以重载以下条件不能重载:1.如果两个子程序的参数仅在名称和类型上不同，这两个程序不能重载。PROCEDURE overloadME(p_theparameter IN number);PROCEDURE overloadME(p_theparameter OUT number);IN，OUT为参数类型，number为数据类型。两个过程仅在类型上不同时不能重载。2.不能根据两个函

12、数的返回类型对其重载如:FUNCTION overloadMeETooRETURN DATE;FUNCTION overloadMeETooRETURN NUMER;3.重载子程序的参数的类族必须不同，例如，由于CHAR和VARCHAR2属性同一类族，所以不能重载。PROCEDUREoverloadME(p_theparameter IN char);PROCEDUREoverloadME(p_theparameter IN varchar2);4.打包子程序也可以重载5.包的初始化当第一次调用打包子程序时，该包将进行初始化。也就是说，将该包从硬盘中读入到内存，并启用调用的子程序的编译代码。这

13、时，系统为该包中定义的所有变量分配内存单元。每个会话都有打其打开包变量的副本，以确保执行同一个包子程序的两个会话使用不同的内存单元。在大多数情况下，初始化代码要在包第一次初始化时运行。为了实现这一功能，可以在包体中的所有对象之后加入一个初始化代码。语法格式:CREATE OR REPLACE PACKAGE BODY package_nameIS|AS.BEGINInitialization_code;-要运行的初始化代码END;七、ORACLE内置包1.DBMS_ALERT包:用于数据库报警，允许会话间通信2.DBMS_JOB:用于任务调度服务3.DBMS_LOB:用于处理大对象操作4.DB

14、MS_PIPE包:用于数据库管道，允许会话间通信5.DBMS_SQL包:用于执行动态SQL6.UTL_FILE包:用于文件的输入输出除了UTL_FILE包存储在服务器和客户端外，其他的包均存储在服务器中。八、总结包可以理解为java中的类，这样在学习的时候更容易理解，包经常和存储过程一起使用，下面附上一个和存储过程一起应用的实例。有关存储过程的文章请参看我近期即将完成的另一篇文章。create or replace package TestPackage istype mycursor is ref cursor;procedure GetRecords(ret_cursor out mycu

15、rsor);end TestPackage;create or replace package body TestPackage isprocedure GetRecords(ret_cursor out mycursor) asbeginopen ret_cursor for select * from emp;end GetRecords;end TestPackage;drop procedure testproc;create procedure testproc(ret_cursor out sys_refcursor) asbeginopen ret_cursor forselect * from emp;end testproc;