dax-lessons: Create Technical Document from AX

[Blog bot]

Источник: http://DAX-Lessons.spaces.live.com/B...FCD1!139.entry
==============


Creating detail technical document in projects is very time consuming. Isn’tit?
Particularly if there are many objects in the project it will take more timein creating it.
The jobs which I am going to explain will reduce time in preparing technicaldocument.
This job will list the table fields properties like table field name,help text(Description),type, Size etc.

static voidsgx_TehnicalDocument_Tables(Args _args)
{
   COM         document;
   COM         wordDocument;
   COM         wordRange;
   COM         app;
   str         tableContent;
   SysDictTable    dictTable;
   SysDictField    dictField;
   Counter         fieldCounter;
   Counter         arrayCounter;
   str typeofTheField(DictField df, Types _types)
   {
       str typeName;
       SysDictType dictType;
       SysDictEnum dictEnum;
       ;
       switch(_types)
       {
            case Types::UserType    :  dictType = new SysDictType(dictField.typeId());
                                        returndictType.name();
            case Types::Container   :  return 'container';
 
            case Types::Date        :  return  'date';
 
            case Types::Enum        :  dictEnum = new SysDictEnum(dictField.enumId());
                                        if(dictEnum)
                                           return dictEnum.name();
            case Types::Integer     :
                                       return  'int';
             case Types::Int64       :
                                       return  'int64';
             case Types::Real        :
                                       return  'real';
             case Types::Record      :
                                       return  'record';
            case Types::VarString   :
            case Types::RString     :
            case Types::String      :  return  'str';
            case Types::BLOB        :  return  'blob';
            case Types::DateTime    : return  'datetime' ;
            case Types::Guid        : return  'guid' ;
            default : return '';
       }
   }
   ;
   app = new com("Word.Application");
   app.visible(true);
   document     = app.Documents();
   wordDocument = document.add();
   wordDocument.activate();
   wordRange   =wordDocument.range(0,0);
   dictTable = new SysDictTable(tablenum(CustTable)); // Mention your table here
<strong><span style="color:rgb(153, 51, 102);font-weight:normal">   for (fieldCounter = 1; fieldCounter