现有超市物资数据库,物资表dgstu.WZ(Wno,Wname,Wprice),Wno:物资号,Wname:物资名,Wprice:物资单价。写一段程序(要求使用光标),将原单价小于50的物资价格打9折;将原单价大于等于50的物资价格打8折。程序如下,请填写完全。 DECLARE Cursor cWZ IS FOR UPDATE; v_Wno dgstu.WZ.Wno%TYPE; v_Wprice dgstu.WZ. BEGIN Open ; LOOP fetch cWZ into v_Wno,v_Wprice; EXIT WHEN ; IF v_Wprice<50 THEN UPDATE dgstu.WZ SET Wprice=Wprice*0.9 WHERE Wno=v_Wno; ELSE UPDATE dgstu.WZ SET Wprice=Wprice*0.8 WHERE Wno=v_Wno; END IF; END LOOP; CL; COMMIT; END;