模块化

模块化

模块化可以让我们把程序分成多个部分，这样可以把复杂的问题划分开来，更好的解决问题。PL/SQL为我们提供了块、子程序和包三个程序单元来用于模块化处理。

• 子程序

子程序有两种，分别是函数和过程。子程序很像一段小型的程序，由可选的声明部分，执行控制部分和可选的异常控制部分组成。

PROCEDURE award_bonus(emp_id NUMBER) IS
  bonus          REAL;
  comm_missing   EXCEPTION;
BEGIN   -- executable part starts here
  SELECT comm * 0.15
    INTO bonus
    FROM emp
   WHERE empno = emp_id;

  IF bonus IS NULL THEN
    RAISE comm_missing;
  ELSE
    UPDATE payroll
       SET pay = pay + bonus
     WHERE empno = emp_id;
  END IF;
EXCEPTION   -- exception-handling part starts here
  WHEN comm_missing THEN
    ...
END award_bonus;

调用时，这个过程接受一个雇员编号。它使用编号来查询雇员的commission，同时计算出15%的奖金。然后，它检查bonus总值。如果奖金为空，就会抛出异常，否则雇员的工资记录就会被更新。

• 包(Package)

PL/SQL可以让我们把逻辑相关的类型、变量、游标和子程序放在一个包内，这样更加清楚易理解。包通常有两部分组成：包说明部分和包体部分。包说明部分是应用程序的接口，它"声明"了类型、常量、变量、异常、游标和可以使用的子程序。包体用于实现包说明部分声明的子程序和游标。

下面的例子是把两个雇用相关的过程进行打包：

CREATE PACKAGE emp_actions AS   -- package specification
  PROCEDURE hire_employee(empno NUMBER, ename CHAR, ...);

  PROCEDURE fire_employee(emp_id NUMBER);
END emp_actions;

CREATE PACKAGE BODY emp_actions AS   -- package body
  PROCEDURE hire_employee(empno NUMBER, ename CHAR, ...); IS
  BEGIN
    INSERT INTO emp
         VALUES (empno, ename, ...);
  END hire_employee;

  PROCEDURE fire_employee(emp_id NUMBER) IS
  BEGIN
    DELETE FROM emp
          WHERE empno = emp_id;
  END fire_employee;
END emp_actions;

只有在包说明中声明的内容对应用程序是可见的，而包体中的内容是不可见，无法访问的。包被编译后会存放到数据库中，当我们首次调用包中的子程序时，整个包就会被加载到内存当中，所以，后续的调用不再涉及到磁盘的读取问题。因此，包可以提高效率改善性能。