實(shí)驗(yàn)四觸發(fā)器實(shí)驗(yàn)

　（一）

　after

　觸發(fā)器

　（1 1 ）

　在l l ｉ neitem 表上定義一個(gè) after 觸發(fā)器, , 當(dāng)修改列項(xiàng)目e e ｘ tendedprice d ｉ scount

　 x tax 時(shí), , 要把 s orders 表得ｔo o ｔａｌ pri ｃe e 一起修改, , 以保證數(shù)據(jù)一致性

　C ＲE ＡＴＥ T ＲIGGER

　trig ＿line ｉte ｍ_ ｐr ｉce_ ｕｐdate on line ｉt ｅｍ fo ｒ upda ｔe

　 ａ ａs

　 begin i ｆ (UPDATE(ex ｔend ｅdprice)

　o ｒ UPDATE(tax)

　or UPD ＡT Ｅ(di ｓcou ｎt)) begin

　-— 聲明游標(biāo)變量指向 inserted 表

　d ｅclare

　ｃursor_inserted c ｕrs ｏｒ

　ｒea ｄ_only

　ｏ ｆｏr select ｏｒder ｋey,linenu ｍber,exte ｎd ｅdpr ｉce, ｄｉs ｃoun ｔ, ｔａx

　 from

　in ｓer ｔｅｄ

　 —-息信找查取獲量變明聲? 聲明變量獲取查找信息

　de ｃlare ｏｒｄer ｋｅy in ｔ, ＠ｌinenumb ｅr

　ｉnt,exte ｎd ｅｄｐrice

　ｒeal,diｓ ｓcount real,tax real

　—- 打開游標(biāo) ｅpo? ｅn ｃursor_i ｎs ｅrt ｅd

　—-標(biāo)游取讀? 讀取游標(biāo)

　fe ｔｃｈ

　next

　from cur ｓｏr ＿i ｎs ｅｒte ｄ ｉnt ｏ ＠o ｒｄerkey, ＠lin ｅnumber,ｅ ｅxt ｅnde ｄｐｒice, ＠di ｓcount,t ａx

　ｗ ｗhi ｌe FETC Ｈ_S ＴATUS ＝0 ｎigeb? ｎ

　 ? —- 聲明一個(gè)變量保存重新計(jì)算得新價(jià)格 ｃｅd?? ｅｃl ａre ＠n ｅw_tota ｌpri ｃe

　r ｅal

　? select ＠n ｅw_t ｏtal ｐrice= ＠ext ｅn ｄedpr ｉce ＊(1 －＠di ｓｃou ｎt) ＊(1 ＋＠tax)

　 —- 用新得總價(jià)格變量更新 orders 表得 t ｏt ａlprice ｐｕ?? ｕｐdate orde ｒs

　se ｔ tot ａlpri ｃe= ｎew_totalprice ｗｈere or ｄerkey=orde ｒｋｅy

　ｅn hctef? ｅxt f ｒo ｍ cur ｓor_i ｎser ｔed int ｏ ＠order ｋe ｙ, ＠ｌi ｎｅnum ｂer, ＠ex ｔｅnde ｄp ｒice,discoun ｔ, ＠tax

　dne?ｌlaed? ｌocate c ｕr ｓｏr_i ｎser ｔe ｄ ｅ ｅnd end ?(2)在 在 linei ｔｅｍ表上定義一個(gè) aftr er 觸發(fā)器, , 當(dāng)增加一項(xiàng)訂單明細(xì)時(shí), ,

　自動(dòng)修改 s orders 表得 total ｐ rice, 以保證數(shù)據(jù)一致性

　CREATE TR ＩGGER tri ｇ_ ｌｉｎｅit ｅｍ＿price_ ｉn ｓert ｏn l ｉｎe ｉｔｅm ｆ ｆor inse ｒｔ

　 a ｓ begin ——向指量變標(biāo)游明聲? 聲明游標(biāo)變量指向ins ｅｒted 表

　de ｃｌare

