金蝶云星空下游单据的操作控制上游单据的状态转换开发方案

一、说明
一般来说，下游反写数量到上游的场景比较，比如用来控制超额，状态模式使用累加，就省事很多，保存累加，删除会自动扣减。但是状态反写，复选框和文本类的，就不能这样设计了。
本文就以状态反写来说明一下开发的实现，复选框和文本也是一样的。

二、方案设计
售后单增加变更标记：N未变更，A变更中，B已变更
售后单变更单保存的时候 反写变更单状态为变更中，
生效时反写为已变更，
删除反写为未变更

 

三、开发实现

3.1、售后单添加变更状态

拖动一个单据状态

 修改标识

F_开发商_ChangeStatus

 状态列表

 

 

默认状态值

 

锁定性

 

 新建后

 

3.2、反写规则反写状态：在保存配置了反写状态

 

 

 

 

3.3、保存后删除，反写规则不生效，需要在删除操作配置插件根据关联关系进行反写

using Kingdee.BOS.App.Data;
using Kingdee.BOS.Core.DynamicForm.PlugIn;
using Kingdee.BOS.Core.DynamicForm.PlugIn.Args;
using Kingdee.BOS.Util;
using System;
using System.ComponentModel;
using System.Linq;
using 开发商.K3.Core.Const;

namespace 开发商.K3.SCM.App.Service.PlugIn.AS
{
    /// <summary>
    /// 功能描述    ：售后单变更单-删除  
    /// 创 建 者    ：Administrator
    /// 创建日期    ：2023/11/9 9:48:21 
    /// 最后修改者  ：Krystal
    /// 最后修改日期：2023/11/9 9:48:21 
    /// </summary>
    [Description("售后单变更单-删除"), HotUpdate]

    public class AfterOrderBGDelete : AbstractOperationServicePlugIn
    {
        #region <常量>
        #endregion <常量>

        #region <变量>
        #endregion <变量>

        #region <方法>
        #endregion <方法>

        #region <事件>
        public override void OnPreparePropertys(PreparePropertysEventArgs e)
        {
            base.OnPreparePropertys(e);
            e.FieldKeys.Add("FPKIDX_H");//售后单主键
        }
        public override void EndOperationTransaction(EndOperationTransactionArgs e)
        {
            base.EndOperationTransaction(e);
            if (e.DataEntitys == null || e.DataEntitys.Count() <= 0) return;
            foreach (var dyn in e.DataEntitys)
            {
                long afterId = Convert.ToInt64(dyn["FPKIDX_H"]);
                string billNo = dyn["BillNo"] + "";
                long fid = Convert.ToInt64(dyn["Id"]);//单据FID
                if (afterId>0)
                {
                    string sqlStr = string.Format(@"{0}UPDATE 开发商_T_AS_AfterOrder SET  F_开发商_ChangeStatus='N' WHERE FID={1};",OtherConst.DIALECT,afterId);
                    DBUtils.Execute(this.Context,sqlStr);
                }
            }
        }
        #endregion <事件>
    }
}

 

3.4、生效操作：更新为 已变更

同删除：

sql语句：

UPDATE XHWT_T_AS_AfterOrder SET  F_XHWT_ChangeStatus='B' WHERE FID=111