73.3、单据转换插件,多选基础资料,代码原创
金蝶云社区-林荫大道cc身份
林荫大道cc
23人赞赏了该文章 11807次浏览 未经作者许可,禁止转载编辑于2021年03月30日 21:41:55
封面

73.2



 1、打开VS,新建一个类 ,具体可以参考   4.1  1-7步


2、项目名称KingdeeYC.Bos.Test.ConvertPlug


image.png



3、修改类名称为 MulBaseZLConvPlug


image.png



4、引用的dll


        Kingdee.BOS.dll

        Kingdee.BOS.Contracts.dll

        Kingdee.BOS.Core.dll

        Kingdee.BOS.DataEntity.dll

        Kingdee.BOS.App.dll


image.png



5、使用


using System;

using System.Collections.Generic;

using System.ComponentModel;

using Kingdee.BOS.Core.Metadata;

using Kingdee.BOS.Core.Metadata.ConvertElement.PlugIn;

using Kingdee.BOS.Core.Metadata.ConvertElement.PlugIn.Args;

using Kingdee.BOS.Core.Metadata.EntityElement;

using Kingdee.BOS.Orm.DataEntity;

using Kingdee.BOS.Contracts;

using Kingdee.BOS.App;

using Kingdee.BOS.Core.Metadata.FieldElement;

using System.Linq;



6、继承的接口类  AbstractConvertPlugIn


image.png



7、复制固定写法的代码