　c ｕrsor_inse ｒted

　cursor

　read_ ｏｎl ｙ

　 ? for s ｅle ｃt orderkey,linenumbe ｒ,ex ｔe ｎdedp ｒic ｅ,di ｓｃｏu ｎt,t ａx

　 from inｓ ｓerte ｄ

　-- 聲明變量獲取查找信息 ｅd? ｅclare ＠orde ｒk ｅy

　int, ＠ｌｉn ｅｎumber int,e ｘten ｄedp ｒice

　real, ＠discount

　real, ＠ta ｘ ｒｅal －—? － 打開游標(biāo)

　 open cursor_i ｎs ｅrte ｄ －-? － 讀取游標(biāo)

　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

　 -—格價(jià)新得算計(jì)新重存保量變個(gè)一明聲?? 聲明一個(gè)變量保存重新計(jì)算得新價(jià)格

　ｃed? ｃlare ＠n ｅw_tot ａｌprice ｒｅａl

　ｃeles? ｃt new ＿to ｔa ｌprice= ＠extend ｅdp ｒｉce ＊( １-d ｉs ｃｏunt) ＊(1+tax) —-新更量變格價(jià)總得新用?? 用新得總價(jià)格變量更新orders 表得totalpri ｃe

　? u ｐｄa ｔe

　or ｄｅｒs s ｅt

　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 ｍ表上定義一個(gè)ａ ft ｅｒ觸發(fā)器, , 當(dāng)刪除一項(xiàng)訂單明細(xì)記錄時(shí), ,

　自動(dòng)修改 orders 表得 tot ａ lprice, 以保證數(shù)據(jù)一致性

　CREATE ＴRI ＧG ＥR ｔrig ＿ｌine ｉｔem_price_de ｌet ｅ

　on line ｉtem fo ｒ de ｌｅt ｅ

　Ａ ＡS begin

　- －聲明游標(biāo)變量指向delet ｅd 表

　de ｃlar ｅ curso ｒ_d ｅleted ｃursor

　ｒe ａd ＿on ｌｙ

　ｅs

　rof?? ｅle ｃｔ ｏrd ｅｒk ｅｙ,line ｎｕmbe ｒ,extende ｄp ｒｉce,discoun ｔ, ｔａx

　from

　del ｅｔｅｄ －? －－ 聲明變量獲取查找信息

　ｄｅｃlare ord ｅｒｋｅy ｉnt,linenum ｂe ｒ

　int,extendedp ｒi ｃe r ｅａl,discou ｎt real,ta ｘ ｒｅal －—? －

　打開游標(biāo) ｅpo? ｅn c ｕrso ｒ_ ｄeleted

　 ——標(biāo)游取讀? 讀取游標(biāo) ｅf? ｅtch next ｆr ｏm cur ｓｏｒ＿delete ｄ in ｔo

　order ｋe ｙ,l ｉnenumb ｅｒ,ext ｅnｄ ｄedprice, ＠di ｓｃｏｕn ｔ,tax

　wh ｉｌｅ ＠FETCH_STATUS=0

　begi ｎ

　 -— 聲明一個(gè)變量保存重新計(jì)算得新價(jià)格

　? declare ＠ne ｗ_ ｔo ｔａlpric ｅ ｒｅal

　? ｓ ｓelec ｔ ＠new_t ｏｔａlpr ｉce= ＠exte ｎｄe ｄpri ｃe*(1- ＠disco ｕnt) ＊(1+ ｔax)

　－? －— 用新得總價(jià)格變量更新orders 表得tot ａlp ｒice ｕ?? ｕpd ａt(yī)e

　ｏｒｄers set t ｏtalpri ｃｅ=to ｔalpr ｉｃe- ＠new ＿totalp ｒｉce ｗh ｅr ｅ order ｋey= ＠ord ｅｒkey

　 fetch

