1、实验十：存储过程、函数和程序包实验目的：1. 能够正确编写存储过程2. 能够正确定义和使用存储过程参数3. 能够正确调用存储过程实验要求：1. 按以下步骤完成如下操作，并对出现的现象进行解释2. 将命令和操作过程记录到实验过程记录中实验步骤和方法：1. 启动本地 Oracle 服务器2. 以 scott 用户普通身份连接到 PL/SQL developer3. 按要求编写 PL/SQL 存储过程，并用两种方式调用各个存储过程 （在查询中尽量思考，找到不一样的解题方案） 1) 编写给每个员工发放额外补贴 500 的存储过程。( 提示 :COMM 字段值增加 500)2) 创建新增部门的存储过程
2、INSERT_DEPT，部门号、部门名称和部门所在位置作为参数。 （关于参数存储过程的用法：in 参数的使用）4. 按要求编写函数，并编写匿名程序块函数进行调用：1) 创建一个通过部门编号返回部门名称的存储函数 GET_DEPT_NAME。2) 创建比较两个数大小的函数，返回较大值。5. 按要求编写包：1) 创建管理部门信息的包 pacdept，具有从 dept 表获得指定部门信息，修改部门名称，添加部门信息的功能（注：各模块应包含异常处理模块） 。(可以参考下一页的案例 1)思考：1、在实验中是否懂得了存储过程以及带参数的存储过程的用法？【案例 1】创建管理雇员信息的包 EMPLOYE，具有
3、从 EMP 表获得雇员信息，修改雇员名称，修改雇员工资和写回 EMP 表的功能。步骤 1：登录 SCOTT 账户，输入以下代码，并编译：CREATE OR REPLACE PACKAGE EMPLOYE -包头部分 ISPROCEDURE SHOW_DETAIL; PROCEDURE GET_EMPLOYE(P_EMPNO NUMBER); PROCEDURE SAVE_EMPLOYE; PROCEDURE CHANGE_NAME(P_NEWNAME VARCHAR2); PROCEDURE CHANGE_SAL(P_NEWSAL NUMBER); END EMPLOYE;/CREATE OR
4、 REPLACE PACKAGE BODY EMPLOYE -包体部分 ISEMPLOYE EMP%ROWTYPE;- 显示雇员信息 -PROCEDURE SHOW_DETAILASBEGINDBMS_OUTPUT.PUT_LINE(- 雇员信息 -);DBMS_OUTPUT.PUT_LINE(雇员编号：|EMPLOYE.EMPNO);DBMS_OUTPUT.PUT_LINE(雇员名称：|EMPLOYE.ENAME);DBMS_OUTPUT.PUT_LINE(雇员职务：|EMPLOYE.JOB);DBMS_OUTPUT.PUT_LINE(雇员工资：|EMPLOYE.SAL);DBMS_OUTP
5、UT.PUT_LINE(部门编号：|EMPLOYE.DEPTNO);END SHOW_DETAIL;- 从 EMP 表取得一个雇员 -PROCEDURE GET_EMPLOYE(P_EMPNO NUMBER)ASBEGINSELECT * INTO EMPLOYE FROM EMP WHERE EMPNO=P_EMPNO;DBMS_OUTPUT.PUT_LINE(获取雇员|EMPLOYE.ENAME|信息成功);EXCEPTIONWHEN OTHERS THENDBMS_OUTPUT.PUT_LINE(获取雇员信息发生错误！);END GET_EMPLOYE;- 保存雇员到 EMP 表 -PR
6、OCEDURE SAVE_EMPLOYEASBEGINUPDATE EMP SET ENAME=EMPLOYE.ENAME,SAL=EMPLOYE.SAL WHERE EMPNO=EMPLOYE.EMPNO;DBMS_OUTPUT.PUT_LINE(雇员信息保存完成！);END SAVE_EMPLOYE;- 修改雇员名称 -PROCEDURE CHANGE_NAME(P_NEWNAME VARCHAR2)ASBEGINEMPLOYE.ENAME:=P_NEWNAME;DBMS_OUTPUT.PUT_LINE(修改名称完成！);END CHANGE_NAME;- 修改雇员工资 -PROCEDUR
7、E CHANGE_SAL(P_NEWSAL NUMBER)ASBEGINEMPLOYE.SAL:=P_NEWSAL;DBMS_OUTPUT.PUT_LINE(修改工资完成！);END CHANGE_SAL;END EMPLOYE;步骤 2：获取雇员 7788 的信息。SET SERVEROUTPUT ONEXECUTE EMPLOYE.GET_EMPLOYE(7788);获取雇员 SCOTT 信息成功PL/SQL 过程已成功完成。步骤 3：显示雇员信息EXECUTE EMPLOYE.SHOW_DETAIL;- 雇员信息 -雇员编号：7788雇员名称：SCOTT雇员职务：ANALYST雇员工资：3000部门编号：20PL/SQL 过程已成功完成。步骤 4：修改雇员工资EXECUTE EMPLOYE.CHANGE_SAL(3800);修改工资完成！PL/SQL 过程已成功完成。步骤 5：将修改的雇员信息存入 EMP 表EXECUTE EMPLOYE.SAVE_EMPLOYE;雇员信息保存完成！PL/SQL 过程已成功完成。
