下载文档原格式
oracle如何使用作业Oracle可以使用作业来自动执行重复性任务，如定期备份数据库、生成报表等。
以下是Oracle使用作业的步骤：1. 创建作业：使用CREATE_JOB语句来创建作业。
可以指定作业的名称、调度时间表、执行程序、参数等信息。
2. 创建程序：使用CREATE_PROGRAM语句来创建程序。
程序是作业执行的实际任务，可以是存储过程、PL/SQL块、SQL脚本等。
3. 创建调度时间表：使用DBMS_SCHEDULER包中的CREATE_SCHEDULE语句或在Oracle Enterprise Manager工具中创建调度时间表。
调度时间表定义了作业的执行计划，可以指定作业的执行频率和时间范围。
4. 链接作业、程序和时间表：使用DBMS_SCHEDULER包中的CREATE_JOB语句，将作业与程序和时间表进行关联。
5. 启用作业：使用DBMS_SCHEDULER包中的ENABLE函数启用作业。
只有处于启用状态的作业才能被调度执行。
6. 监控作业执行：可以使用DBA_SCHEDULER_JOBS视图来监控作业的执行情况。
可以查看作业的状态、执行次数、最后执行时间等信息。
7. 管理作业：使用DBMS_SCHEDULER包中的ALTER_JOB函数可以修改作业的属性，如修改作业的执行时间、禁用作业等。
使用DROP_JOB函数可以删除作业。
8. 取消作业：使用DBMS_SCHEDULER包中的DISABLE函数可以取消作业的调度。
需要注意的是，Oracle的作业管理功能在某些版本中可能会有所差异，具体使用方法可以参考相关版本的文档。
oracle call调用程序包方法Oracle是一种常用的关系型数据库管理系统，它提供了丰富的功能和工具来操作和管理数据库。
在Oracle中，我们可以使用CALL语句来调用程序包中的方法。
程序包是一种用于封装相关功能和数据的PL/SQL对象。
它由一组过程、函数和变量组成，可以作为一个单元来进行调用和管理。
通过使用程序包，我们可以更好地组织和管理代码，提高代码的可维护性和可重用性。
要调用程序包中的方法，我们首先需要创建一个程序包对象。
程序包对象包含了程序包中的所有方法和变量，并提供了一种访问这些方法和变量的方式。
在Oracle中，我们可以使用CREATE PACKAGE语句来创建程序包对象。
例如，我们可以创建一个名为EMPLOYEE_PACKAGE的程序包对象，其中包含了一些操作员工信息的方法。
创建程序包对象后，我们可以使用CALL语句来调用程序包中的方法。
CALL语句用于执行一个过程或函数，并可以传递参数给这个过程或函数。
在调用程序包方法时，我们需要指定方法的名称和参数。
例如，我们可以使用以下语句来调用EMPLOYEE_PACKAGE程序包中的一个名为GET_EMPLOYEE的函数，并传递一个员工编号作为参数：CALL EMPLOYEE_PACKAGE.GET_EMPLOYEE(1001);在调用程序包方法时，我们可以使用变量来存储返回的结果。
例如，我们可以定义一个名为EMPLOYEE_INFO的变量，并将调用GET_EMPLOYEE方法的结果赋值给它。
DECLAREEMPLOYEE_INFOEMPLOYEE_PACKAGE.EMPLOYEE%ROWTYPE;BEGINEMPLOYEE_PACKAGE.GET_EMPLOYEE(1001,EMPLOYEE_INFO);-- 在这里可以使用EMPLOYEE_INFO变量来访问员工信息END;除了使用CALL语句来调用程序包方法外，我们还可以直接在SQL 语句中使用程序包方法。
Oracle 程序包主体程序包主体包含了在规范中声明的过程和函数的实现代码，程序包主体的名称必须与规范的名称相同，这个相同的名称将规范与主体结合在一起组成程序包。
另外，程序包主体中定义的过程和函数的名称、参数和返回值等必须与规范中声明的完全区配。
创建程序包主体使用CREATE PACKAGE BODY语句如下：create [or replace] package body package_name is[pragma serially_reusable;][collection_type_definition ...][record_type_definition ...][subtype_definition ...][collection_declaration ...][constant_declaration ...][exception_declaration ...][object_declaration ...][record_declaration ...][variable_declaration ...][cursor_body ...][function_spec ...][procedure_spec ...][call_spec ...][beginsequence_of_statements]end [package_name]包主体中的内容是私有的，它实现了包规范部分定义的细节内容，并且对调用者是不可见的。
在包主体中有一个比较特殊的部分，即BEGIN表示的一个可选的初始化部分，它用于初始化包中的变量等。
在了解创建程序包主体的语法后，下面将为SCOTT_EMP_PKG包创建主体，实现过程UPDATE_SAL()和一个函数SELECT_NAME()。
代码如下：SQL> create or replace package body scott_emp_pkg is2 procedure update_sal(deptno_param number,sal_param number) is3 begin4 update emp5 set sal=sal+sal_param6 where deptno=deptno_param;7 end update_sal;89 function select_name(empno_param number) return varchar2 is10 e_ename varchar2(20);11 begin12 select ename13 into e_ename14 from emp15 where empno=empno_param;16 return e_ename;17 exception18 when no_data_found then19 dbms_output.put_line('无效的工作编号');20 end select_name;21 end scott_emp_pkg;22 /程序包体已创建。
Oracleprocedure基本语法关键字: oracle 存储过程1.基本结构 CREATE OR REPLACE PROCEDURE 存储过程名字 ( 参数1 IN NUMBER, 参数2 IN NUMBER ) IS 变量1 INTEGER :=0;变量2 DATE; BEGINEND 存储过程名字2.SELECT INTO STATEMENT 将select查询的结果存⼊到变量中，可以同时将多个列存储多个变量中，必须有⼀条记录，否则抛出异常(如果没有记录抛出NO_DATA_FOUND) 例⼦： BEGIN SELECT col1,col2 into 变量1,变量2 FROM typestruct where xxx; EXCEPTION WHEN NO_DATA_FOUND THEN xxxx; END; ...3.IF 判断 IF V_TEST=1 THEN BEGIN do something END; END IF;4.while 循环 WHILE V_TEST=1 LOOP BEGIN XXXX END; END LOOP;5.变量赋值 V_TEST := 123;6.⽤for in 使⽤cursor ... IS CURSOR cur IS SELECT * FROM xxx; BEGIN FOR cur_result in cur LOOP BEGIN V_SUM :=cur_result.列名1+cur_result.列名2 END; END LOOP; END;7.带参数的cursor CURSOR C_USER(C_ID NUMBER) IS SELECT NAME FROM USER WHERE TYPEID=C_ID; OPEN C_USER(变量值); LOOP FETCH C_USER INTO V_NAME; EXIT FETCH C_USER%NOTFOUND; do something END LOOP; CLOSE C_USER;8.⽤pl/sql developer debug 连接数据库后建⽴⼀个Test WINDOW 在窗⼝输⼊调⽤SP的代码,F9开始debug,CTRL+N单步调试转载：关键字: oracle 存储过程存储过程创建语法：create or replace procedure 存储过程名（param1 in type，param2 out type）as变量1 类型（值范围）;变量2 类型（值范围）;BeginSelect count(*) into 变量1 from 表A where列名=param1；If (判断条件) thenSelect 列名 into 变量2 from 表A where列名=param1；Dbms_output。
《Oracle数据库应用》理论课在Oracle数据库上构建.NET应用程序⏹本章技能目标◆掌握在NET环境访问Oracle数据库1.环境配置开始使用Visual 进行应用程序开发前，请先确认客户端连通性。
如果您在 所在的计算机上使用SQL*Plus 能够与Oracle 连接，那么证明已经正确地安装和配置了Oracle 客户端软件。
要完成在VS 中访问Oracle 数据库的话，你必须先将Oracle 数据库配置好，常见的一些配置主要是对$oracleHome\network\ADMIN这个目录下的两个文件的配置。
tnsnames.ora和listener.ora。
这两个文件的配置至关重要，其中listener.ora 是用户指定监听服务的一些信息的，如果这个文件设置不正确的话，将有可能导致监听服务无法启动。
主要是要将HOST 设置好。
2HOST 用来指定 Oracle 服务器所在的主机名或者 IP 地址，而 SERVICE_NAME 则指定全局数据库名。
一般来说，经过下面两个步骤就可以判断出您的上面的两个文件是否设置正确了，首先是您设置好上面的两个文件以后，您就重新启动监听服务。
如果监听服务能够正常启动的话，说明配置文件 listener.ora 配置基本正确，而后的话，您可以通过 tnsping 数据库名 来判断 tnsnames.ora 的配置是否正确，比如我们Oracle 数据库的全局数据库名为 ACCP 。
下面就通过 tnsping ACCP 来判断 tnsnames.ora 的配置是否正确。
3如果得到上面的类似结果，则说明这个配置文件时正确的。
2. 数据提供程序简介随着 Microsoft 的 .NET 框架的逐渐流行，许多开发人员迫切想了解关于将 .NET 应用程序与 Oracle 集成的最好的方式的信息，不仅在基本的连通性方面，还包括与使用 Visual () 进行有效的应用程序开发的关系。
1、包头
程序包由两个部分组成：包头与包体。
包头又可以称为包规范，用于规定程序包中可以容纳的存储过程、自定义函数、游标等PL/SQL元素。
包体则用于编写包头中规定的PL/SQL块元素实现代码。
创建包时，包体的名称必须与包头的名称相同，这样Oracle就可以通过相同的名称将包头与包体组织到一起。
创建包
可以使用OR REPLACE关键字将原先的定义覆盖。
（2）pl_statement:用于规定包中存放的内容，如果是PL/SQL块子程序，这是声明该子程序
在包头中可以声明变量，游标，子程序等内容，下面通过一个示例来演示包头的定义，示例说明：创建一个名为pack_emp的包头，分别在包头中创建一个根据员工编号获取员工姓名的函数与根据职位和部门编号获取员工信息的存储过
2、包体
程序包中的包体主要用于实现包头中声明的PL/SQL块元素，只有包头编译成功后，包体才能编译。
在包头中声明的对象可以直接在包体中使用，包体的名称必须与包头相同。
此外包体中实现的存储过程、自定义函数等子程序必须要与
可以使用OR REPLACE关键字将原先的定义覆盖。
（2）pl_body：包体中的主体代码，用于实现包头中定义的存储过程、自定义函数等PL/SQL块子程序。
包头与包体一定要一一对应，并且先要有包头，才能有包体。
下面通过一个示例来演示包体的创建，示例说明：创建pack_emp的包体，实现包中的存储过程与自定义函数。
3、调用包里面的内容。
一、简介Oracle APEX是一套基于Oracle数据库的应用开发工具，它允许开发人员通过Web界面快速开发和部署应用程序。
Oracle APEX支持广泛的应用场景，包括企业管理、数据分析、上线报表等。
二、环境搭建1. 安装Oracle数据库：首先需要安装Oracle数据库，确保数据库服务正常运行。
2. 安装Oracle APEX：安装好数据库后，可以通过冠方全球信息站下载并安装Oracle APEX。
三、应用开发1. 创建应用：登入Oracle APEX后，在开发界面中选择“创建应用”，填写应用名称、描述等基本信息。
2. 数据建模：在应用中创建表、视图等数据模型，定义字段、数据类型、约束等。
3. 页面设计：设计应用的页面，包括表单页面、报表页面、交互页面等，通过拖拽和配置实现页面的布局和功能。
4. 编写逻辑：使用SQL和PL/SQL编写应用的业务逻辑，包括数据操作、业务规则等。
5. 样式美化：对应用页面进行样式设计，包括颜色、字体、布局等。
6. 安全设置：设置应用的权限控制、用户认证、数据安全等。
四、页面开发1. 表单页面：创建表单页面用于数据的录入和修改，可以配置字段的显示、隐藏、必填等属性。
2. 报表页面：创建报表页面用于数据的查询和展示，支持各种图表、统计等功能。
3. 交互页面：创建交互式页面用于复杂的数据交互操作，支持多种交互控件和动态交互效果。
五、数据操作1. 数据查询：使用SQL语句实现数据的查询和筛选，支持复杂的联合查询、子查询等。
2. 数据更新：使用SQL语句实现数据的增删改操作，包括插入数据、更新数据、删除数据等。
3. 事务控制：使用PL/SQL编写事务控制逻辑，确保数据操作的原子性和一致性。
六、安全管理1. 用户权限：配置用户的访问权限和功能权限，确保用户只能访问其有权限的数据和功能。
2. 数据安全：配置数据的访问权限和数据的加密保护，确保数据的机密性和完整性。
3. 审计跟踪：记录用户的操作记录和系统的运行日志，便于故障排查和安全审计。
oracle instant client的安装和使用方法-回复Oracle Instant Client是用于连接和访问Oracle数据库的软件包。
它提供了用于开发和部署Oracle应用程序所需的基本工具和库。
本文将介绍Oracle Instant Client的安装和使用方法，帮助读者在自己的系统上成功安装和配置Oracle Instant Client。
第一步：下载Oracle Instant Client软件包首先，我们需要从官方网站上下载Oracle Instant Client软件包。
我们可以在Oracle官方网站的下载页面上找到合适的版本。
根据你的操作系统和位数（32位或64位）选择相应的版本。
确保你选择的版本与你的系统兼容。
第二步：解压缩软件包下载完成后，我们需要将软件包解压缩到合适的目录中。
你可以选择一个你喜欢的目录，比如/usr/local/，然后将下载的软件包解压缩到这个目录。
第三步：设置环境变量为了让系统能够正确找到Oracle Instant Client，我们需要设置一些环境变量。
打开终端，并使用以下命令编辑你的bash配置文件（如果你使用的是不同的shell，可以使用相应的配置文件）：vi ~/.bashrc在文件的底部添加以下内容：export LD_LIBRARY_PATH=/usr/local/instantclient_XX.X.X.X/lib请确保将“/usr/local/instantclient_XX.X.X.X/”替换为你实际解压缩软件包的路径。
保存文件并关闭编辑器。
然后，运行以下命令以加载新的环境变量：source ~/.bashrc现在，我们已经成功设置了环境变量。
第四步：安装Oracle Instant Client库文件Oracle Instant Client软件包中提供了许多不同的库文件，我们可以根据自己的需求进行选择安装。
以下是一些常用的库文件：- libclntsh.so：Oracle客户端共享库- libocci.so：Oracle C++ Call Interface库- libaio.so：异步IO库- libnnzXX.so：基于密钥的网络安全库- libociei.so：OCI用户外部认证库你可以根据你的需求选择要安装的库文件。
ORACLE PL/SQL编程详解之七：程序包的创建与应用(聪明在于学习，天才在于积累！)本篇主要内容如下：第七章程序包的创建和应用7.1 程序包简介7.2 程序包的定义7.3 包的开发步骤7.4 包定义的说明7.5 子程序重载7.6 加密实用程序7.7 删除包7.8 包的管理7.1 程序包简介程序包(PACKAGE，简称包)是一组相关过程、函数、变量、常量和游标等PL/SQL程序设计元素的组合，作为一个完整的单元存储在数据库中，用名称来标识包。
它具有面向对象程序设计语言的特点，是对这些PL/SQL 程序设计元素的封装。
包类似于c#和JAVA语言中的类，其中变量相当于类中的成员变量，过程和函数相当于类方法。
把相关的模块归类成为包，可使开发人员利用面向对象的方法进行存储过程的开发，从而提高系统性能。
与高级语言中的类相同，包中的程序元素也分为公用元素和私用元素两种，这两种元素的区别是他们允许访问的程序范围不同，即它们的作用域不同。
公用元素不仅可以被包中的函数、过程所调用，也可以被包外的PL/SQL程序访问，而私有元素只能被包内的函数和过程序所访问。
当然，对于不包含在程序包中的过程、函数是独立存在的。
一般是先编写独立的过程与函数，待其较为完善或经过充分验证无误后，再按逻辑相关性组织为程序包。
程序包的优点简化应用程序设计：程序包的说明部分和包体部分可以分别创建各编译。
主要体现在以下三个方面：1)可以在设计一个应用程序时，只创建各编译程序包的说明部分，然后再编写引用该程序包的PL/SQL块。
2)当完成整个应用程序的整体框架后，再回头来定义包体部分。
只要不改变包的说明部分，就可以单独调试、增加或替换包体的内容，这不会影响其他的应用程序。
3)更新包的说明后必须重新编译引用包的应用程序，但更新包体，则不需重新编译引用包的应用程序，以快速进行应用程序的原形开发。
◆模块化：可将逻辑相关的PL/SQL块或元素等组织在一起，用名称来唯一标识程序包。
把一个大的功能模块划分人适当个数小的功能模块，分别完成各自的功能。
这样组织的程序包都易于编写，易于理解更易于管理。
◆信息隐藏：因为包中的元素可以分为公有元素和私有元素。
公有元素可被程序包内的过程、函数等的访问，还可以被包外的PL/SQL访问。
但对于私有元素只能被包内的过程、函数等访问。
对于用户，只需知道包的说明，不用了解包休的具体细节。
◆效率高：程序包在应用程序第一次调用程序包中的某个元素时，ORACLE将把整个程序包加载到内存中，当第二次访问程序包中的元素时，ORACLE将直接从内在中读取，而不需要进行磁盘I/O操作而影响速度，同时位于内在中的程序包可被同一会话期间的其它应用程序共享。
因此，程序包增加了重用性并改善了多用户、多应用程序环境的效率。
对程序包的优点可总结如下：在PL/SQL程序设计中，使用包不仅可以使程序设计模块化，对外隐藏包内所使用的信息（通过使用私用变量），而写可以提高程序的执行效率。
因为，当程序首次调用包内函数或过程时，ORACLE将整个包调入内存，当再次访问包内元素时，ORACLE 直接从内存中读取，而不需要进行磁盘I/O操作，从而使程序执行效率得到提高。
一个包由两个分开的部分组成：包说明（PACKAGE）：包说明部分声明包内数据类型、变量、常量、游标、子程序和异常错误处理等元素，这些元素为包的公有元素。
包主体（PACKAGE BODY）：包主体则是包定义部分的具体实现，它定义了包定义部分所声明的游标和子程序，在包主体中还可以声明包的私有元素。
包说明和包主体分开编译，并作为两部分分开的对象存放在数据库字典中，可查看数据字典user_source, all_source, dba_source，分别了解包说明与包主体的详细信息。
7.2 程序包的定义程序包的定义分为程序包说明定义和程序包主体定义两部分组成。
程序包说明用于声明包的公用组件，如变量、常量、自定义数据类型、异常、过程、函数、游标等。
包说明中定义的公有组件不仅可以在包内使用，还可以由包外其他过程、函数。
但需要说明与注意的是，我们为了实现信息的隐藏，建议不要将所有组件都放在包说明处声明，只应把公共组件放在包声明部分。
包的名称是唯一的，但对于两个包中的公有组件的名称可以相同，这种用“包名.公有组件名“加以区分。
包体是包的具体实现细节，其实现在包说明中声明的所有公有过程、函数、游标等。
当然也可以在包体中声明仅属于自己的私有过程、函数、游标等。
创建包体时，有以下几点需要注意：◆包体只能在包说明被创建或编译后才能进行创建或编译。
◆在包体中实现的过程、函数、游标的名称必须与包说明中的过程、函数、游标一致，包括名称、参数的名称以及参数的模式（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;其中：在包主体定义公有程序时，它们必须与包定义中所声明子程序的格式完全一致。
7.3 包的开发步骤与开发存储过程类似，包的开发需要几个步骤：1．将每个存储过程调式正确；2．用文本编辑软件将各个存储过程和函数集成在一起；3．按照包的定义要求将集成的文本的前面加上包定义；4．按照包的定义要求将集成的文本的前面加上包主体；5．使用SQLPLUS或开发工具进行调式。
7.4 包定义的说明例1:创建的包为DEMO_PKG,该包中包含一个记录变量DEPTREC、两个函数和一个过程。
实现对dept表的增加、删除与查询。
CREATE OR REPLACE PACKAGE DEMO_PKGISDEPTREC DEPT%ROWTYPE;--Add dept...FUNCTION add_dept(dept_no NUMBER,dept_name VARCHAR2,location VARCHAR2)RETURN NUMBER;--delete dept...FUNCTION delete_dept(dept_no NUMBER)RETURN NUMBER;--query dept...PROCEDURE query_dept(dept_no IN NUMBER);END DEMO_PKG;包主体的创建方法，它实现上面所声明的包定义，并在包主体中声明一个私有变量flag和一个私有函数check_dept，由于在add_dept和remove_dept等函数中需要调用check_dpet函数，所以，在定义check_dept 函数之前首先对该函数进行声明，这种声明方法称作前向声明。
CREATE OR REPLACE PACKAGE BODY DEMO_PKGISFUNCTION add_dept(dept_no NUMBER,dept_name VARCHAR2,location VARCHAR2)RETURN NUMBERISempno_remaining EXCEPTION; --自定义异常PRAGMA EXCEPTION_INIT(empno_remaining, -1);/* -1 是违反唯一约束条件的错误代码 */BEGININSERT INTO dept VALUES(dept_no, dept_name, location);IF SQL%FOUND THENRETURN1;END IF;EXCEPTIONWHEN empno_remaining THENRETURN0;WHEN OTHERS THENRETURN-1;END add_dept;FUNCTION delete_dept(dept_no NUMBER)RETURN NUMBERISBEGINDELETE FROM dept WHERE deptno = dept_no;IF SQL%FOUND THENRETURN1;ELSERETURN0;END IF;EXCEPTIONWHEN OTHERS THENRETURN-1;END delete_dept;PROCEDURE query_dept(dept_no IN NUMBER)ISBEGINSELECT*INTO DeptRec FROM dept WHERE deptno=dept_no;EXCEPTIONWHEN NO_DATA_FOUND THENDBMS_OUTPUT.PUT_LINE('温馨提示:数据库中没有编码为'||dept_no||'的部门');WHEN TOO_MANY_ROWS THENDBMS_OUTPUT.PUT_LINE('程序运行错误,请使用游标进行操作!');WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE(SQLCODE||'----'||SQLERRM);END query_dept;BEGINNull;END DEMO_PKG;对包内共有元素的调用格式为：包名.元素名称调用DEMO_PKG包内函数对dept表进行插入、查询和删除操作，并通过DEMO_PKG 包中的记录变量DEPTREC显示所查询到的数据库信息：DECLAREVar NUMBER;BEGINVar := DEMO_PKG.add_dept(90,'HKLORB', 'HAIKOU');IF var=-1THENDBMS_OUTPUT.PUT_LINE(SQLCODE||'----'||SQLERRM);ELSIF var=0THENDBMS_OUTPUT.PUT_LINE('温馨提示:该部门记录已经存在！');ELSEDBMS_OUTPUT.PUT_LINE('温馨提示:添加记录成功！');DEMO_PKG.query_dept(90);DBMS_OUTPUT.PUT_LINE(DEMO_PKG.DeptRec.deptno||'---'||DEMO_PKG.DeptRec.dname| |'---'||DEMO_PKG.DeptRec.loc);var := DEMO_PKG.delete_dept(90);IF var=-1THENDBMS_OUTPUT.PUT_LINE(SQLCODE||'----'||SQLERRM);ELSIF var=0THENDBMS_OUTPUT.PUT_LINE('温馨提示:该部门记录不存在！');ELSEDBMS_OUTPUT.PUT_LINE('温馨提示:删除记录成功！');END IF;END IF;END;例2: 创建包EMP_PKG，读取emp表中的数据--创建包说明CREATE OR REPLACE PACKAGE EMP_PKGISTYPE emp_table_type IS TABLE OF emp%ROWTYPEINDEX BY BINARY_INTEGER;PROCEDURE read_emp_table (p_emp_table OUT emp_table_type);END EMP_PKG;--创建包体CREATE OR REPLACE PACKAGE BODY EMP_PKGISPROCEDURE read_emp_table (p_emp_table OUT emp_table_type)ISI BINARY_INTEGER :=0;BEGINFOR emp_record IN ( SELECT*FROM emp ) LOOPP_emp_table(i) := emp_record;I := I +1;END LOOP;END read_emp_table;END EMP_PKG;--执行DECLAREE_table EMP_PKG.emp_table_type;BEGINEMP_PKG.read_emp_table(e_table);FOR I IN e_table.FIRST ..e_ST LOOPDBMS_OUTPUT.PUT_LINE(e_table(i).empno||' '||e_table(i).ename);END LOOP;END;例3: 创建包MANAGE_EMP_PKG，对员工进行管理（新增员工、新增部门、删除指定员工、删除指定部门、增加指定员工的工资与奖金）：--创建序列从100开始,依次增加1CREATE SEQUENCE empseqSTART WITH100INCREMENT BY1ORDER NOCYCLE;--创建序列从100开始,依次增加10CREATE SEQUENCE deptseqSTART WITH100INCREMENT BY10ORDER NOCYCLE;-- *******************************************-- 创建包说明-- 包名：MANAGE_EMP_PKG-- 功能描述：对员工进行管理(新增员工,新增部门-- ,删除员工,删除部门,增加工资与奖金等)-- 创建人员：胡勇-- 创建日期：2010-05-19-- Q Q: 80368704-- E-mail : 80368704@-- WebSite: /huyong-- ******************************************CREATE OR REPLACE PACKAGE MANAGE_EMP_PKGAS--增加一名员工FUNCTION hire_emp(ename VARCHAR2, job VARCHAR2, mgr NUMBER, sal NUMBER, comm NUMBER, deptno NUMBER)RETURN NUMBER;--新增一个部门FUNCTION add_dept(dname VARCHAR2, loc VARCHAR2)RETURN NUMBER;--删除指定员工PROCEDURE remove_emp(empno NUMBER);--删除指定部门PROCEDURE remove_dept(deptno NUMBER);--增加指定员工的工资PROCEDURE increase_sal(empno NUMBER, sal_incr NUMBER);--增加指定员工的奖金PROCEDURE increase_comm(empno NUMBER, comm_incr NUMBER);END MANAGE_EMP_PKG;--创建包说明结束-- *******************************************-- 创建包体-- 包名：MANAGE_EMP_PKG-- 功能描述：对员工进行管理(新增员工,新增部门-- ,删除员工,删除部门,增加工资与奖金等)-- 创建人员：胡勇-- 创建日期：2010-05-19-- Q Q: 80368704-- E-mail : 80368704@-- WebSite: /huyong-- ******************************************CREATE OR REPLACE PACKAGE BODY MANAGE_EMP_PKGAStotal_emps NUMBER; --员工数total_depts NUMBER; --部门数no_sal EXCEPTION;no_comm EXCEPTION;--增加一名员工FUNCTION hire_emp(ename VARCHAR2, job VARCHAR2, mgr NUMBER,sal NUMBER, comm NUMBER, deptno NUMBER)RETURN NUMBER--返回新增加的员工编号ISnew_empno NUMBER(4);BEGINSELECT empseq.NEXTVAL INTO new_empno FROM dual;SELECT COUNT(*) INTO total_emps FROM emp;--当前记录总数INSERT INTO empVALUES (new_empno, ename, job, mgr, sysdate, sal, comm, deptno); total_emps:=total_emps+1;RETURN(new_empno);EXCEPTIONWHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END hire_emp;--新增一个部门FUNCTION add_dept(dname VARCHAR2, loc VARCHAR2)RETURN NUMBERISnew_deptno NUMBER(4); --部门编号BEGIN--得到一个新的自增的员工编号SELECT deptseq.NEXTVAL INTO new_deptno FROM dual;SELECT COUNT(*) INTO total_depts FROM dept;--当前部门总数INSERT INTO dept VALUES (new_deptno, dname, loc);total_depts:=total_depts;RETURN(new_deptno);EXCEPTIONWHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END add_dept;--删除指定员工PROCEDURE remove_emp(empno NUMBER)ISno_result EXCEPTION; --自定义异常BEGINDELETE FROM emp WHERE emp.empno=remove_emp.empno;IF SQL%NOTFOUND THENRAISE no_result;END IF;total_emps:=total_emps -1; --总的员工数减1EXCEPTIONWHEN no_result THENDBMS_OUTPUT.PUT_LINE('温馨提示:你需要的数据不存在!');WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END remove_emp;--删除指定部门PROCEDURE remove_dept(deptno NUMBER)ISno_result EXCEPTION; --自定义异常exception_deptno_remaining EXCEPTION; --自定义异常/*-2292 是违反一致性约束的错误代码*/PRAGMA EXCEPTION_INIT(exception_deptno_remaining, -2292); BEGINDELETE FROM dept WHERE dept.deptno=remove_dept.deptno;IF SQL%NOTFOUND THENRAISE no_result;END IF;total_depts:=total_depts-1; --总的部门数减1EXCEPTIONWHEN no_result THENDBMS_OUTPUT.PUT_LINE('温馨提示:你需要的数据不存在!');WHEN exception_deptno_remaining THENDBMS_OUTPUT.PUT_LINE('温馨提示:违反数据完整性约束!');WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END remove_dept;--给指定员工增加指定数量的工资PROCEDURE increase_sal(empno NUMBER, sal_incr NUMBER)IScurr_sal NUMBER(7, 2); --当前工资BEGIN--得到当前工资SELECT sal INTO curr_sal FROM emp WHERE emp.empno=increase_sal.empno;IF curr_sal IS NULL THENRAISE no_sal;ELSEUPDATE emp SET sal = sal + increase_sal.sal_incr --当前工资加新增的工资WHERE emp.empno = increase_sal.empno;END IF;EXCEPTIONWHEN NO_DATA_FOUND THENDBMS_OUTPUT.PUT_LINE('温馨提示:你需要的数据不存在!');WHEN no_sal THENDBMS_OUTPUT.PUT_LINE('温馨提示:此员工的工资不存在!');WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END increase_sal;--给指定员工增加指定数量的奖金PROCEDURE increase_comm(empno NUMBER, comm_incr NUMBER)IScurr_comm NUMBER(7,2);BEGIN--得到指定员工的当前资金SELECT comm INTO curr_commFROM emp WHERE emp.empno = increase_comm.empno;IF curr_comm IS NULL THENRAISE no_comm;ELSEUPDATE emp SET comm = comm + increase_m_incrWHERE emp.empno=increase_comm.empno;END IF;EXCEPTIONWHEN NO_DATA_FOUND THENDBMS_OUTPUT.PUT_LINE('温馨提示:你需要的数据不存在!');WHEN no_comm THENDBMS_OUTPUT.PUT_LINE('温馨提示:此员工的奖金不存在!');WHEN OTHERS THENDBMS_OUTPUT.PUT_LINE('温馨提示:发生系统错误!');END increase_comm;END MANAGE_EMP_PKG;--创建包体结束--调用SQL> variable empno numberSQL>execute :empno:= manage_emp_pkg.hire_emp('HUYONG',PM,1455,5500,14,10)PL/SQL procedure successfully completedempno---------105例4：利用游标变量创建包CURROR_VARIBAL_PKG。