　n ｅｘt f ｒom ｃｕｒsor_inse ｒt ｅd in ｔo orderkey, ＠line ｎｕｍbe ｒ,extendｅ ｅｄ ｄprice, ＠d ｉscou ｎｔ,t ａx ｄｎe? ｎｄ

　ｄ ｄeal ｌo ｃat ｅ cur ｓor_inse ｒted ｅ ｅnd ( (4 4) ) 驗(yàn)證 up ｄ at ｅ觸發(fā)器

　— －查瞧 號訂單得 to ｔa a ｌ pr ｉ ce

　selec ｔ

　＊

　ｆｒo o ｍ

　o o ｒ ders where

　orde ｒ key=1 ８ 30;

　— －查瞧明細(xì)表得相關(guān)信息

　se ｌ ect *

　ｆ ro ｍ

　lin ｅi i ｔe e ｍ

　ｗ here or ｄe e ｒ key=183 ０

　and ｌ ine ｎｕm m ｂe e ｒ =1;

　—— 驗(yàn)證 e update 觸發(fā)器

　updat ｅ

　lineitem set ｔ ax=tax+0 、 05

　ｗｈｅ re orderkey=1830;

　（二）

　i i ｎ stead

　ｏｆ

　觸發(fā)器

　（ （1）

　）

　在 在 lineit ｅm 表上定義一個(gè)ｉns ｔｅad o ｆ ｕpda ｔｅ觸 發(fā)器, 當(dāng)修改明細(xì)表中得數(shù)量 量quan ｔi ｔy 時(shí), 應(yīng)先檢查供應(yīng)表par ｔsupp 得ａv ａi ｌqty 就是否足夠, 不足夠則拒絕執(zhí)行, 否則執(zhí)行并修改相應(yīng)數(shù)值以保證數(shù)據(jù)一致性 于 由于 in ｓtead

　of 觸發(fā)器更新某個(gè)表會(huì)使得該表上其她不滿足更新列不能更新,因 因用 此逆向思維使用 a ｆter 觸發(fā)器實(shí)現(xiàn)相同效果 即先更新 qu ａｎtity, 再比較ａv ａilｑ ｑｔ ｔy, 如果滿足更新數(shù)量, 就修改ｐartsupp 得 表得 a ｖailqty, 如果不滿足, 則把ｌineitem得ｑｕantity 更新之后得數(shù)據(jù)重新修改回來 ｃ ｃreate trigge ｒ trig_lin ｅｉt ｅm_quanti ｔy_ ｕpda ｔe

　on

　li ｎeit ｅm f ｏr upda ｔe

　as begin if UPDATE(qu ａnt ｉｔｙ) ｂ ｂegin ——向指別分量變標(biāo)游明聲? 聲明游標(biāo)變量分別指向 i ｎserted 表與 d ｅl ｅｔed 表 ｅｄ? ｄｅclare c ｕｒso ｒ_inser ｔed

　cur ｓor

　r ｅad_on ｌy

　for

　ｔceles?? ｔ

　orde ｒkey, ｐartk ｅy,s ｕppkey,lin ｅnum ｂer, ｑｕａntit ｙ fr ｏm i ｎserted

　ｄｅcl ａｒe

　cursor_de ｌeted c ｕrs ｏｒ

　rea ｄ_ ｏnl ｙ

　f ｏr select quantity

　fr ｏm deleted

　 -—息信找查取獲量變明聲? 聲明變量獲取查找信息

　decl ａｒe

　＠ｑu ａn ｔity ＿dif ｆ_lineitem i ｎｔ,q ｕanti ｔy_pa ｒtsup ｐ i ｎt ｃed? ｃlare suppkey int, ＠ｐar ｔke ｙ in ｔ,o ｒd ｅrkey i ｎt,

　ｕnenil?? ｕm ｂer int ,qty ＿inserted ｉn ｔ , ＠qty_delete ｄ int

　- － 打開游標(biāo) ｒuc nepo? ｒsor_in ｓert ｅd ｐｏ? ｏｐen cur ｓｏｒ_d ｅleted

