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