项目采买单触发器.txt

来自「进销存软件触发器。用于仓储型公司。库存量的变化。」· 文本 代码 · 共 50 行

use [xc]
go

create trigger xc_cfq_项目采买单
ON [dbo].[项目采买单]
After UPDATE
AS
Declare @mc as char
Declare @sl as char
Declare @cur_sl as char
Declare @xmbh as char
Declare @xmsj as char
Declare @dj as char
Declare @hj as char
Declare @sjzc as char
Declare @xxsm as char
Declare @wcqr as char
Declare @sfyfp as char
Declare @xmzj as char
Declare @kffz as char
Declare @cwfz as char
Declare @zjl as char
select @mc = sl from inserted
select @sl = sl from inserted
if not exists(select sl from [dbo].[库存] where sl = @sl)
Begin
Insert into [dbo].[项目采买单] values (
      @mc,
      @sl,
      @xmbh,
      @xmsj,
      @dj,
      @hj,
      @sjzc,
      @xxsm,
      @wcqr,
      @sfyfp,
      @xmzj,
      @kffz,
      @cwfz,
      @zjl)
end
Else
Begin
select @cur_sl = sl from [dbo].[库存]
Update [dbo].[库存] set sl= (@sl + @cur_sl)
End