Use code to create a project and add content

Source: Internet
Author: User
Recently I am working on a wizard and need to operate AOT. Code Create a project, table, form, EDT, etc. I just tried to add a project with code and add content to the project. Alas, I again condemn the axapta document, there is nothing to explain about some system classes!

Static   Void Crateprojectandaddnodes (ARGs _ ARGs)
{
Treenode tnode;
Projectnode pnode;
;
// Obtain the root node of the project.
Tnode = Infolog. projectrootnode ();
// This root node has only two subnodes, private and shared. The first node is private.
Tnode = Tnode. aotfirstchild ();
// Find the node to be inserted in the private project
If ( ! Tnode. aotfindchild ( " Farseertest " ))
{
// New
Tnode. aotadd ( " Farseertest " );
// Search, there is an implicit conversion in this place, which is not allowed in C.
Pnode = Tnode. aotfindchild ( " Farseertest " );
Pnode = Pnode. getrunnode ();
// Add Element
Pnode. addutilnode (utilelementtype: form, tablestr (custtrans ));
Pnode. addutilnode (utilelementtype: Table, tablestr (custtable ));
// Compile
Pnode. aotcompile ( 1 );
Pnode. aotcompile ( 1 );
// Save
Pnode. aotsave ();
}
Else
Throw Error (strfmt ( " The project % 1 has been exist! " , " Farseertest " ));

}

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.