《数据库技术及应用》实验报告5

实 验 报 告数据库技术及应用课程名称实验5 存储过程、函数、触发器操作实验项目名称实验时间周一10-12节（日期及节次）专业 软件工程年级姓名实验室名称

学生所在学院 软件学院学号指导教师4号楼138实验成绩 操作技预习情况

实验报

附加：综 实验合创新能术

告

综合成力绩教师签字黑龙江大学教务处黑龙江大学计算机科学与技术专业、软件工程专业《数据库技术及应用》课程实验报告学号 姓名 班级实验时间周一10-12节实验名称 实验5 存储过程、函数、触发器操作一、 实验目的存储过程、函数、触发器操作二、 实验环境WindowsXP，Oracle数据库三、 主要内容已知一个已经建好的数据库 factory, 现在该数据库上存在三个表1. 职工表 worker,其结构为(职工号numnber,姓名char(8), 性别char(2) , 出生日期date, 党员否char, 参加工作时间 date ,部门号number), 其中职工号为主键2.部门表department结构为(varchar(20)),其中部门号为主键

部门号 number, 部门名称. 通常的部门信息有人事部 ,市场部,财务处等等3. 职工工资表 salary 其结构为 ( 职工号 number,姓名char(10), 日期date, 工资number(10,2)). 其中职工号和日期为关键字在以上的数据库上完成如下操作：创建一个为worker表添加职工记录的存储过程addworker创建一个为给定职工号,查询职工信息及部门名称的存储过程query_worker创建一个为给定职工号,删除worker表中记录的存储过程delete_worker显示存储过程创建一个函数，完成给定职工号返回职工所在部门的名称的函数创建一个函数，完成给定部门号返回该部门的最大年龄的函数在表department上创建一个触发器deaprt_update，当更改部门号时同步更改worker表中对应的部门号在表worker上创建一个触发器worker_delete，当删除职工记录同步删除对应职工的工资记录删除两个刚刚建立触发器四、 实验总结CREATEORREPLACEPROCEDUREreturn_deptinfo(p_deptno%TYPE,p_avgsalOUT%TYPE,p_countOUT%TYPE

)ASBEGINSELECTavg(sal),count(*)INTOp_avgsal,p_countFROMemp WHEREdeptno=p_deptno;EXCEPTIONWHENNO_DATA_FOUNDTHEN('Thedepartmentdon ’’texists!');ENDreturn_deptinfo;CREATEORREPLACEFUNCTIONreturn_maxsal(p_deptno%TYPE)RETURN %TYPEASv_maxsal%TYPE;BEGINSELECTmax(sal)INTOv_maxsalFROMempWHEREdeptno=p_deptno;RETURNv_maxsal;EXCEPTIONWHENNO_DATA_FOUNDTHEN('Thedeptnoisinvalid!');ENDreturn_maxsal;CREATEORREPLACEFUNCTIONreturn_sumsal(p_deptnoin%TYPE ，p_deptnameout%type)RETURN %TYPEASv_sumsal%TYPE;BEGINSELECT sum(sal)

INTO

v_sumsal

FROMemp

WHEREdeptno=p_deptno;select dname

into

p_deptname

from

dept

wheredeptno=p_deptno;RETURNv_sumsal;EXCEPTIONWHENNO_DATA_FOUNDTHEN('Thedeptnoisinvalid!');ENDreturn_sumsal;DECLAREv_deptno%TYPE;v_avgsal%TYPE;FUNCTIONreturn_avgsal(p_deptno%TYPE)RETURN%TYPEAS v_sal%TYPE;BEGINSELECT avg(sal) INTO v_sal FROMemp WHEREdeptno=p_deptno;RETURNv_sal;ENDreturn_avgsal;PROCEDUREshow_emp(p_deptno%TYPE)ASCURSORc_empISSELECT

*

FROM

emp

WHEREsal<return_avgsal(p_deptno);BEGINFORv_empINc_empLOOP||''||;ENDLOOP;ENDshow_emp;BEGINv_deptno:=&x;v_avgsal:=return_avgsal(v_deptno);show_emp(v_deptno);END;CREATEORREPLACETRIGGERtrg_emp_dmlAFTERINSERTORUPDATEORDELETEONempDECLAREv_countNUMBER;v_sal NUMBER(6,2);BEGINIFINSERTINGTHENSELECTcount(*)INTOv_countFROMemp;(v_count);ELSIFUPDATINGTHENSELECTavg(sal)INTOv_salFROMemp;(v_sal);ELSEFORv_dept IN(SELECTdeptno,count(*) numFROMempGROUPBYdeptno)LOOP||''||;ENDLOOP;ENDIF;ENDtrg_emp_dml;CREATEORREPLACETRIGGERtrg_emp_dml_rowBEFOREINSERTOR