电脑桌面
添加蚂蚁七词文库到电脑桌面
安装后可以在桌面快捷访问

金蝶云星空 生产用料清单保存自动计算应发数量(最小发料批量).docx

金蝶云星空 生产用料清单保存自动计算应发数量(最小发料批量).docx_第1页
1/3
金蝶云星空 生产用料清单保存自动计算应发数量(最小发料批量).docx_第2页
2/3
金蝶云星空 生产用料清单保存自动计算应发数量(最小发料批量).docx_第3页
3/3
二开服务端插件挂在生产用料清单的保存操作上面,如下图:二开代码示例如下:usingKingdee.BOS.Core.DynamicForm.PlugIn;usingKingdee.BOS.Util;usingKingdee.K3.Core.MFG.EntityHelper;usingSystem;usingSystem.Collections.Generic;usingSystem.Linq;usingSystem.Text;usingSystem.ComponentModel;usingKingdee.BOS.Orm.DataEntity;usingKingdee.K3.Core.MFG.EnumConst;usingKingdee.K3.Core.BD.ServiceArgs;usingKingdee.K3.MFG.App;namespaceEK.Kingdee.K3.MFG.PRD.App.ServicePlugIn{[Description("生产用料清单保存计算最小发料批量数量")]publicclassPPBOMSaveCalMiniQty:AbstractOperationServicePlugIn{publicoverridevoidBeginOperationTransaction(global::Kingdee.BOS.Core.DynamicForm.PlugIn.Args.BeginOperationTransactionArgse){base.BeginOperationTransaction(e);if(e.DataEntitys.IsEmpty())return;foreach(DynamicObjectitemine.DataEntitys){DynamicObjectCollectionentryDatas=item.GetDynamicValue(CONST_PRD_PPBOM.CONST_FEntity.ENTITY_ORM_PPBomEntry);foreach(DynamicObjectentryDatainentryDatas){boolisMinIssueQty=entryData.GetDynamicValue(CONST_PRD_PPBOM.CONST_FEntity.ORM_ISMinIssueQty);if(isMinIssueQty==false)continue;DynamicObjectmtrlObj=entryData.GetDynamicValue(CONST_PRD_PPBOM.CONST_FEntity.ORM_MaterialID);if(mtrlObj.IsNullOrEmpty())continue;decimalchildMtrlIssueQty=mtrlObj.GetDynamicValue("MaterialProduce").FirstOrDefault().GetDynamicValue("MinIssueQty");//最小发料批量数量longchildMtrlMasterId=mtrlObj.GetDynamicValue("msterID");longchildMtrlBaseUnit=entryData.GetDynamicValue(CONST_PRD_PPBOM.CONST_FEntity.ORM_BaseUnitID_Id);//基本单位longchildMtrlIssueUnitId=mtrlObj.GetDynamicValue("MaterialProduce").FirstOrDefault().GetDynamicValue("MinIssueUnitId_Id");//最小发料批量单位varunitConvertRateArgs=newGetUnitConvertRateArgs(){MasterId=childMtrlMasterId,SourceUnitId=childMtrlIssueUnitId,DestUnitId=childMtrlBaseUnit};varunitConvert=AppServiceContext.BDService.GetUnitConvertRate(this.Context,unitConvertRateArgs);decimalbaseMustQty=entryData.GetDynamicValue(CONST_PRD_PPBOM.CONST_FEntity.ORM_BaseMustQty);decimalbaseMinIssueQty=unitConvert.ConvertQty(childMtrlIssueQty);decimalnewMinIssueQty=RoundQtyByMinBatchQty(baseMustQty,baseMinIssueQty);entryData.SetDynamicObjectItemValue("BaseMinIssueQty",newMinIssueQty);}}}privatedecimalRoundQtyByMinBatchQty(decimalqty,decimalminBatchQty){if(minBatchQty<=0)returnqty;decimalresult=qty;decimalremainQty=result%minBatchQty;if(remainQty>0){result=(qty-remainQty)+minBatchQty;}returnresult;}}}

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

金蝶云星空 生产用料清单保存自动计算应发数量(最小发料批量).docx

确认删除?
回到顶部
客服QQ
  • 客服QQ点击这里给我发消息
QQ群
  • 答案:my7c点击这里加入QQ群
支持邮箱
微信
  • 微信