Kashperuk Ivan: Q&A session: Working with MorphX project nodes from code

[Blog bot]

Источник: http://kashperuk.blogspot.com/2014/0...x-project.html
==============

I had some spare time today, so started answering some of the comments I had through the blog and through e-mail. I decided I'll just open up a new section on my blog, called Questions and Answers, in which I will slowly answer the questions from my backlog:

Question (related to post about the DEV_CreateNewProject tool for AX):

So could create ConfigKeys Macro and I wanted, and could throw them into the project that was created, but I can not throw them within their respective nodes, so they are loose in the project, you can help me put them within your nodes?

To summarize, Gustavo wanted to create some AOT elements from code (specifically, configuration keys and macros), and add them to a new project into respective groups, similar to how it is done in DEV_CreateNewProject tool.

I wrote a small job that does that, and can be downloaded from my OneDrive. The code is also pasted and explained below:

static void Tutorial_CreateProjWithGroupAndElement(Args _args)
{
    ProjectListNode     treeNodeProject;
    ProjectNode         upgradeNode;
    ProjectGroupNode    child;
    MacroBuild          macro;
    #AOT

    str projName = @"Project01";
    str groupName = @"macroGrp";
    str macroName = @"macro01";

    treeNodeProject = SysTreeNode::getPrivateProject();
    treeNodeProject.AOTadd(projName);
    upgradeNode = treeNodeProject.AOTfindChild(projName);
    upgradeNode = upgradeNode.getRunNode();

    upgradeNode.AOTadd(groupName);
    child = upgradeNode.AOTfindChild(groupName);
    child.projectGroupType(GroupNodeType::Macros);

    macro = new MacroBuild(macroName, true);
    macro.addSource(@"isConfigurationkeyEnabled(configurationkeynum(WMSAdvanced))");
    macro.save();

    child.addUtilNode(UtilElementType::Macro, macroName);

    upgradeNode.AOTsave();
}

• SysTreeNode class is used to retrieve the object for the root of the Private projects node. This class contains a number of interesting methods for anyone who wants to navigate and manage AOT nodes
• Standard AOTadd and AOTfindChild methods are used for first creating and then loading the contents of the node into a TreeNode object for processing.
• getRunNode is used on the project node so that it is not just loaded for processing, but also opened in a new window to show the result to us after executing the job
• MacroBuild class is used to creating new Macros, and is similar to a ClassBuild that I described previously
• addUtilNode is the key method Gustavo was missing, and allows to add the macro created to the project group node.
• AOTsave() is used to persist all the changes done to the project as well as the new macro.

You can see the results immediately after executing the job.

Источник: http://kashperuk.blogspot.com/2014/0...x-project.html

[wojzeh]

Иван, помоги понять, в чём моя проблема. Почему AOTFindChild не находит существующий в проекте тип?



Разобрался благодаря твоей статье и ответу Кускова. Спасибо!

http://alexvoy.blogspot.com/2014/10/...p-members.html

[Blog bot]

Источник: http://alexvoy.blogspot.com/2014/10/...p-members.html
==============

Based on S. Kuskov's suggestion and Vania Kashperuk's article, I put down this simple job that iterates Tables and Extended Data Types groups members in a given shared project.

static void tmxIterateProjectGroupMembers(Args _args)
{
    #aot
    #properties
    Str                         projectName = "tmxEDI999";
    ProjectNode                 projectNode;
    ProjectGroupNode            ddProjectGroupNode;
    ProjectGroupNode            edtProjectGroupNode;
    ProjectGroupNode            tblProjectGroupNode;
    ProjectListNode             projectListNode;
    TreeNode                    memberTreeNode;              
    TreeNode                    projectTreeNode;
    TreeNodeIterator            projectIterator;
    
    if(projectName)
    {
        // find all shared projects
        projectListNode = SysTreeNode::getSharedProject();
        // find project with a given name
        projectNode = projectListNode.AOTfindChild(projectName);
        // open it in a separate window in AOT
        projectTreeNode = projectNode.getRunNode();
        // this is the key point after which we can iterate group members
        projectNode = projectNode.loadForInspection();
        // get nested nodes for appropriate names
        ddProjectGroupNode = projectNode.AOTfindChild('DataDictionary');
        edtProjectGroupNode = ddProjectGroupNode.AOTfindChild('Extended Data Types');
        tblProjectGroupNode = ddProjectGroupNode.AOTfindChild('Tables');
        
        // tables
        projectIterator = tblProjectGroupNode.AOTiterator();
        memberTreeNode = projectIterator.next();

        while(memberTreeNode)
        {
            info(strFmt("%1 %2", memberTreeNode.AOTname(), memberTreeNode.treeNodeName()));
            memberTreeNode = projectIterator.next();
        }

        // extended data types
        projectIterator = edtProjectGroupNode.AOTiterator();
        memberTreeNode = projectIterator.next();

        while(memberTreeNode)
        {
            info(strFmt("%1 %2", memberTreeNode.AOTname(), memberTreeNode.treeNodeName()));
            memberTreeNode = projectIterator.next();
        }
    }
}

