- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
精选文库
精选文库
PAGE
PAGE #
实验6 PL/SQL程序设计
1实验目的
掌握PL/SQL程序开发方法。
掌握存储过程、函数、触发器、包的创建于调用。
2实验要求
根据图书销售系统业务要求创建特定的存储过程、函数、触发器。
根据图书销售系统业务要求将图书销售系统相关的函数、存储过程封装到包里。 3实验步骤
以bs用户登录BOOKSALES数据库,利用 PL/SQL程序编写下列功能模块。
/尿占||轴一占/士丹存
(1)创建一个存储过程,输出不同类型图书的数量、平均价格。
SQL create or replace procedure proc_category_static
as
--定义游标,获取当前有哪些图书种类
cursor c_all_category is select dist inct category from books;
--图书的平均价格
v_avg_cost nu mber;
begin
--保存图书种类
for v_each_category in c_all_category LOOP
select avg(retail) into v_avg_cost from books where category=v_each_category.category group by category;
dbms_output.put_line(种类为:’||v_each_category.category『,平均价格为:||
v_avg_cost);
END LOOP;
end proc_category_static;
/
10111?L?11j]■饨tw of replace prjcilure po
1011
1?
L?
11
epuy ii select di^tiaot 口?t即巧 frer bwks:15
epuy ii select di^tiaot 口?t即巧 frer bwks:
c all Cit
件瀚HS
l训匚cc£t nuibir
-ft厝臟
:or v^tadi-Cats^ory :n o_tll^cat?ory LJOO?
i*hct 1 intr v sv* cost Erm 弘*b nktrs citsirk nt?^iy.cittpry 荻?耳 ty 职ry;
ffl早 £ i ■ d ? ?口口tlcr1 9- 上匸2 LJhi odpit put丄in?『种槪]:\\r
ffl早 £ i ■ d ? ?口口
tlcr
1 9- 上匸2 L
(2)创建一个存储过程,以客户号为参数,输出该客户订购的所有图书的名称与数量。
create or replace procedure proc_get_orderi nfo(
p_customer_id customers.customer_id%type)
as
--声明游标存储客户的订单号
cursor c_orderid is select order_id from orders where customer_id=p_customer_id;
v_orderid orders.order_id%type;
--声明游标存储订单信息
cursor c_orderitem is select ISBN, sum(qua ntity) total num from orderitem where order_id=v_orderid group by ISBN;
--保存图书的书名
v_title books.title%type;
11
begin
ope n c_orderid;
LOOP
fetch c_orderid into v_orderid;
exit whe n c_orderid%NOTFOUND;
for v_orderitem in c_orderitem LOOP
19select title into v_title from books where ISBN=v_orderitem」SBN;
19
DBMS_OUTPUT.PUT_LINE(p_customer_id『订购’||v_title『 的数量是
||v_orderitem.tota Inu m);
end LOOP;
end LOOP;
close c_orderid;
end proc_get_orderi nfo;
■ 2 B 2 il..??.F E=lLJLlLZI-:L4
■ 2 B 2 il..??.F E=lLJLlLZI-:L4l!Bl=.l7l!B2jB?lmzi
■ia无亠(i I冬和7直件站詡t -曲-
4 or r 4pL?.c4 prcc^ bru pr5c_:g匕_o?rd.arij
您可能关注的文档
- 山东省聊城市2012届高三下学期模拟试题(二)(数学文)扫描版.docx
- 山东省临沂市2017届高三地理2月教学质量检测一模试题.docx
- 山东省曲阜市普通高中2014-2015学年高二学业水平模拟测试生物试题四.docx
- 山东省泰安市新泰市学八级上抽考物理试卷含答案解析.docx
- 山东省潍坊市2015年中考物理试题.docx
- 山东省郓城一中必修三第四章区域经济发展测试题新人教版.docx
- 山东省枣庄市2015届高三第一次模拟考试文综地理试题Word版.docx
- 山东省职称评审管理系统(网络版).docx
- 山东省淄博市2013届高三理综第一次模拟考试外研社版.docx
- 山东省淄博市沂源2013届高三第二次模拟试题文综.docx
文档评论(0)