www.gusucode.com > 精典源码Delphi130：顺某指纹考勤管理系统 > 精典源码Delphi130：顺某指纹考勤管理系统/11065顺某指纹考勤管理系统delphi/TRIGGER/trgUpdate_bYGongXX_KQNO.txt

    

/************  
 This Trigger is writed for Update tabbles :
   bZCBPaiD,bZWen ,bQingJ, bWaiChu,bKQJL,   bCQJieG, bDB_BCPD,bTiaoBanJL,bJiaB_ZB_JL,bLinSchuR, bKQDayHuiZJL 
   recrords when Update this KQNO
 
 Writed WangBin
 Writed Date : 1999-12-24
 Updated Date: 2001 - 09-25: 加考勤测试后，同时修改答题记录表


*************/


CREATE TRIGGER trgUpdate_bYGongXX_KQNO ON [bYGongXX] 
FOR  Update
AS


begin
  if @@RowCount=0
     Return
  if Not Update(KQNO) 
     Return
/* 1. Update From bZCBPaiD  where KQNO=Update.KQNO   */
  Update bZCBPaiD set KQNO=i.KQNO from Deleted d,bZCBPaiD t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
 
/* 2. Update From bZWen  where KQNO=Update.KQNO   */
  Update bZWen set KQNO=i.KQNO from Deleted d,bZWen t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 3. Update From bQingJ  where KQNO=Update.KQNO   */
  Update bQingJ set KQNO=i.KQNO from Deleted d,bQingJ t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 4. Update From bWaiChu  where KQNO=Update.KQNO   */
  Update bWaiChu set KQNO=i.KQNO from Deleted d,bWaiChu t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 5. Update From bKQJL  where KQNO=Update.KQNO   */
  Update bKQJL set KQNO=i.KQNO from Deleted d, bKQJL t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError


/* 6. Update From bCQJieG  where KQNO=Update.KQNO   */
  Update bCQJieG set KQNO=i.KQNO from Deleted d, bCQJieG t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 7. Update From bDB_BCPD  where KQNO=Update.KQNO   */
  Update bDB_BCPD set KQNO=i.KQNO from Deleted d, bDB_BCPD t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/*8. Update From bTiaoBanJL  where KQNO=Update.KQNO   */
  Update bTiaoBanJL set KQNO=i.KQNO from Deleted d, bTiaoBanJL t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 9. Update From bJiaB_ZB_JL  where KQNO=Update.KQNO   */
  Update bJiaB_ZB_JL set KQNO=i.KQNO from Deleted d, bJiaB_ZB_JL t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError
/* 10. Update From bLinSchuR  where KQNO=Update.KQNO   */
  Update bLinSchuR set KQNO=i.KQNO from Deleted d, bLinSchuR t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError

/* 11. Update From bKQDayHuiZJL  where KQNO=Update.KQNO   */
  Update bKQDayHuiZJL set KQNO=i.KQNO from Deleted d,bKQDayHuiZJL t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError

/* 12. Update From bYGAnswer  where KQNO=Update.KQNO   */
  Update bYGAnswer set KQNO=i.KQNO from Deleted b,YGAnswer t,Inserted i where d.KQNO=t.KQNO 
  if @@error !=0 goto DealError



  return


DealError:
  begin
    Raiserror("在 trgDelete_txzUserXX 中失败！",16,1)
    RollBack tran
    Return
  end
 

end