The key method is loadForInspection. Happy iterating!

Источник: http://alexvoy.blogspot.com/2014/10/...p-members.html

[kashperuk]

Так в чем дело было в итоге?

[wojzeh]

Цитата:

Сообщение от kashperuk

Так в чем дело было в итоге?

дело в том, что группы проекта требуют иного подхода в переборе и нахождении элементов -- тут AOTFindChild() не работает.

во-первых, loadForInspection()
затем AOTIterator() или findGroupMember()

...       
       ProjectNode         edtProjectGroupNode;
       ProjectNode         tblProjectGroupNode;
       ProjectNode         qryProjectGroupNode;

        // find all shared projects
        projectListNode = SysTreeNode::getSharedProject();
        // find project with a given name
        projectNode = projectListNode.AOTfindChild(_projectName);
        // open it in a separate window in AOT
        projectRunNode = projectNode.getRunNode();
        // this is the key point after which we can iterate group members
        projectNode = projectNode.loadForInspection();
        // get nested nodes for appropriate names
        ddProjectGroupNode = projectNode.AOTfindChild('DataDictionary');
        edtProjectGroupNode = ddProjectGroupNode.AOTfindChild('Extended Data Types');
        tblProjectGroupNode = ddProjectGroupNode.AOTfindChild('Tables');
        qryProjectGroupNode = projectNode.AOTfindChild('Queries');
...

// add to the project if not yet
private void addNewObjectToProject(UtilElementType _type, TreeNode _treeNode)
{
    str name = _treeNode.AOTname();

    switch (_type)
    {
    case UtilElementType::ExtendedType:
        if(!edtProjectGroupNode.findGroupMember(name, _type, true))
        {
            edtProjectGroupNode.addNode(_treeNode);
        }
        break;

   case UtilElementType::Table:

        if(!tblProjectGroupNode.findGroupMember(name, _type, true))
        {
            tblProjectGroupNode.addNode(_treeNode);
        }
        break;

   case UtilElementType::Query:
        if(!qryProjectGroupNode.findGroupMember(name, _type, true))
        {
            qryProjectGroupNode.addNode(_treeNode);
        }
        break;

    default:
        throw error(Error::wrongUseOfFunction(funcName()));

    }
}

кстати, ознакомься, пожалуйста i-neti: Решение проблемы с поиском новой цены в Dynamics AX

[kashperuk]

Цитата:

Сообщение от wojzeh

кстати, ознакомься, пожалуйста i-neti: Решение проблемы с поиском новой цены в Dynamics AX

Ознакомился. Баг то я создам, но для того, чтобы оно было выпущено как хотфикс, надо чтоб кто-то из вас зарепортил это через стандартные каналы

[Logger]

Цитата:

Сообщение от kashperuk

Ознакомился. Баг то я создам, но для того, чтобы оно было выпущено как хотфикс, надо чтоб кто-то из вас зарепортил это через стандартные каналы

Вань, а в чем отличие ?
Если например никто не зарепортит, то как будет делать исправление ? Я порядке очереди пока не попадет в какой нить из роллапов. Или его вообще не будут править ?

[kashperuk]

Цитата:

Сообщение от Logger

Вань, а в чем отличие ?
Если например никто не зарепортит, то как будет делать исправление ? Я порядке очереди пока не попадет в какой нить из роллапов. Или его вообще не будут править ?

Отличие в том, что я в команде R&D core, то есть мы работает над новыми релизами.
То есть баг, который я создам, будет в базе багов для текущего/следующего релиза, а не в базе хотфикс багов, которые создают пользователи.
Я пару раз пробовал вручную создавать там баги на основании таких вот сообщений - но там столько геморроя (потому что это нестандартный путь), что я перестал.

[wojzeh]

Цитата:

Сообщение от kashperuk

Отличие в том, что ... там столько геморроя

золотые слова, маэстро! на тебя и уповаем потому

[kashperuk]

Цитата:

Сообщение от wojzeh

золотые слова, маэстро! на тебя и уповаем потому

Ну, кастомерам должно быть довольно просто создать, и все.
А если я создаю, то кучу всего дополнительно делать надо

[wojzeh]

Цитата:

Сообщение от kashperuk

Ну, кастомерам должно быть довольно просто создать, и все.
А если я создаю, то кучу всего дополнительно делать надо

я ж не кустомер - я партнёр!

[kashperuk]

Цитата:

Сообщение от wojzeh

я ж не кустомер - я партнёр!

Для МС ты тоже кастомер