SQL实验报告.docx

本文格式为Word版，下载可任意编辑
— 2 —
SQL实验报告
　测验四触发器测验
　（一）
　after
　触发器
　（1 1 ）
　在l l ｉ neitem 表上定义一个 aice
　real, ＠discount
　real, ＠ta ｘ ｒｅal －ﻩ － 开启游标
　 open cursor_i ｎs ｅrte ｄ －-ﻩ － 读取游标
　fe ｔc ｈ
　nex ｔ
　f ｒom
　cu ｒｓｏｒ_ins ｅrted
　into
　＠o ｒd ｅrkey,li ｎen ｕｍbｅ ｅｒ ｒ, ｅx ｔen ｄed ｐric ｅ,dis ｃount,tax ｉhwﻩ ｉle ＠＠FE ＴCH_ ＳTATU Ｓ＝0 ｅbﻩ ｅgin
　 -格价新得算计新重存保量变个一明声ﻩﻩ 声明一个变量保存重新计算得新价格
　ｃedﻩ ｃlare ＠n ｅw_tot ａｌprice ｒｅａl
　ｃelesﻩ ｃt new ＿to ｔa ｌprice= ＠extend ｅdp ｒｉce ＊( １-d ｉs ｃｏunt) ＊(1+tax) -新更量变格价总得新用ﻩﻩ 用新得总价格变量更新orders 表得totalpri ｃe
　ﻩ u ｐｄa ｔe
　or ｄｅｒs s ｅt
本文格式为Word版，下载可任意编辑
— 5 —
　t ｏta ｌpric ｅ=total ｐric ｅ+ ＠ｎｅw_ ｔota ｌｐr ｉce ｗ ｗｈ ｈe ｒe o ｒderke ｙ＝orderkey
　ｔｅfﻩ ｅｔch next from ｃｕrsor_ ｉns ｅrte ｄ ｉnto o ｒder ｋey, ＠l ｉnen ｕｍber,e ｘｔendeｄ ｄp ｒic ｅ, ＠disc ｏu ｎt, ＠t ａｘ
　ｅ ｅnd ａｅｄﻩ ｄｅａll ｏca ｔe cu ｒsor_in ｓerted en ｄ
　 (3)
　在ｌ in ｅ ite ｍ表上定义一个ａ ft ｅｒ触发器, , 当删除一项订单明细记录时, ,
　自动修改 orders 表得 tot ａ lprice, 以保证数据一致性
　CREATE ＴRI ＧG ＥR ｔrig ＿ｌine ｉｔem_price_de ｌet ｅ
　on line ｉtem fo ｒ de ｌｅt ｅ
　Ａ ＡS begin
　- －声明游标变量指向delet ｅd 表
　de ｃlar ｅ curso ｒ_d ｅleted ｃursor
　ｒe ａd ＿on ｌｙ
　ｅs
　rofﻩﻩ ｅle ｃｔ ｏrd ｅｒk ｅｙ,line ｎｕmbe ｒ,extende ｄp ｒｉce,discoun ｔ, ｔａx
本文格式为Word版，下载可任意编辑
— 6 —
　from
　del ｅｔｅｄ －ﻩ －－ 声明变量获取查找信息
　ｄｅｃlare ord ｅｒｋｅy ｉnt,linenum ｂe ｒ
　int,extendedp ｒi ｃe r ｅａl,discou ｎt real,ta ｘ ｒｅal －ﻩ －
　开启游标 ｅpoﻩ ｅn c ｕrso ｒ_ ｄeleted
　 标游取读ﻩ 读取游标 ｅfﻩ ｅtch next ｆr ｏm cur ｓｏｒ＿delete ｄ in ｔo
　order ｋe ｙ,l ｉnenumb ｅｒ,ext ｅnｄ ｄedprice, ＠di ｓｃｏｕn ｔ,tax
　wh ｉｌｅ ＠FETCH_STATUS=0
　begi ｎ
　 - 声明一个变量保存重新计算得新价格
　ﻩ declare ＠ne ｗ_ ｔo ｔａlpric ｅ ｒｅal
　ﻩ ｓ ｓelec ｔ ＠new_t ｏｔａlpr ｉce= ＠exte ｎｄe ｄpri ｃe*(1- ＠disco ｕnt) ＊(1+ ｔax)
　－ﻩ － 用新得总价格变量更新orders 表得tot ａlp ｒice ｕﻩﻩ ｕpd ａte
　ｏｒｄers set t ｏtalpri ｃｅ=to ｔalpr ｉｃe- ＠new ＿totalp ｒｉce ｗh ｅr ｅ order ｋey= ＠ord ｅｒkey
　 fetch
本文格式为Word版，下载可任意编辑
—