oracle PL-SQL学习案例（三）

存储过程
========================================================================== 
========================================================================== 

【训练15.1】  创建一个显示雇员总人数的存储过程。
  步骤1：登录SCOTT账户(或学生个人账户)。
  步骤2：在SQL*Plus输入区中，输入以下存储过程：
CREATE OR REPLACE PROCEDURE EMP_COUNT
AS
    V_TOTAL NUMBER(10);
BEGIN
     SELECT COUNT(*) INTO V_TOTAL FROM EMP;
     DBMS_OUTPUT.PUT_LINE('雇员总人数为：'||V_TOTAL);
END;
步骤3：按“执行”按钮进行编译。
  如果存在错误，就会显示:
  警告: 创建的过程带有编译错误。
  如果存在错误，对脚本进行修改，直到没有错误产生。
  如果编译结果正确，将显示：
  过程已创建。
  步骤4：调用存储过程，在输入区中输入以下语句并执行：
  
  显示结果为：
  雇员总人数为：14
  PL/SQL 过程已成功完成。
说明：在该训练中，V_TOTAL变量是存储过程定义的局部变量，用于接收查询到的雇员总人数。
  注意：在SQL*Plus中输入存储过程，按“执行”按钮是进行编译，不是执行存储过程。

==========================================================================

【训练15.2】  在PL/SQL程序中调用存储过程。
  步骤1：登录SCOTT账户。
  步骤2：授权STUDENT账户使用该存储过程，即在SQL*Plus输入区中，输入以下的命令：
  GRANT EXECUTE ON EMP_COUNT TO STUDENT
  授权成功。
  步骤3：登录STUDENT账户，在SQL*Plus输入区中输入以下程序：
  SET SERVEROUTPUT ON
  BEGIN
  SCOTT.EMP_COUNT;
  END;
步骤4：执行以上程序，结果为：
  雇员总人数为：14
  PL/SQL 过程已成功完成。?
    说明：在本例中，存储过程是由SCOTT账户创建的，STUDEN账户获得SCOTT账户的授权后，才能调用该存储过程。
    注意：在程序中调用存储过程，使用了第二种语法。
==========================================================================

【训练15.3】  编写显示雇员信息的存储过程EMP_LIST，并引用EMP_COUNT存储过程。
  步骤1：在SQL*Plus输入区中输入并编译以下存储过程：
CREATE OR REPLACE PROCEDURE EMP_LIST
AS
  CURSOR emp_cursor IS
  SELECT empno,ename FROM emp;
BEGIN
    FOR Emp_record IN emp_cursor LOOP  
        DBMS_OUTPUT.PUT_LINE(Emp_record.empno||Emp_record.ename);
    END LOOP;
    EMP_COUNT;
END;
  执行结果：
  过程已创建。
  步骤2：调用存储过程，在输入区中输入以下语句并执行：
EXECUTE EMP_LIST
显示结果为：
7369SMITH
7499ALLEN
7521WARD
7566JONES
      执行结果：
  雇员总人数为：14
  PL/SQL 过程已成功完成。
说明：以上的EMP_LIST存储过程中定义并使用了游标，用来循环显示所有雇员的信息。然后调用已经成功编译的存储过程EMP_COUNT，用来附加显示雇员总人数。通过EXECUTE命令来执行EMP_LIST存储过程。
  【练习1】编写显示部门信息的存储过程DEPT_LIST，要求统计出部门个数。
  
  
==========================================================================

 

 

【训练16.1】  编写给雇员增加工资的存储过程CHANGE_SALARY，通过IN类型的参数传递要增加工资的雇员编号和增加的工资额。
  步骤1：登录SCOTT账户。
    步骤2：在SQL*Plus输入区中输入以下存储过程并执行：
CREATE OR REPLACE PROCEDURE CHANGE_SALARY(P_EMPNO IN NUMBER DEFAULT 7788,P_RAISE NUMBER DEFAULT 10)
AS
     V_ENAME VARCHAR2(10);
     V_SAL NUMBER(5);
BEGIN
     SELECT ENAME,SAL INTO V_ENAME,V_SAL FROM EMP WHERE EMPNO=P_EMPNO;
     UPDATE EMP SET SAL=SAL+P_RAISE WHERE EMPNO=P_EMPNO;
     DBMS_OUTPUT.PUT_LINE('雇员'||V_ENAME||'的工资被改为'||TO_CHAR(V_SAL+P_RAISE));
     COMMIT;
EXCEPTION
     WHEN OTHERS THEN
        DBMS_OUTPUT.PUT_LINE('发生错误，修改失败！');
     ROLLBACK;
END;
  执行结果为：
  过程已创建。
  步骤3：调用存储过程，在输入区中输入以下语句并执行：
  EXECUTE CHANGE_SALARY(7788,80)
  显示结果为：
  雇员SCOTT的工资被改为3080?
  说明：从执行结果可以看到，雇员SCOTT的工资已由原来的3000改为3080。

==========================================================================

 【训练16.2】  调用存储过程CHANGE_SALARY，不传递参数，使用默认参数值。
  在SQL*Plus输入区中输入以下命令并执行：
  EXECUTE CHANGE_SALARY
  显示结果为：
  雇员SCOTT的工资被改为3090
  说明：在存储过程的调用中没有传递参数，而是采用了默认值7788和10，即默认雇员号为7788，增加的工资为10。

参数的值由调用者传递，传递的参数的个数、类型和顺序应该和定义的一致。如果顺序不一致，可以采用以下调用方法。如上例，执行语句可以改为：
EXECUTE CHANGE_SALARY(P_RAISE=>80,P_EMPNO=>7788);
可以看出传递参数的顺序发生了变化，并且明确指出了参数名和要传递的值，=>运算符左侧是参数名，右侧是参数表达式，这种赋值方法的意义较清楚。