　 -—量變給賦值數(shù)標(biāo)游取讀? 讀取游標(biāo)數(shù)值賦給變量 ｆ? ｆet ｃｈ next from

　cu ｒsor_ ｉｎsert ｅd

　 ? ｉ ｉnto or ｄe ｒk ｅy,pa ｒtkey, ＠suppk ｅy, ＠ｌine ｎu ｍber, ＠qty ＿ｉns ｅrte ｄ

　f ｅt ｃｈ

　ｎｅxt from

　cursor ＿d ｅｌeted

　int ｏ q ｔy ＿de ｌete ｄ

　whi ｌe fe ｔch_st ａt(yī)us=0 ｇｅb? ｅｇin

　- －計(jì)算訂單明細(xì)修改時(shí), 訂購數(shù)量得變化值 inserte ｄ表項(xiàng)-d ｅｌｅt ｅｄ表項(xiàng)

　 ｓ ｓel ｅct quantity_d ｉf ｆ_ ｌi ｎｅit ｅm= ＠q ｔy ＿in ｓe ｒｔe ｄ—＠ ＠q ｔｙ_deletｅ ｅd

　? －－從ｐarts ｕpp 表獲取ａva ｉlq ｔｙ值, 注意ｐartsupp 表得主鍵為(partk ｅｙ,suppkｅ ｅy) ｔceles?? ｔ ＠ｑuanti ｔｙ＿p ａr ｔｓupp ＝av ａilq ｔy fro ｍ pa ｒｔsu ｐｐ

　ｗ?? ｗh ｅr ｅ suppkey= ｓuppke ｙ

　and part ｋey= ＠par ｔk ｅｙ

　 -—斷判始開?? 開始判斷

　ｇｅｂ? ｂｅｇi ｎ

　 ｆi? ｆ quant ｉty ＿d ｉff_ ｌｉn ｅite ｍ＝0

　?

　? p ｒin ｔ " 更新得數(shù)量與原表中得值相同, 不需要更新"

　e ｌs ｅ if ＠quantit ｙ_d ｉｆｆ＿lin ｅitem 〈=q ｕantity_partsupp

　?

　be ｇｉn

　? ｐu?? ｐd ａt(yī)e ｐａrtsupp

　s ｅt avail ｑty= ａvailqty- ＠ｑua ｎtit ｙ_d ｉff_li ｎe ｉｔem

　? ｐus erehw? ｐpkey=suppkey

　ａnd

　p ａrtkey= ＠par ｔke ｙ

　?

　? p ｒint " 兩個(gè)表都更新成功’ ?

　??ｎe? ｎd

　els ｅ

　ｉgeb?? ｉn

　? ｕ?? ｕpdate ｌi ｎei ｔem

　set

　ｑuantit ｙ＝quantity+ ＠quanti ｔｙ_diff_linei ｔem

　whe ｒe o ｒd ｅｒke ｙ＝＠orde ｒｋe ｙ and ｌi ｎｅｎu ｍber= ＠lｉ ｉne ｎｕｍber

　 ?

　p ｒi ｎt ＇更新失敗"

　?? ｅｎｄ

　? e ｎd ｅf?? ｅtch ne ｘt

　fr ｏｍ c ｕrso ｒ_i ｎｓｅrted

　i ｎｔo ＠ｏrd ｅｒｋe ｙ, ＠partkey,s ｕpp ｋey, ＠linenumb ｅr, ＠qt ｙ_ ｉns ｅrt ｅd

　f ｅｔch ne ｘｔ from ｃurso ｒ＿de ｌeted into ＠qt ｙ_d ｅｌet ｅd ｄｎe? ｎｄ

　d ｅallocat ｅ cur ｓor ＿i ｎserte ｄ

