Hi Suna

This is the code:



static void Job19(Args _args)


{

   UtilIdElements uie;

   XInfo XInfo = new XInfo();

   TreeNode TNode;

   TreeNode DNode;



   str      Props =

       "PROPERTIES\n" +

       "  Name                #AXUStr35\n" +

       "  Label               #\n" +

       "  HelpText            #\n" +

       "  FormHelp            #\n" +

       "  ArrayLength         #1\n" +

       "  DisplayLength       #Auto\n" +

       "  ConfigurationKey    #\n" +

       "  ButtonImage         #Arrow\n" +

       "  Extends             #\n" +

       "  DisplayHeight       #Auto\n" +

       "  StringSize          #35\n" +

       "  Adjustment          #Left\n" +

       "  Alignment           #Auto\n" +

       "  ChangeCase          #Auto\n" +

       "ENDPROPERTIES\n";



   select maxof(id) from uie where uie.recordType == UtilElementType::ExtendedType && uie.utilLevel  == XInfo.currentAOLayer();



   uie.id++;

   uie.utilLevel  = XInfo.currentAOLayer( );

   uie.recordType = UtilElementType::ExtendedType;

   uie.name       = "AXUStr35";



   uie.insert();

   DNode = TreeNode::findNode("Data Dictionary\\Extended Data Types");

   DNode.AOTrefresh();



   TNode = TreeNode::findNode("Data Dictionary\\Extended Data Types\\AXUStr35");

   TNode.sysUtilDelete();



   TNode.AOTsetProperties(Props);

   TNode.AOTsave();



   pause;

}




Best regards,
        Diego M. Gagliano

Please feel free to contact me if you have any question.
I look forward to hear about you.







           
---------------------------------
Yahoo! for Good
Click here to donate to the Hurricane Katrina relief effort.

[Non-text portions of this message have been removed]





SPONSORED LINKS
Computer part Programming languages Microsoft axapta
Support exchange


YAHOO! GROUPS LINKS




Reply via email to