二开案例.表单插件.动态表单启用网控

栏目：云星空知识作者：金蝶来源：金蝶云社区发布：2024-09-23浏览：1

二开案例.表单插件.动态表单启用网控

【应用场景】

在单据列表上，选中某行数，基于此数据行打开动态表单时，启用网控。

隔离粒度：用户+单据内码。

【案例演示】

新建动态表单，在采购订单列表上选中数据行，通过菜单打开此动态表单，并进行网控，禁止其被重复打开。

【实现步骤】

<1>BOSIDE新建动态表单。

<2>BOSIDE不支持动态表单配置网控，故通过SQL给动态表单创建网控对象和互斥对象。

关键数据：

业务对象标识：k475b1f84fa7f42448bdca410b4282942，数据来源：动态表单的标识。

网控对象内码：A91D2168-74BB-4E59-B37B-8E40B8B28BE，数据来源：GUID。

操作标识：Edit，数据来源：根据业务场景定义即可。

在数据中心执行以下SQL，创建网控对象：

-- 创建网控对象
DELETE FROM T_BAS_NETWORKCTRLOBJECT WHERE FID='A91D2168-74BB-4E59-B37B-8E40B8B28BEE';
INSERT INTO T_BAS_NETWORKCTRLOBJECT
        ( FID ,
          FNUMBER ,
          FMETAOBJECTID ,
          FOPERATIONID ,
          FTYPE ,
          FSTART ,
          FISDEFAULT
        )
VALUES  ( N'A91D2168-74BB-4E59-B37B-8E40B8B28BEE' , -- FID - nvarchar(36)
          N'Edit' , -- FNUMBER - nvarchar(255)
          N'k475b1f84fa7f42448bdca410b4282942' , -- FMETAOBJECTID - nvarchar(36)
          N'Edit' , -- FOPERATIONID - nvarchar(36)
          6 , -- FTYPE - int
          '1' , -- FSTART - char(1)
          '0'  -- FISDEFAULT - char(1)
        );
-- 创建网控对象(多语言)
DELETE FROM T_BAS_NETWORKCTRLOBJECT_L WHERE FID='A91D2168-74BB-4E59-B37B-8E40B8B28BEE';
INSERT INTO T_BAS_NETWORKCTRLOBJECT_L
        ( FPKID ,
          FID ,
          FLOCALEID ,
          FNAME ,
          FDESCRIPTION
        )
VALUES  ( N'E3E15A97-7A45-4AE9-89DC-4F27B41D6982' , -- FPKID - nvarchar(36)
          N'A91D2168-74BB-4E59-B37B-8E40B8B28BEE' , -- FID - nvarchar(36)
          2052 , -- FLOCALEID - int
          N'动态表单启用网控演示-修改' , -- FNAME - nvarchar(255)
          N''  -- FDESCRIPTION - nvarchar(255)
        );
-- 设置网控对象与自己互斥
DELETE FROM T_BAS_NETWORKCTRLMUTEX WHERE FNETCTRLID='A91D2168-74BB-4E59-B37B-8E40B8B28BEE';
INSERT INTO T_BAS_NETWORKCTRLMUTEX
        ( FID, FNETCTRLID, FTYPE, FMUTEXOBJID )
VALUES  ( N'B03FD5AE-CB37-49B9-A537-FE01CD1565D1', -- FID - nvarchar(36)
          N'A91D2168-74BB-4E59-B37B-8E40B8B28BEE', -- FNETCTRLID - nvarchar(36)
          0, -- FTYPE - int
          N'A91D2168-74BB-4E59-B37B-8E40B8B28BEE'  -- FMUTEXOBJID - nvarchar(36)
          );

<3>编写表单插件和列表插件，代码如下。

