销售订单审核检查是否有BOM的触发器ERP论坛|用友|金蝶|速达|神州数码 ...企业库|免费b2b网站

销售订单审核检查是否有BOM的触发器ERP论坛|用友|金蝶|速达|神州数码 ...

级别: 论坛董事

create TRIGGER [ryan_PO] ON [dbo].[SEOrder]
FOR update
AS
if not update (fmultichecklevel1)
return
declare @n int --统计本订单中成品种类
declare @m varchar(50) --提示出错信息
--判断是否有BOM
IF EXISTS (
select i.finterid from inserted i
inner join SEOrderEntry n on n.finterid=i.finterid
inner join t_icitembase a on n.fitemid=a.fitemid and a.ferpclsid='2'
)
Begin
if EXISTS (
select m.finterid from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join SEOrderEntry n on n.finterid=i.finterid
left join ICBOM b on b.fitemid=n.fitemid and b.fusestatus='1072'
where b.fbomnumber is null
)
BEGIN
--统计无BOM成品的个数
select @n=count(m.finterid) from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join SEOrderEntry n on n.finterid=i.finterid
inner join t_icitembase a on n.fitemid=a.fitemid
left join ICBOM b on b.fitemid=n.fitemid and b.fusestatus='1072'
where b.fbomnumber is null
--显示无BOM物料个数
select @m='有'+cast(@n AS char(2))+'个自制产品没有BOM或BOM未使用'
ROLLBACK TRAN
RAISERROR(@m,18,18)
END
--将用表头中的出货日期，更新子表中的出货日期
update n set n.fdate=m.fheadselfs0146,n.fadviceconsigndate=m.fheadselfs0155-7 from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join SEOrderEntry n on m.finterid=n.finterid
--更新表头中的客户名称字段，该名称字段将代入生产任务管理单中
update m set m.fheadselfs0150=s.fname from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join t_Organization s on i.fcustid=s.fitemid
END
else
--将用表头中的出货日期，更新子表中的出货日期
update n set n.fdate=m.fheadselfs0146,n.fadviceconsigndate=m.fheadselfs0155-7 from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join SEOrderEntry n on n.finterid=m.finterid
--更新表头中的客户名称字段，该名称字段将代入生产任务管理单中
update m set m.fheadselfs0150=s.fname from inserted i
inner join SEOrder m on m.finterid=i.finterid
inner join t_Organization s on i.fcustid=s.fitemid

郑重声明：资讯【销售订单审核检查是否有BOM的触发器ERP论坛|用友|金蝶|速达|神州数码 ...】由发布，版权归原作者及其所在单位，其原创性以及文中陈述文字和内容未经(企业库qiyeku.com)证实，请读者仅作参考，并请自行核实相关内容。若本文有侵犯到您的版权，请你提供相关证明及申请并与我们联系（qiyeku # qq.com）或【在线投诉】，我们审核后将会尽快处理。

—— 相关资讯 ——