一、【需求问题】

启用了有效期管理,入库单据如何设置有效期默认到到期日每月的最后一天?比如生产日期是2022-3-12,有效期12月,到期日自动默认是2023-3-31号?

二、【功能分析】

当前系统中根据物料是否启用保质期,在物料编码的值更新配置有”通过日期单位计算日期”的服务,根据生产日期、保质期、保质期单位,计算得到有效期至,生产日期默认赋值为当前日期。

即:假设物料保质期单位为日,保质期为10,当前系统日期为2022-05-20,则计算得到有效期至为2022-05-30

云星空系统有效期至默认为到期日每月最后一天的配置实现-编程日记

【实现】

1、生产日期配置值更新,计算赋值有效期值:FEXPIRYDATE = FEXPIRYDATE.Date.AddDays(1 – FEXPIRYDATE.Date.Day).AddMonths(1).AddDays(-1) if FEXPIRYDATE != null else FEXPIRYDATE

云星空系统有效期至默认为到期日每月最后一天的配置实现-编程日记

2、物料编码配置值更新,触发”生产日期”值更新事件

云星空系统有效期至默认为到期日每月最后一天的配置实现-编程日记

实现效果

云星空系统有效期至默认为到期日每月最后一天的配置实现-编程日记