　dealloc ａt(yī) ｅ cursor_de ｌe ｔed ｅ ｅnd ｅ ｅnd (2)在 在 l ｉｎｅite ｍ表上定義一個(gè) instea ｄ of in ｓｅrt 觸發(fā)器, 當(dāng)插入明細(xì)表中一條記錄 時(shí) 時(shí), 應(yīng)先檢查供應(yīng)表ｐar ｔｓupp 得 得 ava ｉl ｑt ｙ就是否足夠 qu ａｎｔi ｔy 得數(shù)量 c ｒｅa ｔe t ｒig ｇer ｔri ｇ_lineitem_q ｕa ｎti ｔy_ ｉｎsert

　on

　line ｉtem ｉ ｉnstead of ｉnser ｔ as ｂ ｂegin

　-— 聲明游標(biāo)變量指向 inserte ｄ表

　d ｅclar ｅ cur ｓｏｒ＿inserte ｄ ｃur ｓor

　rea ｄ_ ｏｎｌy f ｏr

　ｓ?? ｓelect or ｄｅrk ｅy,pa ｒｔkey,sup ｐk ｅy, ｌin ｅn ｕmber,q ｕantity

　f ｒｏm ins ｅr ｔed

　-—

　聲明變量獲取查找信息

　dec ｌare ｑｕａntity int, ＠av ａilq ｔy i ｎt, ＠suppkey

　ｉn ｔ, ＠partkey

　iｎ ｎｔ ｔ, ＠o ｒderkey ｉnt, ＠ｌinenu ｍber ｉnt

　-—標(biāo)游開打? 打開游標(biāo) ｃ nepo? ｃurs ｏｒ_ins ｅｒted －? －— 讀取游標(biāo)

　f ｅtc ｈ ｎext ｆro ｍ ｃｕrsor_insert ｅｄ ｉnt ｏ ＠ｏｒｄe ｒkey,partkey,＠ ＠ｓ ｓuppkey, ＠linenumber,qu ａｎtity

　wh ｉｌe ＠＠FETCH_S ＴATUS= ０ ｉgeb? ｉn

　-- 為變量賦值

　ａ tceles? ａvailqtｙ ｙ

　＝ ＝av ａi ｌqt ｙ fr ｏm

　ｐartsupp

　 ｗ? ｗhe ｒe suppkey ＝＠ｓu ｐｐk ｅy and part ｋe ｙ= ｐartke ｙ

　 ? if ＠quant ｉty 〈= ＠avail ｑt ｙ

　 -— 如果可以更新

　ｂ? ｂegin ／??? ／*將 將 insert ｅd 表中得記錄插入到明細(xì)表＊/

　? ｓni? ｓert

　i ｎto l ｉneite ｍ select ＊

　from i ｎserted

　ｒo=yekredro

　erehw?? ｒderk ｅy ａnd

　linenumb ｅr = ＠linenumber ＊/??新更時(shí)同? ＊同時(shí)更新 part ｓｕpp 表得數(shù)量＊/

　?? ｕ ｕpd ａｔe pa ｒｔsup ｐ ｓet a ｖailqty=availqty- ＠quanti ｔy

　?

　ｅrehw? ｅ sup ｐｋe ｙ= ＠sup ｐkey and partkey=part ｋey

　 ｐ ｐr ｉnt ’pａ ａrts ｕｐp 表有足夠得貨物可以滿足 lin ｅｉｔem 得ｑuan ｔitｙ ｙ, 插入成功’

　 ｅnd

　 ｅlse

　begin

　?? p ｒｉnｔ ｔ

　＇ ＇pa ｒt ｓup ｐ表沒有足夠得貨物可以滿足 l ｉneitem 得 得 q ｕａntity,插入失敗’

　dne?ｆ?? ｆetc ｈ next ｆrom ｃｕrso ｒ_ins ｅrt ｅd in ｔｏ ＠ord ｅrkey, ｐａrtkey, ｓuppkey, ＠lｉ ｉnenumbe ｒ, ｑu ａntity ｅ? ｅn ｄ

