关于delete触发器更新不了记录的问题！(30分)

lijun175165721 · 2006-08-05

我写了如下的关于INSERT, UPDATE,delete三个触发器，INSERT, UPDATE能正常更新数据但 delete触发器却在删除数据时出现了问题！不能保持数据的一致性！请大家给出意见！   IF exists (select *  from  SysObjects where type='TR'  and Name='Trigger_采购表')   Drop  trigger Trigger_采购表 go CREATE TRIGGER Trigger_采购表  ON [dbo].[采购表] FOR INSERT, UPDATE AS  Declare     @药品编号 int,   @年 int,   @月 int,   @入库量 int,   --@出库量 int,   @成本 numeric (18,2),   @Del_入库量 int,   @Del_成本  numeric (18,2),   @销售额   numeric (18,2),   @月初累计成本 numeric(18,2),   @月初结存数量  int  set   @Del_入库量=0  set   @Del_成本=0.00  select  @药品编号=药品编号, @年=Year(入库日期) , @月=Month(入库日期),             @入库量 =入库量, @成本=应付金额  from  inserted  select  @药品编号=药品编号, @年=Year(入库日期) , @月=Month(入库日期),             @Del_入库量 =入库量, @Del_成本=应付金额  from  Deleted  insert into table1 select  入库量,应付金额 from deleted if @月=1 begin  if not Exists (select * from 库存明细表  where 药品编号=@药品编号 and 年=@年-1 and 月=12)    set  @月初累计成本=0.00  else   select @月初累计成本=月末累计成本 from 库存明细表 where 药品编号=@药品编号 and 年=@年 and 月=12 end else begin    if not Exists (select * from 库存明细表 where 药品编号=@药品编号 and 年=@年 and 月=@月-1)   set  @月初累计成本=0.00  else    select @月初累计成本=月末累计成本 from 库存明细表 where 药品编号=@药品编号 and 年=@年 and 月=@月-1 end if @月=1 begin  if not Exists (select * from 库存明细表 where 药品编号=@药品编号 and 年=@年-1 and 月=12)    set  @月初结存数量=0  else    select @月初结存数量=月末结存数量 from 库存明细表 where 药品编号=@药品编号 and 年=@年-1 and 月=12   end else   begin  if not Exists (select * from 库存明细表 where 药品编号=@药品编号 and 年=@年 and 月=@月-1)    set @月初结存数量=0  else    select @月初结存数量=月末结存数量 from 库存明细表 where 药品编号=@药品编号 and 年=@年 and 月=@月-1 end if Not Exists(select * from 库存明细表  where 药品编号=@药品编号 and 年=@年 and 月=@月)  insert into 库存明细表(药品编号,年,月,本月入库累计数量,本月累计成本,月初累计成本,月末累计成本,月初结存数量,月末结存数量) values(@药品编号,@年,@月,@入库量-@Del_入库量,@成本-@Del_成本,@月初累计成本,@成本+@月初累计成本-@Del_成本,@月初结存数量,@月初结存数量+@入库量-@Del_入库量) else Update 库存明细表 set 本月入库累计数量=本月入库累计数量+@入库量-@Del_入库量,                      本月累计成本=本月累计成本+@成本-@Del_成本,                      月末累计成本=月末累计成本+@成本-@Del_成本,                      月末结存数量=月末结存数量+@入库量-@Del_入库量 where  药品编号=@药品编号 and 年=@年 and 月=@月 set   @Del_入库量=0 set   @Del_成本=0.00 -- if Not Exists(select * from 库存明细表  where 药品编号=@药品编号 and 年=@年 and 月=@月) --  insert into 库存明细表(药品编号,年,月,本月入库累计数量,本月累计成本,月初累计成本,月末累计成本) --values(@药品编号,@年,@月,@入库量,@成本,@月初累计成本,@月初累计成本+@成本) --else --Update 库存明细表 set 本月入库累计数量=本月入库累计数量+@入库量,本月累计成本=本月累计成本+@成本 --                      月初累计成本=@月初累计成本, --                      月末累计成本=@月初累计成本+@成本     --where  药品编号=@药品编号 and 年=@年 and 月=@月

关于delete触发器更新不了记录的问题！(30分)

lijun175165721

Unregistered / Unconfirmed

Similar threads