二开案例.单据插件.新建单据时启用网控

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

二开案例.单据插件.新建单据时启用网控

【应用场景】

新建单据时启用网控,同一个用户,只允许打开一个新增单据界面。

隔离粒度:单据标识。


【案例演示】

打开采购订单新增界面时,启用网控,同一个用户,只允许打开一个新增单据界面


【实现步骤】

<1>通过SQL给单据的新增打开操作创建网控对象和互斥对象。

关键数据:

业务对象标识:PUR_PurchaseOrder,数据来源:采购订单的标识。

网控对象内码:ED48E577-A87B-4F10-9498-9EA599586A38,数据来源:GUID。

操作标识:Open,数据来源:根据业务场景定义即可。


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

-- 创建网控对象
DELETE FROM T_BAS_NETWORKCTRLOBJECT WHERE FID='ED48E577-A87B-4F10-9498-9EA599586A38';
INSERT INTO T_BAS_NETWORKCTRLOBJECT
        ( FID ,
          FNUMBER ,
          FMETAOBJECTID ,
          FOPERATIONID ,
          FTYPE ,
          FSTART ,
          FISDEFAULT
        )
VALUES  ( N'ED48E577-A87B-4F10-9498-9EA599586A38' , -- FID - nvarchar(36)
          N'Open' , -- FNUMBER - nvarchar(255)
          N'PUR_PurchaseOrder' , -- FMETAOBJECTID - nvarchar(36)
          N'Open' , -- FOPERATIONID - nvarchar(36)
          6 , -- FTYPE - int
          '1' , -- FSTART - char(1)
          '0'  -- FISDEFAULT - char(1)
        );
-- 创建网控对象(多语言)
DELETE FROM T_BAS_NETWORKCTRLOBJECT_L WHERE FID='ED48E577-A87B-4F10-9498-9EA599586A38';
INSERT INTO T_BAS_NETWORKCTRLOBJECT_L
        ( FPKID ,
          FID ,
          FLOCALEID ,
          FNAME ,
          FDESCRIPTION
        )
VALUES  ( N'DF3F17BA-8270-4B1E-9641-BB5F9DE0DB70' , -- FPKID - nvarchar(36)
          N'ED48E577-A87B-4F10-9498-9EA599586A38' , -- FID - nvarchar(36)
          2052 , -- FLOCALEID - int
          N'采购订单-新增打开' , -- FNAME - nvarchar(255)
          N''  -- FDESCRIPTION - nvarchar(255)
        );
-- 设置网控对象与自己互斥
DELETE FROM T_BAS_NETWORKCTRLMUTEX WHERE FNETCTRLID='ED48E577-A87B-4F10-9498-9EA599586A38';
INSERT INTO T_BAS_NETWORKCTRLMUTEX 
        ( FID, FNETCTRLID, FTYPE, FMUTEXOBJID )
VALUES  ( N'19F40BEA-79BB-4B8D-B3B0-B5E1EF81B195', -- FID - nvarchar(36)
          N'ED48E577-A87B-4F10-9498-9EA599586A38', -- FNETCTRLID - nvarchar(36)
          0, -- FTYPE - int
          N'ED48E577-A87B-4F10-9498-9EA599586A38'  -- FMUTEXOBJID - nvarchar(36)
          );


<2>编写单据插件,代码如下。

using Kingdee.BOS;
using Kingdee.BOS.Core.Bill.PlugIn;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Core.Metadata;
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 BillFormStartNetworkCtrlBillPlugIn : AbstractBillPlugIn
    {
        /// <summary>
        /// 网控信息
        /// </summary>
        private readonly List<NetworkCtrlResult> networkCtrlResults = new List<NetworkCtrlResult>();
        /// <summary>
        /// 当前窗体是否是新增状态下的窗体
        /// </summary>
        public bool IsNewForm
        {
            get
            {
                // 新增打开或者复制打开,都视之为新增状态
                return this.View.OpenParameter.Status == OperationStatus.ADDNEW || this.View.OpenParameter.CreateFrom == CreateFrom.Copy;
            }
        }
        public override void OnLoad(EventArgs e)
        {
            base.OnLoad(e);
            if (!IsNewForm)
            {
                // 非新增窗体,不处理
                return;
            }
            // 打开窗体,启动网控
            StartNetworkCtrl();
        }
        public override void BeforeClosed(BeforeClosedEventArgs e)
        {
            base.BeforeClosed(e);
            if (!IsNewForm)
            {
                // 非新增窗体,不处理
                return;
            }
            // 关闭窗体时,释放网控
            CommitNetworkCtrl();
        }
        //public override void FormClosed(FormClosedEventArgs e)
        //{
        //    base.FormClosed(e);
        //    if (!IsNewForm)
        //    {
        //        // 非新增窗体,不处理
        //        return;
        //    }
        //    // 关闭窗体时,释放网控
        //    CommitNetworkCtrl();
        //}
        /// <summary>
        /// 启动网控
        /// </summary>
        /// <returns></returns>
        private NetworkCtrlResult StartNetworkCtrl()
        {
            // 启动修改操作的网控
            var operationId = "Open";
            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.Context.UserId.ToString();
            var para = new NetWorkRunTimeParam();
            para.OperationDesc = this.View.BillBusinessInfo.GetForm().Name + "-" + 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;
        }
    }
}


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


<4>BOSIDE扩展采购订单,注册表单插件,保存元数据,开发完毕。



【功能验证】

<1>登录业务站点,打开采购订单新增界面,此时会产生一条网控记录。

当再次点击菜单【采购订单】,此时会弹出操作冲突的提示,如下图。

---------------------------------------------------------------------------------------------------------

【更多案例】

【二开案例.表单插件.打开动态表单时启用网控】https://vip.kingdee.com/article/376368211060749056

【二开案例.列表插件.打开列表时启用网控】https://vip.kingdee.com/article/376382659397452800

---------------------------------------------------------------------------------------------------------













【金蝶云星空BOS二次开发案例演示】https://vip.kingdee.com/article/94751030918525696

二开案例.单据插件.新建单据时启用网控

【应用场景】新建单据时启用网控,同一个用户,只允许打开一个新增单据界面。隔离粒度:单据标识。【案例演示】打开采购订单新增界面时,启...
点击下载文档
确认删除?
回到顶部
客服QQ
  • 客服QQ点击这里给我发消息