　deall ｏcat ｅ ｃｕrsor_ ｉｎserted end ( ３)在 在 line ｉte ｍ表上定義一個(gè) inste ａd of del ｅte 觸發(fā)器,當(dāng) 當(dāng) 刪除 明細(xì)表中記錄 時(shí) 時(shí), 同時(shí)改變表 供應(yīng)表 partsupp 得ａva ｉl ｑtｙ ｙ 數(shù)值 c ｒe ａt(yī)e trigge ｒ tri ｇ_ ｌin ｅit ｅm_quanti ｔy_ ｄel ｅte o ｎ line ｉｔem inste ａd of ｄel ｅte as be ｇｉｎ

　—- 聲明游標(biāo)變量指向ｄeleted 表

　de ｃla ｒｅ curs ｏｒ_ ｄｅl ｅted c ｕｒｓor

　ｒead ＿only for

　 ｌｅs?? ｅｌect or ｄerke ｙ, ｐar ｔｋey,sup ｐkey, ｌinenumbe ｒ,quan ｔity ｆr ｏm deleted －? －- 聲明變量

　decl ａre s ｕpp ｋｅy i ｎt, ｐar ｔke ｙ

　int, ＠orde ｒkey int,linen ｕmb ｅr

　int, ＠quａ ａnt ｉt ｙ int

　 —-標(biāo)游開打? 打開游標(biāo)

　open

　cursor_deleted

　-—標(biāo)游取讀? 讀取游標(biāo)

　ｆ ｆetch ｎext fr ｏｍ

　curs ｏr ＿del ｅt ｅd

　ｉn ｔo ＠ord ｅrkey , ＠partkey,s ｕppkｅ ｅy, ＠lin ｅn ｕmber,q ｕa ｎtity

　 whi ｌｅ

　Ｆ ＦET ＣH_ ＳTATUS=0 ｉgeb? ｉn

　 ＊/＊除刪? ＊?jiǎng)h除＊/

　? de ｌet ｅ from

　lineite ｍ where linenu ｍber= ｌｉne ｎumber and o ｒｄe ｒｋey =orｄ ｄer ｋey

　 */新更時(shí)同? 同時(shí)更新 pa ｒt ｓupp 表得數(shù)量*/

　 u ｐdate

　parts ｕｐｐ ｓe ｔ

　availqt ｙ＝a ｖａi ｌq ｔy+quant ｉｔy

　 ? where s ｕppke ｙ= ＠s ｕｐpkey a ｎd ｐａr ｔk ｅy= ＠p ａr ｔkey

　? p ｒin ｔ

　’ 刪除成功, 并且已經(jīng)把貨物數(shù)量歸還到 p ａr ｔsup ｐ里" ｆ?? ｆetc ｈ ne ｘｔ fr ｏｍ

　curso ｒ＿ｄel ｅted

　into ＠ｏrd ｅr ｋe ｙ

　,p ａr ｔｋey,＠ ＠suppkey, ＠lin ｅnu ｍber,quanti ｔy ｎe? ｎd ｅd? ｅa ｌloc ａt(yī)e ｃursor_ ｄelete ｄ end (4) 驗(yàn)證 update 觸發(fā)器 -- 查瞧ｌi ｎeit ｅm 得ｑuan ｔit ｙ select ＊

　fr ｏm

　lin ｅit ｅm ｗhe ｒe or ｄｅrk ｅy ＝1830

　and li ｎenum ｂer=1;

　—— 查詢ｐartsupp 表得ava ｉlqt ｙ se ｌｅｃt ＊ from ｐart ｓupp w ｈｅre suppk ｅy ＝(select

　supp ｋｅy fr ｏm

　ｌin ｅ

　item w ｈｅre ｏrd ｅｒkey=18 ３０)

　and partk ｅｙ

　=(s ｅlec ｔ part ｋey from lin ｅite ｍ ｗh ｅr ｅ

　order ｋey ＝18 ３０ a ｎd linenu ｍｂer=1)

　－- - 更新數(shù)量過大

　 —— 更新得值與原值相同

　 －- - 更新到+ + ２ 00 數(shù)量, , 成功

　ｕpdate

　ｌi ｎeitem set

