实验16 游标、存储过程和函数参考答案

《实验16 游标、存储过程和函数参考答案》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、实验十六游标、存储过程和函数一、目的与要求1．了解游标的概念和工作原理；2．了解存储过程的分类和使用方法；3．了解触发器的概念；4．学习编写和执行自定义过程；5．学习编写和执行自定义函数；6．学习创建和使用触发器。二、实验准备1．首先要了解游标是映射在结果集中一行数据上的位置实体，有了游标，用户就可以访问结果集中的任意一行数据了。将游标放置到某行后，即可对该行数据进行操作，最常见的操作是提取当前行数据。2．使用显式游标的步骤：（1）说明游标。（2）打开游标。（3）读取数据。（4）关闭游标。3．了解PL/S

2、QL包括3种存储过程，即过程、函数和程序包。4．了解触发器是一种特殊的存储过程，当指定表中的数据发生变化时自动运行。三、实验内容1．练习书上的例子10.1—10.24。2．以上机实验经常用到的数据库LIB为例，编写过程P_ResetPrice，此过程的功能是将表图书中指定书号的单价更改为10.0，调用该过程将书号为’TP311.13/CM3’的单价更改为10.0，将程序写在实验报告中。createorreplaceprocedureP_ResetPrice(vBnoinvarchar2)asbeginup

3、date图书set单价=10.0where图书号=vBno;end;executeP_ResetPrice(‘TP311.13/CM3’);3．编写一函数F_GetBName，该函数的功能是在图书中根据指定的书号，返回该书的书名，并在匿名块中调用函数F_GetBName找出编号为“TP311.132/ZG1”的书名，将程序写在实验报告中。createfunctionF_GetName(vtnoIN图书.图书号%Type)return图书.书名%Typeasoutname图书.书名%Type;beginse

4、lect书名intooutnamefrom图书where图书号=vtno;returnoutname;end;setServerOutPuton;declarevarName图书.书名%Type;beginvarName:=F_GetName('TP311.132/ZG1');dbms_output.put_line(varName);end;4．创建一程序包MyPack，包含以上的过程P_ResetPrice和函数F_GetBName，并在匿名块中调用Mypack包中的过程和函数进行测试，将程序写在实验

5、报告中。CREATEPACKAGEMyPackISPROCEDUREP_ResetPrice(vBnoinvarchar2);FUNCTIONF_GetName(vtnoIN图书.图书号%Type)return图书.图书号%Type;ENDMyPack;CREATEPACKAGEBODYMyPackISPROCEDUREP_ResetPrice(vBnoinvarchar2)ASbeginupdate图书set单价=10.0where图书号=’’

6、

7、vBno

8、

9、’’;end;functionF_GetNa

10、me(vtnoIN图书.图书号%Type)return图书.图书号%Typeasoutname图书.图书号%Type;beginselect书名intooutnamefrom图书where图书号=’’

11、

12、vtno

13、

14、’’;returnoutname;end;ENDMyPack;SETServerOutputON;declarevarName图书.图书号%Type;begin/*测试包中的过程*/MyPack.P_ResetPrice(‘TP311.13/CM3’);/*测试包中的函数*/varName:=

15、MyPack.F_GetName('TP311.132/ZG1');dbms_output.put_line(varName);end;5．编写一数据库触发器，当任何时候读者书表中的某个读者号更新时，该触发器将借阅表中相应的读者号进行级联更新，将程序写在实验报告中。CREATEORREPLACETRIGGERMyTriggerAFTERUPDATEON读者FOREACHROWBEGINUPDATE借阅SET读者号=:new.读者号WHERE读者号=:old.读者号;END;6.编写程序根据常用的Enrol

16、lment表中所有记录的分数，给出相应的等级，要求用游标实现，程序运行的结果如下：学号:20010101，课程号:C1，成绩:90，等级::优学号:20010102，课程号:C1，成绩:88，等级::良学号:20010102，课程号:C2，成绩:94，等级::优学号:20010102，课程号:C3，成绩:54，等级::不及格将程序写在实验报告中。setserveroutputon;declarev_gradenumber;v_