Exportfile for AOT version 1.0 or later Formatversion: 1 ***Element: CLS ; Microsoft Dynamics AX Class: KlForCustTesterDataContract unloaded ; -------------------------------------------------------------------------------- CLSVERSION 1 CLASS #KlForCustTesterDataContract PROPERTIES Name #KlForCustTesterDataContract Origin #{2EC657AE-0FF7-4F0D-A356-55372544AEFD} ENDPROPERTIES METHODS SOURCE #classDeclaration #[DataContractAttribute, # SysOperationContractProcessingAttribute(classstr(KlForCustTesterUIBuilder))] #class KlForCustTesterDataContract #{ # Name name; # TransDate transDate; # str packedQuery; # # // added in day 3 # NoYesId allowModifyDate; #} ENDSOURCE SOURCE #getQuery #public Query getQuery() #{ # return new Query(SysOperationHelper::base64Decode(packedQuery)); #} ENDSOURCE SOURCE #parmAllowModifyDate #// added in day 3 #[DataMemberAttribute, # SysOperationLabelAttribute("Enable date control")] #public NoYesId parmAllowModifyDate(NoYesId _allowModifyDate = allowModifyDate) #{ # allowModifyDate = _allowModifyDate; # return allowModifyDate; #} ENDSOURCE SOURCE #parmName #[DataMemberAttribute] #public Name parmName(Name _name = name) #{ # name = _name; # return name; #} # ENDSOURCE SOURCE #parmQuery #[DataMemberAttribute, # AifQueryTypeAttribute('_packedQuery', querystr(KlForCustomers)) #] #public str parmQuery(str _packedQuery = packedQuery) #{ # packedQuery = _packedQuery; # return packedQuery; #} ENDSOURCE SOURCE #parmTransDate #[DataMemberAttribute #,SysOperationLabelAttribute(literalStr("@SYS11284"))] // today's date #public TransDate parmTransDate(TransDate _transDate = transDate) #{ # transDate = _transDate; # # return transDate; #} # ENDSOURCE SOURCE #setQuery #public void setQuery(Query _query) #{ # packedQuery = SysOperationHelper::base64Encode(_query.pack()); #} ENDSOURCE ENDMETHODS ENDCLASS ***Element: CLS ; Microsoft Dynamics AX Class: KlForCustTesterUIBuilder unloaded ; -------------------------------------------------------------------------------- CLSVERSION 1 CLASS #KlForCustTesterUIBuilder PROPERTIES Name #KlForCustTesterUIBuilder Extends #SysOperationAutomaticUIBuilder Origin #{297BF271-D089-4859-AA97-929B7FFDD266} ENDPROPERTIES METHODS SOURCE #allowModifyDateModified #public boolean allowModifyDateModified(FormCheckBoxControl _checkBoxControl) #{ # ; # // set enabled or disbled based on checkbox # dialogFieldTransDate.enabled(any2enum(dialogFieldAllowModifyDate.value())); # // or alternatively # // dialogFieldTransDate.enabled(_checkBoxControl.checked()); # # return true; #} ENDSOURCE SOURCE #classDeclaration #class KlForCustTesterUIBuilder extends SysOperationAutomaticUIBuilder #{ # DialogField dialogFieldAllowModifyDate; # DialogField dialogFieldTransDate; # # KlForCustTesterDataContract klForCustTesterDataContract; #} ENDSOURCE SOURCE #postBuild #public void postBuild() #{ # ; # super(); # # // get datacontract # klForCustTesterDataContract = this.dataContractObject(); # # // get dialog fields # dialogFieldTransDate = this.bindInfo().getDialogField(KlForCustTesterDataContract, methodstr(KlForCustTesterDataContract, parmTransDate)); # dialogFieldAllowModifyDate = this.bindInfo().getDialogField(KlForCustTesterDataContract, methodstr(KlForCustTesterDataContract, parmAllowModifyDate)); # # // register override methods # dialogFieldAllowModifyDate.registerOverrideMethod(methodstr(FormCheckBoxControl, modified), methodstr(KlForCustTesterUIBuilder, allowModifyDateModified), this); # # // enable/disable transdate based on checkbox # dialogFieldTransDate.enabled(any2enum(dialogFieldAllowModifyDate.value())); #} ENDSOURCE ENDMETHODS ENDCLASS ***Element: FRM ; Microsoft Dynamics AX Forms unloaded ; -------------------------------------------------------------------------------- FRMVERSION 12 FORM #CustTable PROPERTIES Name #CustTable FormTemplate #DetailsPage InteractionClass #CustTableInteraction Origin #{F9CA59B0-DFD6-4609-AC9C-5B37B6126EC6} ENDPROPERTIES METHODS ENDMETHODS OBJECTBANK ENDOBJECTBANK PARTREFERENCES ENDPARTREFERENCES DESIGN CONTAINER CONTROL MENUITEMBUTTON PROPERTIES Name #KlForCustTesterServiceController ElementPosition #572662304 HierarchyParent #btngrpCustomerMaintain MenuItemType #Action MenuItemName #KlForCustTesterServiceController ENDPROPERTIES METHODS ENDMETHODS ENDCONTROL ENDCONTAINER ENDDESIGN PERMISSIONS #Permissions PROPERTIES ENDPROPERTIES ENDPERMISSIONS ENDFORM ***Element: FTM ; Microsoft Dynamics AX MENUITEM : KlForCustTesterServiceController unloaded ; -------------------------------------------------------------------------------- VERSION 1 MENUITEM #KlForCustTesterServiceController Type: 3 PROPERTIES Name #KlForCustTesterServiceController Label #Cust Test Service Controller ObjectType #Class Object #KlForCustTesterServiceController Parameters #KlForCustTesterDataService.testCustomer Origin #{38BB7B29-6D0D-4C3B-BFC6-126E1D9BCCC4} ENDPROPERTIES ENDMENUITEM ***Element: CLS ; Microsoft Dynamics AX Class: KlForCustTesterServiceController unloaded ; -------------------------------------------------------------------------------- CLSVERSION 1 CLASS #KlForCustTesterServiceController PROPERTIES Name #KlForCustTesterServiceController Extends #SysOperationServiceController Origin #{416509CB-C41B-4A11-BEDD-79435FD77E2F} ENDPROPERTIES METHODS SOURCE #classDeclaration #class KlForCustTesterServiceController extends SysOperationServiceController #{ #} ENDSOURCE SOURCE #main #public static void main(Args _args) #{ # KlForCustTesterServiceController klForCustTesterServiceController; # ; # # klForCustTesterServiceController = KlForCustTesterServiceController::newFromArgs(_args); # klForCustTesterServiceController.startOperation(); #} ENDSOURCE SOURCE #newFromArgs #public static KlForCustTesterServiceController newFromArgs(Args _args) #{ # KlForCustTesterServiceController klForCustTesterServiceController; # klForCustTesterDataContract klForCustTesterDataContract; # # CustTable custTable; # Query query; # ; # # // create a new instance of the controller # klForCustTesterServiceController = new KlForCustTesterServiceController(); # // initialize from args # // one of the things this will do is read the "parameters" property from the menu item # klForCustTesterServiceController.initializeFromArgs(_args); # # // get datacontract # // the string should be the same as the parameter name! # klForCustTesterDataContract = klForCustTesterServiceController.getDataContractObject('_klForCustTesterDataContract'); # # // default current date # klForCustTesterDataContract.parmTransDate(systemDateGet()); # # // check if the record is of type CustTable # if(_args && _args.dataset() == tableNum(CustTable)) # { # // cast record # custTable = _args.record(); # # // create new query # query = new query(queryStr(KlForCustomers)); # // add range # query.dataSourceTable(tableNum(CustTable)).addRange(fieldNum(CustTable, AccountNum)).value(queryValue(custTable.AccountNum)); # # // set query on datacontract # klForCustTesterDataContract.setQuery(query); # } # # // fix 'lagging' query values # // KlForCustTesterServiceController.queryChanged("_klForCustTesterDataContract.parmQuery", query); # # // return a new instance of this controller # return klForCustTesterServiceController; #} ENDSOURCE ENDMETHODS ENDCLASS ***Element: FTM ; Microsoft Dynamics AX MENUITEM : KlForCustTesterDataService unloaded ; -------------------------------------------------------------------------------- VERSION 1 MENUITEM #KlForCustTesterDataService Type: 3 PROPERTIES Name #KlForCustTesterDataService Label #A nice caption :-) ObjectType #Class Object #SysOperationServiceController Parameters #KlForCustTesterDataService.testCustomer Origin #{2BC447CD-5E63-48B7-B5E9-427B2EA0563F} ENDPROPERTIES ENDMENUITEM ***Element: SVC ; Microsoft Dynamics AX SERVICE : KlForCustTesterDataService unloaded ; -------------------------------------------------------------------------------- VERSION 1 SERVICE #KlForCustTesterDataService PROPERTIES Name #KlForCustTesterDataService Class #KlForCustTesterDataService Origin #{BACEA595-E042-46EB-8720-796115EF88EA} ENDPROPERTIES OPERATIONS OPERATION #testCustomer PROPERTIES Name #testCustomer Method #testCustomer ENDPROPERTIES PERMISSIONSET #Permissions PROPERTIES ENDPROPERTIES TABLES #Tables ENDTABLES SERVERMETHODS #Server Methods ENDSERVERMETHODS ASSOCIATEDCODEPERMISSIONS #Associated Code Permissions ENDASSOCIATEDCODEPERMISSIONS ENDPERMISSIONSET ENDOPERATION ENDOPERATIONS ENDSERVICE ***Element: CLS ; Microsoft Dynamics AX Class: KlForCustTesterDataService unloaded ; -------------------------------------------------------------------------------- CLSVERSION 1 CLASS #KlForCustTesterDataService PROPERTIES Name #KlForCustTesterDataService RunOn #Server Origin #{F5EC6142-5C65-492A-9D99-62884BB9393B} ENDPROPERTIES METHODS SOURCE #classDeclaration #class KlForCustTesterDataService #{ #} ENDSOURCE SOURCE #testCustomer #[SysEntryPointAttribute] #public void testCustomer(KlForCustTesterDataContract _klForCustTesterDataContract) #{ # QueryRun queryRun; # CustTable custTable; # ; # # // info the name parameter # info(_klForCustTesterDataContract.parmName()); # # // create a new queryrun object # queryRun = new queryRun(_klForCustTesterDataContract.getQuery()); # # // loop all results from the query # while(queryRun.next()) # { # custTable = queryRun.get(tableNum(custTable)); # # // display the accountnum # info(custTable.AccountNum); # } #} ENDSOURCE ENDMETHODS ENDCLASS ***Element: CLS ; Microsoft Dynamics AX Class: KlForCustTesterDataContract unloaded ; -------------------------------------------------------------------------------- CLSVERSION 1 CLASS #KlForCustTesterDataContract PROPERTIES Name #KlForCustTesterDataContract Origin #{2EC657AE-0FF7-4F0D-A356-55372544AEFD} ENDPROPERTIES METHODS SOURCE #classDeclaration #[DataContractAttribute, # SysOperationContractProcessingAttribute(classstr(KlForCustTesterUIBuilder))] #class KlForCustTesterDataContract #{ # Name name; # TransDate transDate; # str packedQuery; # # // added in day 3 # NoYesId allowModifyDate; #} ENDSOURCE SOURCE #getQuery #public Query getQuery() #{ # return new Query(SysOperationHelper::base64Decode(packedQuery)); #} ENDSOURCE SOURCE #parmAllowModifyDate #// added in day 3 #[DataMemberAttribute, # SysOperationLabelAttribute("Enable date control")] #public NoYesId parmAllowModifyDate(NoYesId _allowModifyDate = allowModifyDate) #{ # allowModifyDate = _allowModifyDate; # return allowModifyDate; #} ENDSOURCE SOURCE #parmName #[DataMemberAttribute] #public Name parmName(Name _name = name) #{ # name = _name; # return name; #} # ENDSOURCE SOURCE #parmQuery #[DataMemberAttribute, # AifQueryTypeAttribute('_packedQuery', querystr(KlForCustomers)) #] #public str parmQuery(str _packedQuery = packedQuery) #{ # packedQuery = _packedQuery; # return packedQuery; #} ENDSOURCE SOURCE #parmTransDate #[DataMemberAttribute #,SysOperationLabelAttribute(literalStr("@SYS11284"))] // today's date #public TransDate parmTransDate(TransDate _transDate = transDate) #{ # transDate = _transDate; # # return transDate; #} # ENDSOURCE SOURCE #setQuery #public void setQuery(Query _query) #{ # packedQuery = SysOperationHelper::base64Encode(_query.pack()); #} ENDSOURCE ENDMETHODS ENDCLASS ***Element: QUE ; Microsoft Dynamics AX Query: KlForCustomers unloaded ; -------------------------------------------------------------------------------- VERSION 31 QUERY #KlForCustomers PROPERTIES Name #KlForCustomers Version #14 NextUniqueId #1001 Origin #{31F697D8-B784-4941-9B43-C21B44186326} ENDPROPERTIES METHODS SOURCE #classDeclaration #public class QueryRun extends ObjectRun #{ #} ENDSOURCE ENDMETHODS BLOCKS BLOCK #CustTable PROPERTIES Name #CustTable Table #CustTable UniqueId #1000 FetchMode #1:1 ENDPROPERTIES FIELDLIST PROPERTIES ENDPROPERTIES ENDFIELDLIST SORTING ENDSORTING LINES ENDLINES BLOCKS ENDBLOCKS GROUPBY ENDGROUPBY HAVING ENDHAVING ORDERBY ENDORDERBY ENDBLOCK ENDBLOCKS DEPENDENTS ENDDEPENDENTS COMPOSITEQUERIES ENDCOMPOSITEQUERIES ENDQUERY ***Element: PRN ; Microsoft Dynamics AX Project : KlFor_SysOperation_Day3 unloaded ; -------------------------------------------------------------------------------- PROJECTVERSION 2 PROJECT #KlFor_SysOperation_Day3 SHARED PROPERTIES Name #KlFor_SysOperation_Day3 Origin #{458BCB6A-DB55-4F3C-9D69-D580F7B4D35C} ENDPROPERTIES PROJECTCLASS ProjectNode GROUP #Day3 PROPERTIES Name #Day3 ProjectGroupType #All GroupMask # PreventEditProperties #No ENDPROPERTIES BEGINNODE FILETYPE 0 UTILTYPE 45 UTILOBJECTID 1023962 NODETYPE 329 NAME #KlForCustTesterDataContract ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 45 UTILOBJECTID 1023965 NODETYPE 329 NAME #KlForCustTesterUIBuilder ENDNODE ENDGROUP GROUP #Day2 PROPERTIES Name #Day2 ProjectGroupType #All GroupMask # PreventEditProperties #No ENDPROPERTIES BEGINNODE FILETYPE 0 UTILTYPE 11 UTILOBJECTID 0 NODETYPE 201 NAME #CustTable ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 3 UTILOBJECTID 0 NODETYPE 296 NAME #KlForCustTesterServiceController ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 45 UTILOBJECTID 1023964 NODETYPE 329 NAME #KlForCustTesterServiceController ENDNODE ENDGROUP GROUP #Day1 PROPERTIES Name #Day1 ProjectGroupType #All GroupMask # PreventEditProperties #No ENDPROPERTIES BEGINNODE FILETYPE 0 UTILTYPE 3 UTILOBJECTID 0 NODETYPE 296 NAME #KlForCustTesterDataService ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 76 UTILOBJECTID 0 NODETYPE 1321 NAME #KlForCustTesterDataService ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 45 UTILOBJECTID 1023963 NODETYPE 329 NAME #KlForCustTesterDataService ENDNODE BEGINNODE FILETYPE 0 UTILTYPE 45 UTILOBJECTID 1023962 NODETYPE 329 NAME #KlForCustTesterDataContract ENDNODE ENDGROUP GROUP #SupportingObjects PROPERTIES Name #SupportingObjects ProjectGroupType #All GroupMask # PreventEditProperties #No ENDPROPERTIES BEGINNODE FILETYPE 0 UTILTYPE 20 UTILOBJECTID 0 NODETYPE 330 NAME #KlForCustomers ENDNODE ENDGROUP ENDPROJECT ***Element: END