快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

oracle包的创建

一 包的组成

创新互联成立以来不断整合自身及行业资源、不断突破观念以使企业策略得到完善和成熟,建立了一套“以技术为基点,以客户需求中心、市场为导向”的快速反应体系。对公司的主营项目,如中高端企业网站企划 / 设计、行业 / 企业门户设计推广、行业门户平台运营、app软件定制开发成都做手机网站、微信网站制作、软件开发、德阳服务器托管等实行标准化操作,让客户可以直观的预知到从创新互联可以获得的服务效果。

1)包头(package):包头部分申明包内数据类型,常量,变量,游标,子程序和异常错误处理,

   这些元素为包的公有元素。

2)包主体(package body):包主体则是包定义部分的具体实现,它负责为包头中所声明子程序

   提供具体的实现,在包主体中还可以声明包的私有元素

3)包头和包主体分开编译,并作为两个分开的对象分别存放在数据库字典中

--删除package

--drop package pkg_lxg_test;

--1)首先创建package头(头和body的sql不要写在同一个文件中执行)

---- 这里可以声明多个procedure(如果外部调用才声明)

create or replace package pkg_lxg_test as

  procedure deleteTask(taskTypeCode  in varchar2, --任务类型代码

                     businessKey   in varchar2, --业务号

                     resultCode    out varchar2, --结果代码

                     resultMessage out varchar2 --结果信息

                     );

end pkg_lxg_test;

--)2 再创建package体(上面的头不能和体一起执行,移交时应该写成两个sql文件进行移交)

--)3 创建完成后,如果创建成功了会自动编译的

--)4 如果在创建package不成功的话,在查看和说明中可以查看到错误

--)5 package创建完成后,-->右键,查看--->然后选中你要测试的package中的proc点击右键---》测试

CREATE OR REPLACE PACKAGE BODY NBADATA.pkg_lxg_test AS

function function2(taskTypeCode  in varchar2,businessKey in varchar2) return varchar2

  is

   v_preview_environment  varchar2(4);

   v_voucher_no varchar2(50);

   v_count          number default 0;

begin

   v_preview_environment:= '1';

   --dbms_output.put_line('执行了方法function2');

   return v_preview_environment;

end function2;

 --这里定义procedure,可以定点多个

 procedure deleteTask(taskTypeCode  in varchar2, --任务类型代码

                     businessKey   in varchar2, --业务号

                     resultCode    out varchar2, --结果代码

                     resultMessage out varchar2 --结果信息

                     ) IS

 begin

       begin

             resultCode    := '0';

             resultMessage := 'delete asynchrouns task sucess';

            --dbms_output.put_line('成功执行了存储过程');

       exception

         when others then

           resultCode    := '1';

           resultMessage := 'fail in deleting asynchrouns task sucess';

       end;

 end deleteTask;

end pkg_lxg_test;


名称栏目:oracle包的创建
转载来于:http://6mz.cn/article/jihjgh.html

其他资讯