销售发货单增加审核日期

xrdg123

具体思路：
取表头的日期自定义项，
改名为审核日期
用触发器来实现
当单据审核时，审核日期更新为软件的登录日期（或电脑右下角的日期）
当单据弃审时，审核日期更新为空

求可用的脚本，
备注：精算版标准版

liuyan5688

暂时没有 我半你看看

lyj123

以下这个是U6更新审核日期，希望对你有帮助吧！

CREATE TRIGGER [自动更新发货单及委托代销发货单的备注和审核日期ins] ON dbo.DispatchList
FOR insert,update
AS
DECLARE @cdefine14 varchar(120)
DECLARE @cmemo varchar(120)
DECLARE @dlid varchar(100)
DECLARE @审核标志 varchar(120)
DECLARE @自定义4 datetime
set @dlid=(select dlid from Inserted)
set @cdefine14=(select cdefine14 from Inserted where [email=dlid=@dlid]dlid=@dlid[/email])
set @cmemo=(select cmemo from Inserted where [email=dlid=@dlid]dlid=@dlid[/email])
SET @审核标志=(select cverifier from DispatchList where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email])
IF (@审核标志 is not null)
BEGIN
set @自定义4=convert(varchar(10),getdate(),20)
UPDATE DispatchList SET DispatchList.cDefine4=@自定义4 where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email]
end
IF (@审核标志 is  null)
BEGIN
UPDATE DispatchList SET DispatchList.cDefine4= null where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email]
end
BEGIN
UPDATE dispatchlist set [email=cmemo=@cdefine14]cmemo=@cdefine14[/email]  where   [email=dlid=@dlid]dlid=@dlid[/email]
END

zhangshuicai

CREATE TRIGGER [自动更新发货单及委托代销发货单的备注和审核日期ins] ON dbo.DispatchList
FOR insert,update
AS
DECLARE @cdefine14 varchar(120)
DECLARE @cmemo varchar(120)
DECLARE @dlid varchar(100)
DECLARE @审核标志 varchar(120)
DECLARE @自定义4 datetime
set @dlid=(select dlid from Inserted)
set @cdefine14=(select cdefine14 from Inserted where [email=dlid=@dlid]dlid=@dlid[/email])
set @cmemo=(select cmemo from Inserted where [email=dlid=@dlid]dlid=@dlid[/email])
SET @审核标志=(select cverifier from DispatchList where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email])
IF (@审核标志 is not null)
BEGIN
set @自定义4=convert(varchar(10),getdate(),20)
UPDATE DispatchList SET DispatchList.cDefine4=@自定义4 where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email]
end
IF (@审核标志 is  null)
BEGIN
UPDATE DispatchList SET DispatchList.cDefine4= null where [email=DispatchList.dlid=@DLid]DispatchList.dlid=@DLid[/email]
end
BEGIN
UPDATE dispatchlist set [email=cmemo=@cdefine14]cmemo=@cdefine14[/email]  where   [email=dlid=@dlid]dlid=@dlid[/email]
END

dnvgogfcu

学习下。。。 谢谢

qqww1111

shinpaul

恩，人家连代码都贴出来了
只要搞清楚字段和触发条件，这个触发器就就改出来了

create 触发器 for update
   if（审核操作），update
   if（弃审擦做），update

jzzhangshuai

牛！！顶一下

naojin

/*
        当单据审核时，审核日期更新为软件的登录日期
        当单据弃审时，审核日期更新为空

*/

IF EXISTS (SELECT name FROM sysobjects
      WHERE name = 'DoVerifyDate' AND type = 'TR')
   DROP TRIGGER DoVerifyDate
GO

CREATE TRIGGER DoVerifyDate ON DispatchList
        FOR update  /*仅仅是在更新时触发，因为审核或弃审只是修改字段标识*/
AS


--审核人
declare @cVerifier varchar(20)

--如果是更新到审核人就表示是做审核或弃审操作
if update(cVerifier)        begin
        select @cVerifier=cVerifier from Inserted

        if @cVerifier is not null        
                     UPDATE  DispatchList SET DispatchList.cDefine4= GETDATE()
                        FROM  Inserted,DispatchList
                      WHERE Inserted.dlid=DispatchList.dlid
        else  
                     UPDATE  DispatchList SET DispatchList.cDefine4= null
                        FROM  Inserted,DispatchList
                     WHERE  Inserted.dlid=DispatchList.dlid
end

naojin

Deleted =旧的一条记录
Inserted=新的一条记录
一个Update 的过程可以看作为：生成新的记录到Inserted表，复制旧的记录到Deleted表，然后往DispatchList里写入新纪录。

cdwlove

学习中~~~~~~~~~~

风帆刘工

版主的语句写的严谨，学习

linshiyang

只得学习下~

happy2540

现在看不懂，先收下了

shizhiliuyu

好多高手，来学习一下。