此代码为用友收发记录主表RdRecord中的触发器代码，目的是限制跨月审核发货单，如发货单为4月日期，而审核时为5月，或发货单为5月，审核为4月，像这种跨月处理时，用友根本不作限制，一点都不严谨，所以特写此触发器。给有用的人吧。
代码如下
------------------------------------------------
create TRIGGER ck_date_RdRecord
ON RdRecord
FOR INSERT
AS
BEGIN
--DispatchList发货单主表表名
--RdRecord销售出库单主表表名
--cDLCode发货单号
--dDate发货单日期
--cBusCode销售出库单业务号
--dDate销售出库单日期
--cVerIFier发货单审核人
--cSource单据来源 = '发货单'
IF UPDATE (cSource)
BEGIN
SET NOCOUNT ON
IF(exists(select R_a.* from inserted R_a inner join DispatchList R_b on R_a.cBusCode = R_b.cDLCode
where R_a.cSource = '发货单'
and ((datepart(year,R_a.dDate) <> datepart(year,R_b.dDate))
or (datepart(year,R_a.dDate) = datepart(year,R_b.dDate) and datepart(month,R_a.dDate) <> datepart(month,R_b.dDate) ))
))
begin
RAISERROR ('<<阳光网驿>>提示：单据日期与登录日期不在同一月，请误跨月处理业务，请重新登录系统！', 16, 1)
ROLLBACK TRANSACTION
END
SET NOCOUNT OFF
END
END
--------------------------------------------- |
发表于 2010-4-6 11:03:34
楼主