　ｑuant ｉty

　=q ｕanti ｔy+ ２00

　where order ｋey=1830

　and lin ｅn ｕmber ＝ １;

　 -- 更新 +2 ００ 成功后ｌ ineite ｍ得 quanti ｔy y 變化

　—— 更新+200 成功后par ｔs ｕpp 表得a ｖa ｉlqty 變化

　實(shí)驗(yàn)到此。所有創(chuàng)建得觸發(fā)器結(jié)果

　 刪除觸發(fā)器

　dr ｏｐ trigger ｔri ｇ_li ｎei ｔem_de ｌete; 實(shí)驗(yàn)六存儲(chǔ)過程實(shí)驗(yàn)

　（1 1 ）

　定義無參數(shù) 得存儲(chǔ)過程并執(zhí)行

　更新所有訂單總價(jià)

　go?

　CREATE

　ＰROCED ＵＲＥ Ｐro ｃ＿Ｃa ｌTotalP ｒi ｃe

　 AS BEGIN

　up ｄate

　o ｒders ｓet to ｔalprice ＝

　 (sele ｃｔ sum( ｅｘte ｎdedprice*(1-discount)*(1+ ｔax))

　? fr ｏｍ li ｎei ｔem

　ｏ

　erehw? ｏrders 、ｏrderkey= ｌi ｎeite ｍ。o ｒderke ｙ) END

　ｇo 執(zhí)行此存儲(chǔ)過程

　exec P ｒｏ c_CalTotal Ｐｒｉc c ｅ; ;

　（2 2 ）

　定義有參數(shù)得存儲(chǔ) 過程并執(zhí)行

　更新給定訂單號得總價(jià)

　ｇ ｇo create ｐro ｃedu ｒｅ P ｒo_Cal ＴotalP ｒｉｃe ４Ｏrd ｅｒ ＠id_ ｏrder

　ｉntege ｒ ａ ａs be ｇin

　ｕ ｕp ｄatｅ ｅ

　ｏ ｏrders ｓet ｔｏtal ｐrice=(

　ｌes? ｌect SU Ｍ(ext ｅn ｄed ｐrice*(1 －di ｓc ｏunt)*(1 ＋ｔax))

　? fr ｏm li ｎeit ｅm

　? whe ｒe

　orde ｒs 。or ｄerke ｙ=lin ｅｉte ｍ。orderkey) end g ｏ 執(zhí)行此存儲(chǔ)過程 ｅｘe ｃ P ｒｏ_ ＣalTota ｌPr ｉce ４Order ＠ｉd_ ｏrder=2; （ （3）

　）

　定義有局部變量得存儲(chǔ)過程 更新某一個(gè)顧客所有訂單得總價(jià) g ｏ cr ｅate

　procedure Proc_Ca ｌTot ａlPr ｉｃｅ４Ｃusto ｍe ｒ n ａｍe ＿cus ｔo ｍer varc ｈａr( ５0) ａs

　ｄｅc ｌａｒｅ ｃus ｔk ｅy ＿c ｕｓto ｍer i ｎt b ｅgin ｔceles? ｔ

　cus ｔke ｙ＿ｃu ｓｔｏmer=cu ｓt ｋey

　ｆｒｏm

　cu ｓto ｍer

　where name ＿customer ＝RTRI Ｍ(n ａｍe)

　u ｐdate order ｓ ｓet to ｔａlp ｒi ｃe=( ｔceles?? ｔ S ＵM(exte ｎde ｄp ｒｉｃe ＊(1 －ｄis ｃount)*(1+tax)) ｒf?? ｒom ｌi ｎeite ｍ

　ｗ? ｗher ｅ orders 、order ｋｅy=lineitem 。or ｄｅｒｋe ｙ

　 ? and

　o ｒde ｒs 、ｃust ｋey= ＠c ｕｓｔｋey ＿cust ｏmer) ?e ｎd go 執(zhí)行此存儲(chǔ)過程

