D365 使用 X++ 设置采购行的财务维度组合

最新推荐文章于 2024-07-02 15:16:38 发布

飘灬渺

最新推荐文章于 2024-07-02 15:16:38 发布

阅读量233

点赞数 2

分类专栏： D365 文章标签： d365

本文链接：https://blog.csdn.net/qq_43515713/article/details/139527289

版权

D365 专栏收录该内容

17 篇文章 0 订阅

订阅专栏

文章目录

前言
一、代码

前言

使用 X++ 设置采购行的财务维度组合

一、代码

 		PurchLine                           purchLine;
        DimensionAttributeValueSetStorage   dimensionAttributeValueSetStorage;
        DimensionAttributeValue             dimensionAttributeValue;
        DimensionAttribute                  dimensionAttribute;
        container                           financialDimensionName;
        container                           financialDimensionValue;
        int                                 i;

        financialDimensionName  = ['BusinessUnit', 'CostCenter', 'Department', 'ItemGroup', 'Project'];
        financialDimensionValue = ['001', '007', '022', 'AudioRM', '000002'];

        purchLine  =  PurchLine::find('000038', 1);

        dimensionAttributeValueSetStorage = new DimensionAttributeValueSetStorage();

        for (i = 1; i <= conLen(financialDimensionName); i++)
        {
            dimensionAttribute      = DimensionAttribute::findByName(conPeek(financialDimensionName, i));
            dimensionAttributeValue = DimensionAttributeValue::findByDimensionAttributeAndValue(dimensionAttribute, conPeek(financialDimensionValue, i), false, true);
            
            if (dimensionAttributeValue)
            {
                dimensionAttributeValueSetStorage.addItem(dimensionAttributeValue);
            }
        }

        ttsBegin;
        purchLine.selectForUpdate(true);
        purchLine.DefaultDimension = dimensionAttributeValueSetStorage.save();
        purchLine.update();
        ttsCommit;