实验6plsql程序设计.docVIP

实验6PL/SQL程序设计 实验目的 掌握PL/SQL程序开发方法。 掌握储存过程、函数、触发器、包的创立于调用。 实验要求 依据图书销售系统业务要求创立特定的储存过程、函数、触发器。 依据图书销售系统业务要求将图书销售系统有关的函数、储存过程封装到包里。 实验步骤 以bs用户登录BOOKSALES数据库，利用PL/SQL程序编写以下功能模块。 创立一个储存过程，输出不一样种类图书的数目、均匀价钱。 SQLcreateorreplaceprocedureproc_category_static 2as --定义游标，获取目前有哪些图书种类 cursorc_all_categoryisselectdistinctcategoryfrombooks; --图书的均匀价钱 v_avg_costnumber; begin --保留图书种类 9 forv_each_categoryin c_all_categoryLOOP 10 selectavg(retail)intov_avg_costfrombookswherecategory=groupbycategory; 11 (种类为：||||, 均匀价钱为：||v_avg_cost); ENDLOOP; endproc_category_static; / 创立一个储存过程，以客户号为参数，输出该客户订购的全部图书的名称与数目。 createorreplaceprocedureproc_get_orderinfo( 2p_customer_id%type) as --申明游标储存客户的订单号 cursorc_orderidisselectorder_idfromorderswherecustomer_id=p_customer_id; v_orderid%type; --申明游标储存订单信息 cursorc_orderitemisselectISBN,sum(quantity)totalnumfromorderitemwhereorder_id=v_orderidgroupbyISBN; --保留图书的书名 v_title%type; 11 begin openc_orderid; LOOP 15 fetchc_orderidintov_orderid; 16 exitwhenc_orderid%NOTFOUND; 17 forv_orderiteminc_orderitem LOOP 18 selecttitleintov_titlefrombookswhereISBN=; 19 (p_customer_id||订购||v_title|| 的数目是||; 20 endLOOP; endLOOP; closec_orderid; endproc_get_orderinfo; / execproc_get_orderinfoo(1001); 创立一个储存过程，以订单号为参数，输出该订单中全部图书的名称、单价、数目。 createorreplaceprocedureproc_get_orderinfoo( p_order_id%type) as --申明游标储存订单号的ISBN cursorc_ISBNisselectISBNfromorderitemwhereorder_id=p_order_id; v_ISBN%type; --申明游标储存订单信息 cursorc_orderitemisselectISBN,sum(quantity)totalnumfromorderitemwhereISBN=v_ISBN; v_title%type; v_retail%type; begin openc_ISBN; LOOP fetchc_ISBNintov_ISBN; exitwhenc_ISBN%NOTFOUND; forv_orderiteminc_orderitemLOOP selecttitle,retailintov_title,v_retailfrombookswhereISBN=; (p_order_id||v_title||v_retail||; endLOOP; endLOOP; closec_ISBN; endproc_get_orderinfoo; / 创立一个储存过程，以第一版社名为参数，输出该第一版社第一版的全部图书的名称、ISBN、批发价钱、 零售价钱信息。 createorreplaceprocedureproc_get_name( p_title%type) as cursorc_orderidisselectorder_idfromorderswherecustomer_id=p_customer_id; v_orderid%type; cursorc_orde