下推其他出库单携带仓管员和库存组

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

下推其他出库单携带仓管员和库存组

一、【业务需求】

给仓库员设置了默认库存组，其他出库单手工新增时有携带库存组，从出库单申请下推时没有携带，下推需要实现和新增的自动携带效果。

二、【分析实现】

import clr 
clr.AddReference("System")
clr.AddReference("Kingdee.BOS")
clr.AddReference("Kingdee.BOS.Core")
clr.AddReference("Kingdee.K3.SCM.Stock.Business.PlugIn")

from System import *
from System import StringComparison
from Kingdee.BOS.Core.Bill import *
from Kingdee.BOS.Core.DynamicForm import *
from Kingdee.BOS.Core.Metadata import *
from Kingdee.K3.SCM.Stock.Business.PlugIn import *

def AfterCreateModelData(e):
    if this.View.OpenParameter.Status == OperationStatus.ADDNEW:
        if this.View.OpenParameter.CreateFrom == CreateFrom.Push:
            orgId = SCMCommon.GetBaseDataLongValue(this, "FStockOrgId");
            SCMCommon.SetOpertorIdByUserId(this, "FStockerId", OperatorTypeConst.WARER, orgId)
            Common.SetGroupValue(this, "FStockerId", "FStockerGroupId", "WHY")