游标存储过程触发器实验题

1、仓库仓库号 城市 面积WH1 北京 370WH2 上海 500 WH3 广州 200WH4 武汉 400供应商供应商号供应商名地址G1 微软 广州 G3 大连实德 北京 职工仓库号 职工号 工资WH2 E1 1220WH1 E3 1210WH2 E4 1250WH3 E6 1230WH1 E7 1250订购单职工号供应商号订购单号 订购日期金额E1 G1 D3 1995-2-20500E2 G3 D2 2010-12-25500订购单明细订购单号订购单名单价负责人D1 四大皆空 230 登记费 D2 数字机 564 斯蒂芬 D3 士大夫 235 斯蒂 D4 史蒂夫 456 发动机 D5 而感到

2、 345 方的 实验八1、create trigger wage_triggeron 职工 for updateasdeclare wage_new int,wage_old intselect wage_new=工资 from insertedselect wage_old=工资 from deletedif wage_new>wage_old*1.06beginraiserror('工资不可超过6%',16,1)rollback transactionend2、CREATE TRIGGER dinggou_triggeron 订购单 for insert,update

3、asdeclare wage intselect wage = 订购单金额 from insertedif wage<3000beginif (select count (*) from inserted i,供应商 g,职工 z,仓库 c where i.供应商号=g.供应商号 and i.职工号=z.职工号 and z.仓库号=c.仓库号 and c.城市=g.地址)=0beginraiserror ('当订购单金额小于3000时，必须使用本地供应商',16,1)rollback transactionendend实验七、1、create procedure wage

4、_procedurewage1 int,wage2 intasselect 仓库.仓库号,城市,职工号,工资 from 仓库,职工where 仓库.仓库号=职工.仓库号 and 工资>wage1 and 工资<wage2declare wage1 int,wage2 int /此句可有可无execute wage_procedure 1200,12402、create procedure book2_proceduredate datetimeasselect 订购单.订购单号,供应商.* from 供应商,订购单where 供应商.供应商号=订购单.供应商号 and 订购日期&g

5、t;datedeclare date datetimeexecute book_procedure '19991020'实验六、1、declare sno char(10),single int,instructor char(10)declare account_cursor Cursor for select 订购单.订购单号, 单价, 负责人 from 订购单 join 订购单明细 on 订购单.订购单号=订购单明细.订购单号 order by 单价open account_cursorfetch from account_cursor into sno,single,instructorwhile fetch_status=0beginprint sno +convert(char(10),single) +' '+instructorfetch from accou