Exportfile for AOT version 1.0 or later
Formatversion: 1

***Element: CLS

; Microsoft Business Solutions-Axapta Class: SysSetupFormRun, выгружен Четверг 19.04.2007
; --------------------------------------------------------------------------------
  CLSVERSION 1
  
  CLASS #SysSetupFormRun
    PROPERTIES
      Name                #SysSetupFormRun
      Extends             #FormRun
      RunOn               #Client
    ENDPROPERTIES
    
    METHODS
      Version: 3
      SOURCE #task
        #public int task(int _p1)
        #{
        #    #task
        #    FormDataSource formDataSource;
        #
        #    // DEV_FormControlInfo Extended information about a selected form control 19.04.2007 IKASH -->
        #    #define.taskCtrlQ(264)
        #    SysDictField        dictField;
        #    FormControl         formControl;
        #    FormStringControl   formStringControl;
        #    FormButtonControl   formButtonControl;
        #    SysDictEnum         dictEnum = new SysDictEnum(enumNum(Types));
        #    SysDictEnum         dictEnums;
        #    // DEV_FormControlInfo Extended information about a selected form control 19.04.2007 IKASH <--
        #
        #    int ret;
        #    ;
        #
        #    // DEV_FormControlInfo Extended information about a selected form control 19.04.2007 IKASH -->
        #    if (_p1 == #taskCtrlQ)
        #    {
        #        formControl = this.selectedControl();
        #        formDataSource =  this.objectSet();
        #
        #        if(formControl && formDataSource)
        #        {
        #            switch(SysFormRun::controlType(classIdGet(formControl)))
        #            {
        #                case FormControlType::CheckBox :
        #                case FormControlType::ComboBox :
        #                case FormControlType::Date :
        #                case FormControlType::Grid :
        #                case FormControlType::Group :
        #                case FormControlType::Integer :
        #                case FormControlType::RadioButton :
        #                case FormControlType::Real :
        #                case FormControlType::StaticText :
        #                case FormControlType::String :
        #                case FormControlType::Time :
        #
        #                    formStringControl = formControl;
        #                    if(formStringControl.dataField() && formDataSource.table())
        #                    {
        #                        info(strfmt("Control Name   -> %1", formStringControl.name()));
        #                        info(strfmt('Table.Field       -> %2.%1', fieldId2Name(formDataSource.table(), fieldExt2Id(formStringControl.dataField())), tableId2Name(formDataSource.table())));
        #
        #                        dictField = new SysDictField(formDataSource.table(), fieldExt2Id(formStringControl.dataField()));
        #                        if(dictField)
        #                        {
        #                            info(strfmt('Type                -> %1', dictEnum.index2Symbol(dictField.baseType())));
        #
        #                            if(dictField.baseType() == typeOf(Types::Enum))
        #                            {
        #                                dictEnums = new SysDictEnum(dictField.enumId());
        #                                info(strfmt('Base Enum       -> %1', dictEnums.name()));
        #                            }
        #
        #                            info(strfmt('Ext Data Type -> %1', extendedTypeId2name(dictField.typeId())));
        #                            info(strfmt('Size                  ->  %1', int2str(dictField.stringLen())));
        #                            info(strfmt('Max Right        -> %1', dictField.rights()));
        #                            info(strfmt('Label                -> %1:  %2', dictField.labelLabel(), dictField.label()));
        #                            info(strfmt('Help                 -> %1:  %2', dictField.helpLabelId(),dictField.help()));
        #                        }
        #                    }
        #
        #                    if(formStringControl.dataMethod())
        #                    {
        #                        info(strfmt('Method %1.%2', tableId2Name(formDataSource.table()), formStringControl.dataMethod()));
        #                    }
        #                    break;
        #
        #                default:
        #                    ret = super(_p1);
        #                    return ret;
        #            }
        #
        #            return 1;
        #        }
        #        ret = super(_p1);
        #        return ret;
        #    }
        #    // DEV_FormControlInfo Extended information about a selected form control 19.04.2007 IKASH <--
        #    else if (_p1 == #taskFilter)
        #    {
        #        formDataSource = this.objectSet();
        #        if (formDataSource &&
        #            formDataSource.queryRun() &&
        #            formDataSource.queryRun().args() &&
        #            !formDataSource.queryRun().args().caller())
        #        {
        #            formDataSource.queryRun().args().caller(this);
        #        }
        #    }
        #
        #    ret = super(_p1);
        #
        #    return ret;
        #}
      ENDSOURCE
    ENDMETHODS
  ENDCLASS

***Element: PRN

; Microsoft Business Solutions-Axapta Project : DEV_FormControlInfo unloaded at Четверг 19.04.2007
; --------------------------------------------------------------------------------
  PROJECTVERSION 2
  
  PROJECT #DEV_FormControlInfo
   PRIVATE
  PROPERTIES
    Name                #DEV_FormControlInfo
  ENDPROPERTIES
  
    GROUP #Classes
      PROPERTIES
        Name                #Classes
        ProjectGroupType    #Classes
        GroupMask           #
        PreventEditProperties #No
      ENDPROPERTIES
      
      BEGINNODE
        FILETYPE 0
        UTILTYPE 45
        UTILOBJECTID 643
        NODETYPE 329
        NAME #SysSetupFormRun
      ENDNODE
      ENDGROUP
      
  ENDPROJECT
  

***Element: END