当前位置:首页 > 开发 > 数据库 > 正文

Oracle学习笔记(7) 开发PLSQL子程序和包

发表于: 2010-04-07   作者:vipbooks   来源:转载   浏览:
摘要:     哈哈,清明节放假回去了一下,真是太好了,回家的感觉真好啊!现在又开始出差之旅了,又好久没有来了,今天继续Oracle的学习!      这是第七章的学习笔记,学习完第六章的动态SQL之后,开始要学习子程序和包的使用了……,希望大家能多给俺一些支持啊!     编程时使用的工具是PLSQL
    哈哈,清明节放假回去了一下,真是太好了,回家的感觉真好啊!现在又开始出差之旅了,又好久没有来了,今天继续Oracle的学习!
     这是第七章的学习笔记,学习完第六章的动态SQL之后,开始要学习子程序和包的使用了……,希望大家能多给俺一些支持啊!
    编程时使用的工具是PLSQL Developer 7.1.4

在CMD下执行PL/SQL:
可以用exec或者call调用存储过程
定义变量时要用var,如:var username varchar2(20);
在调用变量时必须在变量名的前面加上双引号,如:exec :username := 'user1';
在调用存储过程时也要在变量名的前面加上双引号,如exec compute(:n1,:n2);
可以使用show error输出当前错误
查看存储过程的源代码:
select text from user_source where name='COMPUTE';

创建带输入、输出参数的存储过程:
在创建存储过程时可以定义in(输入参数,默认),out(输出参数)和in out(输入输出参数)三种参数
create or replace procedure compute(num1 in out number,num2 in out number) is
   n1 number(10,2);
   n2 number(10,2);
begin
   n1 := num1/num2;
   n2 := mod(num1,num2);
   -- 给要返回的变量赋值
   num1 := n1;
   num2 := n2;
end;
/

开发函数:
在指定函数的参数类型时,不能指定其长度;Return子句用于指定函数返回值的数据类型
IS或AS用于开始一个PL/SQL块(替代了declare)
在函数头部必须有Return子句,在函数体内至少要包含一个Return子句
在创函数时可以指定in(输入参数,默认),out(输出参数)和in out(输入输出参数)三种参数
-- 创建带输入输出参数的函数
create or replace function get_result(num1 number,num2 in out number)
return number is
   n_result number(6);
   n_remainder number;
begin
   n_result := num1/num2;
   n_remainder := mod(num1,num2);
   num2 := n_remainder;
   return n_result;
end;
/

开发包:
创建包规范,相当于Java中定义接口,在这里定义的变量、函数和子程序都是公有的
create or replace package emp_package is
   -- 定义公共变量
   n_temp number(10,2) := 888.888;
   -- 定义添加员工的存储过程
   procedure add_emp(empno number,name varchar2,job varchar2,manager varchar2,hiredate varchar2,salary number,commision varchar2,deptno number);
   -- 定义解雇员工的存储过程
   procedure fire_emp(n_empno number);
   -- 定义获得指定员工编号的员工工资的函数
   function get_salary(n_empno number) return number;
end emp_package;
/
-- 创建包体,相当于Java中的接口实现类
create or replace package body emp_package is
   -- 定义一个用来验证员工编号是否存在的私有函数
   function validate_empno(n_empno number) return boolean is
      n_temp employee.empno%type;
   begin
      select empno into n_temp from employee where empno = n_empno;
      return true;
   exception
      when no_data_found then return false;
      when others then return false;      
   end;
   -- 实现添加员工的存储过程
   procedure add_emp(empno number,name varchar2,job varchar2,manager varchar2,hiredate varchar2,
                     salary number,commision varchar2,deptno number) is
   begin 
      if validate_empno(empno) then
         raise_application_error(-20001,'编号为' || empno || '的员工已经存在!');
      else
         insert into employee values(empno,name,job,manager,hiredate,salary,commision,deptno);
         commit;
      end if;
    end;
    -- 实现解雇员工的存储过程
    procedure fire_emp(n_empno number) is
    begin
       if validate_empno(n_empno) then
          delete from employee where empno = n_empno;
          commit;
       else
          raise_application_error(-20003,'编号为' || n_empno || '的员工不存在!');
       end if;
    end;
    -- 实现获得指定员工编号的员工工资的函数
    function get_salary(n_empno number) return number is
       n_salary employee.salary%type;
    begin
       if validate_empno(n_empno) then
          select salary into n_salary from employee where empno = n_empno;
          return n_salary;
       else        
          raise_application_error(-20004,'编号为' || n_empno || '的员工不存在!');
       end if;
    end;   
