有效期至默认为到期日每月最后一天的配置实现原创
103人赞赏了该文章
2,891次浏览
编辑于2022年05月20日 10:46:56
一、【需求问题】
启用了有效期管理,入库单据如何设置有效期默认到到期日每月的最后一天?比如生产日期是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、物料编码配置值更新,触发"生产日期"值更新事件
实现效果
参考
推荐阅读