using Kingdee.BOS;
using Kingdee.BOS.Core.DynamicForm;
using Kingdee.BOS.Core.DynamicForm.PlugIn;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.List.PlugIn;
using Kingdee.BOS.Core.NetworkCtrl;
using Kingdee.BOS.ServiceHelper;
using Kingdee.BOS.Util;
using System;
using System.Collections.Generic;
using System.ComponentModel;
namespace Jac.XkDemo.BOS.Business.PlugIn
{
    /// <summary>
    /// 【表单插件】动态表单启用网控
    /// </summary>
    [Description("【表单插件】动态表单启用网控"), HotUpdate]
    public class StartNetworkCtrlFormPlugIn : AbstractDynamicFormPlugIn
    {
        /// <summary>
        /// 网控信息
        /// </summary>
        private readonly List<NetworkCtrlResult> networkCtrlResults = new List<NetworkCtrlResult>();
        public override void OnLoad(EventArgs e)
        {
            base.OnLoad(e);
            // 打开窗体，启动网控
            StartNetworkCtrl();
        }
        public override void BeforeClosed(BeforeClosedEventArgs e)
        {
            base.BeforeClosed(e);
            // 关闭窗体时，释放网控
            CommitNetworkCtrl();
        }
        public override void AfterBindData(EventArgs e)
        {
            base.AfterBindData(e);
            var billNo = this.View.OpenParameter.GetCustomParameter("BillNo") as string;
            this.Model.SetValue("F_Jac_Text", billNo);
            this.View.UpdateView("F_Jac_Text");
        }
        /// <summary>
        /// 启动网控
        /// </summary>
        /// <returns></returns>
        private NetworkCtrlResult StartNetworkCtrl()
        {
            // 启动修改操作的网控
            var operationId = "Edit";
            var operationName = new LocaleValue("修改");
            var netCtrl = NetworkCtrlServiceHelper.GetNetCtrl(Context, this.View.BillBusinessInfo.GetForm().Id, NetworkCtrlType.BusinessObjOperateMutex, operationId);
            if (netCtrl == null)
            {
                // 当前操作未定义互斥的网控
                return null;
            }
            var pkValue = this.View.OpenParameter.GetCustomParameter("PKValue") as string;
            var billNo = this.View.OpenParameter.GetCustomParameter("BillNo") as string;
            var para = new NetWorkRunTimeParam();
            para.OperationDesc = this.View.BillBusinessInfo.GetForm().Name + "-" + billNo + "-" + operationName;
            para.BillName = this.View.BillBusinessInfo.GetForm().Name;
            para.OperationName = new LocaleValue(operationName, Context.UserLocale.LCID);
            para.InterID = pkValue;
            // 发起网控
            var result = NetworkCtrlServiceHelper.BeginNetCtrl(this.Context, netCtrl, para);
            if (result.StartSuccess)
            {
                // 启动成功
                networkCtrlResults.Add(result);
            }
            else
            {
                // 启动失败，有冲突。
                this.View.Close();
                this.View.ParentFormView.ShowErrMessage(result.Message);
                this.View.SendDynamicFormAction(this.View.ParentFormView);
            }
            return result;
        }
        /// <summary>
        /// 释放网控
        /// </summary>
        /// <returns></returns>
        private bool CommitNetworkCtrl()
        {
            if (networkCtrlResults.Count > 0)
            {
                var result = NetworkCtrlServiceHelper.BatchCommitNetCtrl(this.Context, networkCtrlResults);
                if (result)
                {
                    networkCtrlResults.Clear();
                }
                return result;
            }
            return false;
        }
    }
    /// <summary>
    /// 【列表插件】显示动态表单窗体
    /// </summary>
    [Description("【列表插件】显示动态表单窗体"), HotUpdate]
    public class StartNetworkCtrlListPlugIn : AbstractListPlugIn
    {
        public override void BarItemClick(BarItemClickEventArgs e)
        {
            base.BarItemClick(e);
            if (e.BarItemKey.EqualsIgnoreCase("test"))
            {
                if (this.ListView.SelectedRowsInfo == null || ListView.SelectedRowsInfo.Count == 0)
                {
                    this.View.ShowWarnningMessage("没有选择任何数据，请先选择数据！");
                    return;
                }
                var pkValue = this.ListView.CurrentSelectedRowInfo.PrimaryKeyValue;
                var billNo = this.ListView.CurrentSelectedRowInfo.BillNo;
                var showParameter = new DynamicFormShowParameter();
                showParameter.FormId = "k475b1f84fa7f42448bdca410b4282942";
                showParameter.PageId = Guid.NewGuid().ToString();
                showParameter.ParentPageId = this.View.PageId;
                showParameter.CustomParams["PKValue"] = pkValue;
                showParameter.CustomParams["BillNo"] = billNo;
                this.View.ShowForm(showParameter);
            }
        }
    }
}

<4>拷贝插件组件到应用站点的WebSite\Bin目录下，重启IIS。