Oracle实验报告之触发器

实验报告实验名称：使用游标、存储过程和触发器实验课时：2课时实验地点：E305实验时间：2014年5月21日星期三第14周实验目的及要求：了解游标的概念和工作原理。了解存储过程的分类和使用方法。了解触发器的概念。学习编写和执行自定义过程。学习创建和使用触发器。实验环境：硬件设备：PC机一台操作系统：WindowsXP应用工具：Oracle11g实验内容：（算法、程序、步骤和方法）创建游标mycur，从表employees中读取1号部门的员工姓名，职务。并输出“员工姓名：XXX，职务：XXX。”程序代码如下：setserveroutputon;DECLARECURSORmycurISSELECTemp_name,titleFROMemployeeswheredep_id=1;BEGINFORywINmycurLOOPdbms_output.put_line('员工姓名:'||yw.emp_Name||'职务:'||yw.title);ENDLOOP;END;执行结果如下：创建存储过程GetGrade，查询指定员工的工资，使用CASE语句输出其工资等级。工资小于等于3000，等级为“低”；工资大于3000，小于5000，等级为”中”；工资大于等于5000，等级为高。并执行该存储过程。创建存储过程代码如下：createorreplaceproceduregetgrade(yw_depidnumber)asyw_wageemployees.wage%type;yw_gradevarchar2(5);beginselectwageintoyw_wagefromemployeeswhereemp_id=yw_depid;yw_grade:=casewhenyw_wage<=3000then'低'whenyw_wage>=3000andyw_wage<5000then'中'whenyw_wage>=5000then'高'end;dbms_output.put_line('该员工工资等级为'||yw_grade);end;执行存储过程代码如下：executegetgrade(3);callgetgrade(3);执行结果如下：创建存储过程UpdateWage，查询指定员工的工资，如果工资小于3000，则加200工资，并提示信息“XX号员工工资已更新。”，如果工资大于3000，则提示信息“XX号员工工资为XXX，已达到规定标准。”创建存储过程代码如下：createorreplaceprocedureupdatewage(yw_depidnumber)asyw_wageemployees.wage%ywpe;BEGINSelectwageintoyw_wageFromemployeesWhereemployees.emp_id=yw_depid;Ifyw_wage<3000thenUpdateemployeesSetemployees.wage=employees.wage+200Whereemployees.emp_id=yw_depid;Commit;DBMS_OUTPUT.PUT_LINE('5号工资已更新');ElseDBMS_OUTPUT.PUT_LINE('5号工资为'||yw_wage||'已达到规定标准');ENDif;ExceptionWhenno_data_foundthenDBMS_OUTPUT.PUT_LINE('不存在该员工');WhenothersthenDBMS_OUTPUT.PUT_LINE('其他异常');End;/执行存储过程代码如下：Callupdatewage(3);执行结果如下：创建触发器MyTrigger，它的作用是当表departments中的记录被删除后，自动删除表employees中的对应的员工记录，从而保证数据的完整性。程序代码如下：createorreplacetriggermytriggerafterupdateondepartmentsforeachrowbeginupdateemployeessetdep_id=:new.dep_idwheredep_id=:old.dep_id;end;执行结果如下：小结：通过这次上机实验，我有以下收获：了解了如何使用