触发器怎么样实现对另一张表的操作啊

Question

create table kehu 
(memberNo  char(18) primary key,
memberName char(8) not null,
memberPassword char(8) not null,
membersex char(3) not null,
membertel char(8) null,
memberaddr varchar(30) null,
yizushuliang int not null check((yizushuliang<7) and (yizushuliang>0))
);create table pinzhong
(pinzhongNo char(8) primary key
,pinzhongName char(8) not null
,dailyRental Decimal(4,2) not null
);create table video
(videoNo char(8) primary key 
,videoName char(20) not null
,price number(4,2) not null
,publishtime char(4) not null
,director char(10) not null
,mainactor char(10) not null
,leibie char(10) not null
,publishaddr char(10) not null
,amount int 
,pinzhongNo  char(8)
,constraint fk foreign key(pinzhongNo) references pinzhong(pinzhongNo)
);create table zujiejilu
(zujieNO char(8) primary key,
videoNo char(8),
memberNo char(18),
zujieamount int,
guihuanamount int default 0 ,
dateout date default sysdate,
datereturn date default sysdate+7 ,
yajin decimal(5,2),
zhuangtai varchar(20) default '未付款',
shishou decimal(5,2) default 0.00,
foreign key(videoNo) references video(videoNo),
foreign key(memberNo) references kehu(memberNo)
);
create table yuyuejilu
(orderNo char(8) primary key ,
videoNo char(8),
memberNo  char(8),
orderamount int,
foreign key(videoNo) references video(videoNo),
foreign key(memberNo) references kehu(memberNo)
);CREATE OR REPLACE TRIGGER TrigInsertOnZuJie
BEFORE INSERT OR UPDATE ON zujiejilu
FOR EACH ROW
DECLARE
    vVideoPrice Video.price%TYPE;
    vDailyRental pinzhong.dailyrental%TYPE;
    vCurrentTime DATE;
BEGIN
    IF inserting THEN
        SELECT price INTO vVideoPrice FROM Video WHERE VideoNo = :NEW.VIDEONO;
        :NEW.YAJIN := vVideoPrice * 2*:new.zujieamount;
    ELSE
        CASE :NEW.Zhuangtai
            WHEN '已付款' THEN
                 :New.shishou := :Old.yajin;
            WHEN '提前归还' THEN
                 SELECT SYSDATE INTO vCurrentTime FROM dual;
                 SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
                 :New.Datereturn := vCurrentTime;
                 :new.guihuanamount:=:new.zujieamount;
                 :NEW.shishou:=(vCurrentTime-:NEW.dateout)*vDailyRental*:new.zujieamount;
            WHEN '按期归还' THEN
               SELECT SYSDATE INTO vCurrentTime FROM dual;
               SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
               :NEW.shishou := (:new.datereturn-:new.dateout)*vDailyRental*:new.zujieamount;
               :new.guihuanamount:=:new.zujieamount;
            WHEN '超期归还' THEN
                 SELECT SYSDATE INTO vCurrentTime FROM dual;
                 SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
                 :new.shishou:=(7*vDailyRental+(vCurrentTime-:new.dateout-7)*vDailyRental*1.5)*:new.zujieamount;
                 :new.datereturn := vCurrentTime;
                 :new.guihuanamount:=:new.zujieamount;
           when '损坏丢失' then
                  SELECT SYSDATE INTO vCurrentTime FROM dual;
                 :new.shishou:=:old.yajin;
                 :new.datereturn := vCurrentTime;
        END CASE;
    END IF;
END TrigInsertOnZuJie;
最好在上面那个触发器里实现：插入一条记录，使得video表中的amount=amount-zujieamount，还有上面三个归还状态amount=amount+guihuanamount。  

Answer 1

IF inserting THEN
        SELECT price INTO vVideoPrice FROM Video WHERE VideoNo = :NEW.VIDEONO;
        :NEW.YAJIN := vVideoPrice * 2*:new.zujieamount;
     update video set amount=amount-:new.zujieamount where videoNo=:new.videoNo;
     
这是插入一条记录更新video表 的amount
归还状态的没看懂是什么意思

Answer 2

--不知道这个是不是楼主想要的
CREATE OR REPLACE TRIGGER TrigInsertOnZuJie
BEFORE INSERT OR UPDATE ON zujiejilu
FOR EACH ROW
DECLARE
    vVideoPrice Video.price%TYPE;
    vDailyRental pinzhong.dailyrental%TYPE;
    vCurrentTime DATE;
BEGIN
    IF inserting THEN
        SELECT price INTO vVideoPrice FROM Video WHERE VideoNo = :NEW.VIDEONO;
        :NEW.YAJIN := vVideoPrice * 2*:new.zujieamount;
        --插入一条记录，使得video表中的amount=amount-zujieamount
        update video set amount=amount-:new.zujieamount;
    ELSE
        CASE :NEW.Zhuangtai
            WHEN '已付款' THEN
                 :New.shishou := :Old.yajin;
            WHEN '提前归还' THEN
                 SELECT SYSDATE INTO vCurrentTime FROM dual;
                 SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
                 :New.Datereturn := vCurrentTime;
                 :new.guihuanamount:=:new.zujieamount;
                 :NEW.shishou:=(vCurrentTime-:NEW.dateout)*vDailyRental*:new.zujieamount;
                 --还有上面三个归还状态amount=amount+guihuanamount。
                 update video set amount=amount-:new.guihuanamount;
            WHEN '按期归还' THEN
               SELECT SYSDATE INTO vCurrentTime FROM dual;
               SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
               :NEW.shishou := (:new.datereturn-:new.dateout)*vDailyRental*:new.zujieamount;
               :new.guihuanamount:=:new.zujieamount;
                 --还有上面三个归还状态amount=amount+guihuanamount。
                 update video set amount=amount-:new.guihuanamount;
            WHEN '超期归还' THEN
                 SELECT SYSDATE INTO vCurrentTime FROM dual;
                 SELECT dailyrental INTO vDailyRental FROM pinzhong where pinzhongNo = (select pinzhongNo from video where VideoNo = :NEW.VideoNo);
                 :new.shishou:=(7*vDailyRental+(vCurrentTime-:new.dateout-7)*vDailyRental*1.5)*:new.zujieamount;
                 :new.datereturn := vCurrentTime;
                 :new.guihuanamount:=:new.zujieamount;
                 --还有上面三个归还状态amount=amount+guihuanamount。
                 update video set amount=amount-:new.guihuanamount;
           when '损坏丢失' then
                  SELECT SYSDATE INTO vCurrentTime FROM dual;
                 :new.shishou:=:old.yajin;
                 :new.datereturn := vCurrentTime;
        END CASE;
    END IF;
END TrigInsertOnZuJie;

Answer 3

好神奇，我记得当时用过这个句子，只是amount=amount-1.。。结果就不行了

Answer 4

update后面加个where条件就好了。