using System;
using System.Collections.Generic;
using System.ComponentModel;
using Kingdee.BOS.Core.Metadata;
using Kingdee.BOS.Core.Metadata.ConvertElement.PlugIn;
using Kingdee.BOS.Core.Metadata.ConvertElement.PlugIn.Args;
using Kingdee.BOS.Core.Metadata.EntityElement;
using Kingdee.BOS.Orm.DataEntity;
using Kingdee.BOS.Contracts;
using Kingdee.BOS.App;
using Kingdee.BOS.Core.Metadata.FieldElement;
using System.Linq;
namespace KingdeeYC.Bos.Test.ConverPlug
{
    [Description("多选基础资料插件")]
    public class MulBaseZLConvPlug : AbstractConvertPlugIn
    {
        public override void AfterConvert(AfterConvertEventArgs e)
        {
            // 找到目标单单据关联主实体
            var targetForm = e.TargetBusinessInfo.GetForm();
            if (targetForm.LinkSet == null
                || targetForm.LinkSet.LinkEntitys == null
                || targetForm.LinkSet.LinkEntitys.Count == 0)
            {
                // 目标单未设置关联主实体,无法获取目标单的源单信息,携带不了
                return;
            }
            // 关联主实体
            Entity entity = e.TargetBusinessInfo.GetEntity(
                targetForm.LinkSet.LinkEntitys[0].ParentEntityKey);
            // 关联Link子实体
            Entity linkEntity = e.TargetBusinessInfo.GetEntity(
                targetForm.LinkSet.LinkEntitys[0].Key);
            // 收集全部源单内码
            HashSet<long> srcBillIds = new HashSet<long>();
            // Dictionary(目标单索引, HashSet(源单内码))
            Dictionary<int, HashSet<long>> dctDataIndexToSrcBillId = new Dictionary<int, HashSet<long>>();
            var entryRows = e.Result.FindByEntityKey(entity.Key);
            foreach (var entryRow in entryRows)
            {
                int dataIndex = entryRow.DataEntityIndex;
                if (dctDataIndexToSrcBillId.ContainsKey(dataIndex) == false)
                {
                    dctDataIndexToSrcBillId.Add(dataIndex, new HashSet<long>());
                }
                var linkRows = linkEntity.DynamicProperty.GetValue(entryRow.DataEntity) as DynamicObjectCollection;
                foreach (var linkRow in linkRows)
                {
                    long srcBillId = Convert.ToInt64(linkRow["SBillId"]);
                    if (srcBillIds.Contains(srcBillId) == false)
                    {
                        srcBillIds.Add(srcBillId);
                    }
                    // 记录每条目标单,其引用的源单集合
                    if (dctDataIndexToSrcBillId[dataIndex].Contains(srcBillId) == false)
                    {
                        dctDataIndexToSrcBillId[dataIndex].Add(srcBillId);
                    }
                }
            }
            // 读取源单上的多选辅助资料信息
            IViewService viewService = ServiceHelper.GetService<IViewService>();
            // 仅加载源单内码、多选辅助资料内码
            List<SelectorItemInfo> selectItems = new List<SelectorItemInfo>();
            selectItems.Add(new SelectorItemInfo(e.SourceBusinessInfo.GetForm().PkFieldName));
            selectItems.Add(new SelectorItemInfo("F_MulDepId"));
            string filter = string.Format("{0} IN ({1})",
                            e.SourceBusinessInfo.GetForm().PkFieldName,
                            string.Join(",", srcBillIds));
            var srcObjs = viewService.Load(this.Context,
                        e.SourceBusinessInfo, selectItems,
                        OQLFilter.CreateHeadEntityFilter(filter));
            // 收集源单上全部的辅助资料内码
            MulBaseDataField sourceFld = e.SourceBusinessInfo.GetField("F_MulDepId") as MulBaseDataField;
            HashSet<string> assIds = new HashSet<string>();
            // Dictionary(源单内码, HashSet(辅助资料内码))
            Dictionary<long, HashSet<string>> dctSrcBillIdToAssIds = new Dictionary<long, HashSet<string>>();
            foreach (var srcObj in srcObjs)
            {
                long srcBillId = Convert.ToInt64(srcObj[0]);
                var srcAssiRows = sourceFld.RefEntityDynamicProperty.GetValue(srcObj) as DynamicObjectCollection;
                foreach (var srcAssiRow in srcAssiRows)
                {
                    string assId = Convert.ToString(sourceFld.RefIDDynamicProperty.GetValue(srcAssiRow));
                    if (assIds.Contains(assId) == false)
                    {
                        assIds.Add(assId);
                    }
                    if (dctSrcBillIdToAssIds.ContainsKey(srcBillId) == false)
                    {
                        dctSrcBillIdToAssIds.Add(srcBillId, new HashSet<string>());
                    }
                    if (dctSrcBillIdToAssIds[srcBillId].Contains(assId) == false)
                    {
                        dctSrcBillIdToAssIds[srcBillId].Add(assId);
                    }
                }
            }
            // 加载辅助资料详情
            MulBaseDataField targetFld = e.TargetBusinessInfo.GetField("F_MulDepId") as MulBaseDataField;
            var assObjs = viewService.Load(
                this.Context,
                (from p in assIds select (object)p).ToArray(),
                targetFld.RefFormDynamicObjectType);
            // Dictionary(辅助资料内码, 辅助资料数据包)
            Dictionary<string, DynamicObject> dctAssObjs = new Dictionary<string, DynamicObject>();
            foreach (var assObj in assObjs)
            {
                string assId = Convert.ToString(assObj[0]);
                dctAssObjs.Add(assId, assObj);
            }
            // 向目标单填写辅助资料
            var headObjs = e.Result.FindByEntityKey(targetFld.EntityKey);
            foreach (var item in dctDataIndexToSrcBillId)
            {
                int dataIndex = item.Key;
                DynamicObject headObj = headObjs[dataIndex].DataEntity;
               var mulAssiRows = targetFld.RefEntityDynamicProperty.GetValue(headObj) as DynamicObjectCollection;
                foreach (var srcBillId in item.Value)
                {
                    if (dctSrcBillIdToAssIds.ContainsKey(srcBillId) == false) continue;
                    foreach (var assId in dctSrcBillIdToAssIds[srcBillId])
                    {
                        if (dctAssObjs.ContainsKey(assId) == false) continue;
                        DynamicObject newAssiRow = new DynamicObject(targetFld.RefEntityDynamicObjectType);
                        mulAssiRows.Add(newAssiRow);
                        targetFld.RefIDDynamicProperty.SetValue(newAssiRow, assId);
                        targetFld.DynamicProperty.SetValue(newAssiRow, dctAssObjs[assId]);
                    }
                }
            }
        }
    }
}


8、注意:修改3处理地方,改成上一章节,采购订单和收料通知单,字段标识 F_MULDEPID


image.png


image.png


image.png



9、注册插件


9.1、打开单据转换,点扩展

image.png



9.2、打开插件策略,点注册


image.png



10、最终效果,采购订单下推收料通知单,带出多选部门


image.png



总目录链接

https://vip.kingdee.com/article/6499387201459123


发布于 金蝶云星空BOS开发交流圈 社群

赞 23