end emp_package;
/

测试块:
declare
   n_1 number(10,2);
   n_2 number(10,2);
begin
   -- 测试存储过程compute
   n_1 := 20;
   n_2 := 8;
   -- 位置传递
   --compute(n_1,n_2);
   -- 名称传递
   compute(num1 => n_1,num2 => n_2);
   dbms_output.put_line('n_1=' || n_1 || '   n_2=' || n_2);
   -- 测试函数get_result
   n_1 := 20;
   n_2 := 8;
   n_2 := get_result(num1 => 100,num2 => n_1);
   dbms_output.put_line('n_1=' || n_1 || '   n_2=' || n_2);
   -- 测试包
   dbms_output.put_line('包中定义的公共变量:' || emp_package.n_temp);
   emp_package.add_emp(22,'李明','人事助理',0,'2006-08-15',4200,'人事',1);
   emp_package.fire_emp(2);
   dbms_output.put_line('编号为1的员工工资是:' || emp_package.get_salary(1));
end;
/

存储过程 VS 函数:
 
存储与过程相同点:
都有输入、输出、输入输出参数

不同点:
函数必须有返回值
函数不能修改数据

用途:
存储过程:主要用数据修改和业务处理
函    数:只能用于数据计算


重载子程序:
在一个包中定义的两个子程序名称相同,而参数不同。
在调用时Oracle将自动根据参数类型调用对应子程序。

限制:
如果两个子程序仅参数名称不同,则不算重载
参数类型相同,而返回类型不同,不算重载
重载的参数必须是基本类型。

Oracle学习笔记(7) 开发PLSQL子程序和包

  • 0

    开心

    开心

  • 0

    板砖

    板砖

  • 0

    感动

    感动

  • 0

    有用

    有用

  • 0

    疑问

    疑问

  • 0

    难过

    难过

  • 0

    无聊

    无聊

  • 0

    震惊

    震惊

编辑推荐
1、位置的,名字的,混合的参数传递: DECLARE <blockquote style="margin-top:0px; margin-righ
Oracle 中的伪列 Oracle 的表的使用过程中,实际表中还有一些附加的列,称为伪列。伪列就像表中 的
文章转自:http://www.lookswift.com 闭包是个自包含的,可以在代码中传递的“块”。。。好吧,不纠
4.1 建立程序步骤概述 按图4-1的顺序来进行。 4.2 程序设计语言(PDL) 有效使用PDL的一些方针:1)用
  我们需要站在巨人的肩膀上来开发应用。   工具 + 巨人 + 能力 = 漂亮应用   人是发明并使用
七 RTP打包与发送 rtp传送开始于函数:MediaSink::startPlaying()。想想也有道理,应是sink跟source
七 RTP打包与发送 rtp传送开始于函数:MediaSink::startPlaying()。想想也有道理,应是sink跟source
接 Rails学习笔记(6),主要是对render和direct_to方法的一些理解和体会。 以前在 Rails学习笔记(
第七周呢主要是对SVM的介绍 ng首先从以前讲过的logistic regression入手 将logistic regression的两
第七周呢主要是对SVM的介绍 ng首先从以前讲过的logistic regression入手 将logistic regression的两
版权所有 IT知识库 CopyRight © 2009-2015 IT知识库 IT610.com , All Rights Reserved. 京ICP备09083238号