static void createFieldFromCode(Args _args)

{

    #AOT

    TreeNode            tableNode;

    AotTableFieldList  myAOTTablefieldList;

    SysDictTable  sysDictTable = new SysDictTable(tablenum(moDocuref));

    ;

   if (! hasSecuritykeyAccess(securitykeynum(SysDevelopment),

AccessType::View))

{

return;

}

    myAOTTablefieldList = new AotTableFieldList();

    tableNode = TreeNode::findNode(#TablesPath+'\\'+sysDictTable.name());

    myAOTTablefieldList =

TreeNode::findNode(#TablesPath+'\\'+sysDictTable.name() + "\\Fields");

    if(!myAOTTablefieldList.AOTfindChild("newField")) // check if the field

alredy exists

    {

        myAOTTablefieldList.addString("newField");

    }

tableNode.AOTsave(); 

}

www.Dynamic-ax.co.uk