　e ｘec Pro ｃ_CalT ｏt ａlPr ｉc ｅ4C ｕｓtome ｒ name_custom ｅr=" 艾錦亮’; 查瞧結(jié)果 u ｐdate

　ｌinei ｔe ｍ set

　ex ｔende ｄｐric ｅ＝1 ０0 , ｔa ｘ＝0.25 ｗｈere orderkey="1 ８30’; s ｅlect ＊ ｆrom

　l ｉneite ｍ

　w ｈere ｏrder ｋey ＝＇183 ０’;

　s ｅlect ＊ fr ｏm or ｄers ｗh ｅｒe ｃustke ｙ= (sele ｃt ｃｕs ｔk ｅy from custo ｍer ｗhe ｒe name=’ 艾錦亮’);

　（4 ）

　定義一個(gè)帶輸出參數(shù)得存儲(chǔ)過程 更新某個(gè)顧客得所有得訂單總價(jià), 并輸出總價(jià) ｇｏ crea ｔe proc ｅdure Proc_C ａｌT ｏtalP ｒi ｃe4Custo ｍe ｒ2

　 ｎa ｍe_ ｃu ｓt ｏme ｒ va ｒch ａr( ５0), ｔotalpr ｉｃe_ord ｅr real out ｐut

　as —— 聲明一個(gè)變量存儲(chǔ) ｎame 對應(yīng)得顧客編號 d ｅclar ｅ ＠c ｕs ｔkey ＿cus ｔomer integer

　 —— 為該變量賦值

　se ｌec ｔ c ｕstke ｙ_cu ｓto ｍer ＝cu ｓtkey

　from ｃus ｔome ｒ w ｈere n ａme_ ｃustomer=R ＴRIM(n ａｍe) begi ｎ －? －－ 更改訂單總價(jià)

　up ｄate

　o ｒd ｅrs

　ｓet t ｏｔａlp ｒｉｃe=(

　 se ｌec ｔ ＳUM(ext ｅｎｄedprice*(1-dis ｃｏunt)*( １+tax))

　ｆ? ｆr ｏｍ l ｉn ｅitem ｒｅhw?? ｅｒe

　orders 。o ｒｄerk ｅy=li ｎｅｉt ｅｍ.ord ｅｒk ｅｙ

　、sredro dna? 、c ｕstkey ＝＠custkey_ ｃustome ｒ)

　-— 為返回變量賦值

　 select

　ｔotalprice_order=total ｐri ｃe fro ｍ orders

　 ? w ｈere ｃustk ｅy= ＠c ｕstkey_c ｕstom ｅr

　?

　e ｎd go —- 執(zhí)行帶有輸出參數(shù)得存儲(chǔ)過程要聲明輸出參數(shù)變量 declare t ｏｔａlp ｒice re ａl ; exe ｃ Ｐroc_ Ｃａl Ｔota ｌPrice4C ｕstomer2

　" 艾錦亮 ＇, ＠to ｔalpri ｃe

　output; -- 在屏幕上輸出返回值結(jié)果

　ｓelec ｔ t ｏtalpri ｃe;

　實(shí)驗(yàn)到此, , 所有結(jié)果顯示

　 （5 5 ）

　修改存儲(chǔ)過程名

　ｅｘec sp_renam ｅ ’Pr ｏ＿Cal ＴｏｔａｌPrice4Ord ｅｒ",

　’C ａｌＴotalPr ｉce4 Ｏr ｄｅｒ＇;

　(6) 編譯存儲(chǔ)過程

　exe ｃ sp_ ｒe ｃompile ’CalTotalPriｃ ｃe ４Order’;

　(7) 刪除存儲(chǔ)過程

　ｄ ｄrop

　ｐroc ｅｄure ＣalT ｏtalPric ｅ４Orde ｒ; ｅ ｅxe ｃ ｓp_h ｅlptext CalT ｏt ａlPrice4 Ｏｒder;

推薦訪問： 實(shí)驗(yàn) 報(bào)告 SQL