【练习1】创建插入雇员的存储过程INSERT_EMP，并将雇员编号等作为参数。
  在设计存储过程的时候，也可以为参数设定默认值，这样调用者就可以不传递或少传递参数了。
  
==========================================================================
  【训练16.3】  使用OUT类型的参数返回存储过程的结果。
  步骤1：登录SCOTT账户。
  步骤2：在SQL*Plus输入区中输入并编译以下存储过程：
CREATE OR REPLACE PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)
AS
BEGIN
    SELECT COUNT(*) INTO P_TOTAL FROM EMP;
END;
  执行结果为：
  过程已创建。
  步骤3：输入以下程序并执行：
DECLARE
V_EMPCOUNT NUMBER;
BEGIN
    EMP_COUNT(V_EMPCOUNT);
    DBMS_OUTPUT.PUT_LINE('雇员总人数为：'||V_EMPCOUNT);
END;
  显示结果为：
  雇员总人数为：14
  PL/SQL 过程已成功完成。
    说明：在存储过程中定义了OUT类型的参数P_TOTAL，在主程序调用该存储过程时，传递了参数V_EMPCOUNT。在存储过程中的SELECT...INTO...语句中对P_TOTAL进行赋值，赋值结果由V_EMPCOUNT变量带回给主程序并显示。
  以上程序要覆盖同名的EMP_COUNT存储过程，如果不使用OR REPLACE选项，就会出现以下错误：
  ERROR 位于第 1 行:
  ORA-00955: 名称已由现有对象使用。
  【练习2】创建存储过程，使用OUT类型参数获得雇员经理名。

==========================================================================

  【训练16.4】  使用IN OUT类型的参数，给电话号码增加区码。
  步骤1：登录SCOTT账户。
  步骤2：在SQL*Plus输入区中输入并编译以下存储过程：
CREATE OR REPLACE PROCEDURE ADD_REGION(P_HPONE_NUM IN OUT VARCHAR2)
AS
BEGIN
    P_HPONE_NUM:='0755-'||P_HPONE_NUM;
END;
  执行结果为：
  过程已创建。
  步骤3：输入以下程序并执行：
DECLARE
    V_PHONE_NUM VARCHAR2(15);
BEGIN
    V_PHONE_NUM:='26731092';
    ADD_REGION(V_PHONE_NUM);
    DBMS_OUTPUT.PUT_LINE('新的电话号码：'||V_PHONE_NUM);
END;
  显示结果为：
  新的电话号码：0755-26731092
  PL/SQL 过程已成功完成。
  说明：变量V_HPONE_NUM既用来向存储过程传递旧电话号码，也用来向主程序返回新号码。新的号码在原来基础上增加了区号0755和-。

==========================================================================
  【训练17.1】  创建一个通过雇员编号返回雇员名称的函数GET_EMP_NAME。
  步骤1：登录SCOTT账户。
  步骤2：在SQL*Plus输入区中输入以下存储函数并编译：
CREATE OR REPLACE FUNCTION GET_EMP_NAME(P_EMPNO NUMBER DEFAULT 7788)
    RETURN VARCHAR2
AS
    V_ENAME VARCHAR2(10);
BEGIN
    SELECT ENAME INTO V_ENAME FROM EMP WHERE EMPNO=P_EMPNO;
    RETURN(V_ENAME);
EXCEPTION
 WHEN NO_DATA_FOUND THEN
  DBMS_OUTPUT.PUT_LINE('没有该编号雇员！');
  RETURN (NULL);
 WHEN TOO_MANY_ROWS THEN
  DBMS_OUTPUT.PUT_LINE('有重复雇员编号！');
  RETURN (NULL);
 WHEN OTHERS THEN
  DBMS_OUTPUT.PUT_LINE('发生其他错误！');
  RETURN (NULL);
END;
  步骤3：调用该存储函数，输入并执行以下程序：
BEGIN
  DBMS_OUTPUT.PUT_LINE('雇员7369的名称是：'|| GET_EMP_NAME(7369));
  DBMS_OUTPUT.PUT_LINE('雇员7839的名称是：'|| GET_EMP_NAME(7839));
END;
  显示结果为：
  雇员7369的名称是：SMITH
  雇员7839的名称是：KING
  PL/SQL 过程已成功完成。
 说明：函数的调用直接出现在程序的DBMS_OUTPUT.PUT_LINE语句中，作为字符串表达式的一部分。如果输入了错误的雇员编号，就会在函数的错误处理部分输出错误信息。试修改雇员编号，重新运行调用部分。
  【练习1】创建一个通过部门编号返回部门名称的存储函数GET_DEPT_NAME。
     【练习2】将函数的执行权限授予STUDENT账户，然后登录STUDENT账户调用
    
    
=============================================================================

  【训练18.1】  查询过程EMP_COUNT的脚本。
  在SQL*Plus中输入并执行如下查询：
  select TEXT  from user_source WHERE NAME='EMP_COUNT';
  结果为：
TEXT
--------------------------------------------------------------------------------
PROCEDURE EMP_COUNT(P_TOTAL OUT NUMBER)
AS
BEGIN
 SELECT COUNT(*) INTO P_TOTAL FROM EMP;
END;

===================================================================================

  【训练18.2】  查询过程GET_EMP_NAME的参数。
  在SQL*Plus中输入并执行如下查询：
  DESCRIBE GET_EMP_NAME
  结果为：
  FUNCTION GET_EMP_NAME RETURNS VARCHAR2
  参数名称            类型          输入/输出默认值？
  ----------------------------------------- ----------------------------------- ----------------- -------------
   P_EMPNO             NUMBER(4) IN     DEFAULT

=============================================================&#