Advertisement
Guest User

Untitled

a guest
May 28th, 2017
95
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.30 KB | None | 0 0
  1. Exportfile for AOT version 1.0 or later
  2. Formatversion: 1
  3.  
  4. ***Element: DBT
  5.  
  6. ; Microsoft Dynamics AX Table : MPRParameters unloaded
  7. ; --------------------------------------------------------------------------------
  8. TABLEVERSION 1
  9.  
  10. TABLE #MPRParameters
  11. PROPERTIES
  12. Name #MPRParameters
  13. ENDPROPERTIES
  14.  
  15. FIELDS
  16. FIELD #TableName
  17. STRING
  18. PROPERTIES
  19. Name #TableName
  20. Table #MPRParameters
  21. ExtendedDataType
  22. ARRAY
  23. #TableName
  24. #
  25. ENDARRAY
  26. StringSize #40
  27. ENDPROPERTIES
  28.  
  29. FIELD #tabelid
  30. INT
  31. PROPERTIES
  32. Name #tabelid
  33. Table #MPRParameters
  34. ExtendedDataType
  35. ARRAY
  36. #tableId
  37. #
  38. ENDARRAY
  39. ENDPROPERTIES
  40.  
  41. ENDFIELDS
  42. GROUPS
  43. ENDGROUPS
  44.  
  45. INDICES
  46. ENDINDICES
  47. REFERENCES
  48. ENDREFERENCES
  49.  
  50. DELETEACTIONS
  51. ENDDELETEACTIONS
  52.  
  53. ENDTABLE
  54.  
  55.  
  56. ***Element: CLS
  57.  
  58. ; Microsoft Dynamics AX Class: MPRParameterTables verwijderd
  59. ; --------------------------------------------------------------------------------
  60. CLSVERSION 1
  61.  
  62. CLASS #MPRParameterTables
  63. PROPERTIES
  64. Name #MPRParameterTables
  65. Extends #
  66. RunOn #Called from
  67. ENDPROPERTIES
  68.  
  69. METHODS
  70. Version: 3
  71. SOURCE #run
  72. #void run()
  73. #{
  74. # UtilElements utilElements;
  75. # Query q = new Query();
  76. # QueryBuildDatasource qbd;
  77. # QueryBuildRange range;
  78. # QueryRun qr;
  79. # ;
  80. # qbd = q.addDataSource(tableNum(UtilElements));
  81. # qbd.addRange(FieldNum(UtilElements, recordType)).value(enum2str(UtilElementType::Table));
  82. # qbd.addRange(FieldNum(UtilElements, Name)).value(queryValue("*parameters"));
  83. #
  84. # qr = new QueryRun(q);
  85. #
  86. # while (qr.next())
  87. # {
  88. # utilElements = qr.get(tableNum(utilElements));
  89. #
  90. # mprParameters.clear();
  91. # mprParameters.TableName = utilElements.name;
  92. # mprParameters.insert();
  93. # }
  94. #
  95. #}
  96. ENDSOURCE
  97. SOURCE #parmMprParameters
  98. #public MPRParameters parmMprParameters(MPRParameters _mprParameters = mprParameters)
  99. #{
  100. # ;
  101. # mprParameters = _mprParameters;
  102. #
  103. # return mprParameters;
  104. #}
  105. #
  106. ENDSOURCE
  107. SOURCE #main
  108. #public static void main(Args args)
  109. #{
  110. # MPRParameterTables x = MPRParameterTables::construct();
  111. # ;
  112. # if ( args && args.dataset() == tableNum(MPRParameters) )
  113. # {
  114. # // pass the data back to the caller
  115. # x.parmMprParameters( args.record() );
  116. # }
  117. #
  118. # // Fill the parameters tabel
  119. # x.run();
  120. #}
  121. #
  122. ENDSOURCE
  123. SOURCE #construct
  124. #public static MPRParameterTables construct()
  125. #{
  126. # return new MPRParameterTables();
  127. #}
  128. #
  129. ENDSOURCE
  130. SOURCE #classDeclaration
  131. #class MPRParameterTables
  132. #{
  133. # MPRParameters mprParameters;
  134. #}
  135. ENDSOURCE
  136. ENDMETHODS
  137. ENDCLASS
  138.  
  139. ***Element: FRM
  140.  
  141. ; Microsoft Dynamics AX Forms unloaded
  142. ; --------------------------------------------------------------------------------
  143. FRMVERSION 5
  144.  
  145. FORM #MPRParameters
  146. PROPERTIES
  147. Name #MPRParameters
  148. ENDPROPERTIES
  149.  
  150. METHODS
  151. Version: 3
  152. SOURCE #classDeclaration
  153. #public class FormRun extends ObjectRun
  154. #{
  155. #}
  156. ENDSOURCE
  157. ENDMETHODS
  158. OBJECTBANK
  159. PROPERTIES
  160. ENDPROPERTIES
  161.  
  162. ENDOBJECTBANK
  163.  
  164. JOINS
  165. ENDJOINS
  166.  
  167. DESIGN
  168. PROPERTIES
  169. SaveSize #Yes
  170. ENDPROPERTIES
  171.  
  172. CONTAINER
  173. CONTROL TAB
  174. PROPERTIES
  175. Name #Tab
  176. Width #Column width
  177. Height #Column height
  178. ENDPROPERTIES
  179.  
  180. CONTAINER
  181. CONTROL TABPAGE
  182. PROPERTIES
  183. Name #TabPage
  184. Width #Column width
  185. Height #Column height
  186. Caption #Overview
  187. ENDPROPERTIES
  188.  
  189. CONTAINER
  190. CONTROL GRID
  191. PROPERTIES
  192. Name #Grid
  193. Width #Column width
  194. Height #Column height
  195. ENDPROPERTIES
  196.  
  197. CONTAINER
  198. ENDCONTAINER
  199.  
  200. ENDCONTROL
  201.  
  202. ENDCONTAINER
  203.  
  204. ENDCONTROL
  205.  
  206. CONTROL TABPAGE
  207. PROPERTIES
  208. Name #TabPage1
  209. Caption #General
  210. ENDPROPERTIES
  211.  
  212. CONTAINER
  213. ENDCONTAINER
  214.  
  215. ENDCONTROL
  216.  
  217. ENDCONTAINER
  218.  
  219. ENDCONTROL
  220.  
  221. CONTROL BUTTONGROUP
  222. PROPERTIES
  223. Name #ButtonGroup
  224. ENDPROPERTIES
  225.  
  226. CONTAINER
  227. ENDCONTAINER
  228.  
  229. ENDCONTROL
  230.  
  231. ENDCONTAINER
  232.  
  233. ENDDESIGN
  234.  
  235. ENDFORM
  236.  
  237.  
  238. ***Element: JOB
  239.  
  240. ; Microsoft Dynamics AX Job: listparameterTables verwijderd
  241. ; --------------------------------------------------------------------------------
  242. JOBVERSION 1
  243.  
  244. SOURCE #listparameterTables
  245. #static void listparameterTables(Args _args)
  246. #{
  247. # UtilElements utilElements;
  248. # ;
  249. # while select utilElements
  250. # where utilElements.recordType == UtilElementType::Table
  251. # && utilElements.name like "*parameters*"
  252. # {
  253. # info(utilElements.name);
  254. # }
  255. #}
  256. ENDSOURCE
  257.  
  258. ***Element: JOB
  259.  
  260. ; Microsoft Dynamics AX Job: exportDataJob verwijderd
  261. ; --------------------------------------------------------------------------------
  262. JOBVERSION 1
  263.  
  264. SOURCE #exportDataJob
  265. #static void exportDataJob(Args _args)
  266. #{
  267. # Dialog dlg;
  268. # DialogField dlfInFile, dlfOutPath;
  269. # AsciiIO asciiIoIn,asciiIoOut;
  270. # container c;
  271. # str tablename,s;
  272. # SysDictField dictField;
  273. # SysDictTable dictTable;
  274. # int fieldcnt, fieldidx;
  275. # FilePath filePath;
  276. # Common common;
  277. # ;
  278. # dlg = new Dialog('exporteren tabellen');
  279. # dlfInFile = dlg.addField(typeid(FileNameOpen),'Tabellen bestand');
  280. # dlfOutPath= dlg.addField(typeid(FilePath),'Opslaan in');
  281. #
  282. # if (!dlg.run())
  283. # return;
  284. # asciiIoIn = new AsciiIo(dlfInFile.value(),'r');
  285. # filePath = dlfOutPath.value();
  286. # if (substr(filepath,strlen(filepath),1) != '\\')
  287. # {
  288. # filepath += '\\';
  289. # }
  290. #
  291. # while(asciiIoIn.status() == IO_Status::Ok)
  292. # {
  293. # c = asciiIoIn.read();
  294. # if (!c)
  295. # continue;
  296. # [tablename] = c;
  297. # if (!tablename2id(tablename))
  298. # {
  299. # warning(strfmt('Tabelnaam %1 onbekend',tablename));
  300. # }
  301. # dictTable = new SysDictTable(tablename2id(tablename));
  302. #
  303. # asciiIoOut = new AsciiIo(filepath+dictTAble.name()+'.csv','w');
  304. # asciiIoOUt.outFieldDelimiter(';');
  305. # asciiIoOut.outRecordDelimiter('\n');
  306. # if (asciiIoOut.status() == IO_Status::Ok)
  307. # {
  308. # fieldcnt = dicttable.fieldCnt();
  309. # c = ['TableId'];
  310. # for(fieldidx=1; fieldidx<=fieldcnt;fieldidx++)
  311. # {
  312. # c = c + [dicttable.fieldName(dicttable.fieldCnt2Id(fieldidx))];
  313. # }
  314. # asciiIoOut.write(c);
  315. # common = dicttable.makeRecord();
  316. # while select common
  317. # {
  318. #//. c = connull();
  319. # for(fieldidx=1; fieldidx<=fieldcnt;fieldidx++)
  320. # {
  321. #/*
  322. # switch (dicttable.fieldObject(dicttable.fieldCnt2Id(fieldidx)).baseType())
  323. # {
  324. # case Types::String:
  325. # case Types::VarString:
  326. # case Types::RString:
  327. # s = common.(dicttable.fieldCnt2Id(fieldidx));
  328. # c = c + [strrem(s,';\n\r')];
  329. # break;
  330. # default:
  331. # c = c + [common.(dicttable.fieldCnt2Id(fieldidx))];
  332. # break;
  333. #
  334. #
  335. # }
  336. #*/ }
  337. # asciiIoOut.write(buf2con(common));
  338. # }
  339. # asciiIoOut = null;
  340. #
  341. # }
  342. # else
  343. # warning(strfmt('Bestand %1 kon niet geopend worden voor schrijven',filepath+dictTAble.name()+'.csv'));
  344. # }
  345. #}
  346. ENDSOURCE
  347.  
  348. ***Element: PRN
  349.  
  350. ; Microsoft Dynamics AX Project : MPRConfiguration unloaded
  351. ; --------------------------------------------------------------------------------
  352. PROJECTVERSION 2
  353.  
  354. PROJECT #MPRConfiguration
  355. SHARED
  356. PROPERTIES
  357. Name #MPRConfiguration
  358. ENDPROPERTIES
  359.  
  360. PROJECTCLASS ProjectNode
  361. GROUP #DataDictionary
  362. PROPERTIES
  363. Name #DataDictionary
  364. ProjectGroupType #DataDictionary
  365. GroupMask #
  366. PreventEditProperties #No
  367. ENDPROPERTIES
  368.  
  369. GROUP #Tables
  370. PROPERTIES
  371. Name #Tables
  372. ProjectGroupType #Tables
  373. GroupMask #
  374. PreventEditProperties #No
  375. ENDPROPERTIES
  376.  
  377. BEGINNODE
  378. FILETYPE 0
  379. UTILTYPE 44
  380. UTILOBJECTID 50004
  381. NODETYPE 204
  382. NAME #MPRParameters
  383. ENDNODE
  384. ENDGROUP
  385.  
  386. GROUP #ExtendedDataTypes
  387. PROPERTIES
  388. Name #ExtendedDataTypes
  389. ProjectGroupType #ExtendedDataTypes
  390. GroupMask #
  391. PreventEditProperties #No
  392. ENDPROPERTIES
  393.  
  394. ENDGROUP
  395.  
  396. GROUP #BaseEnums
  397. PROPERTIES
  398. Name #BaseEnums
  399. ProjectGroupType #BaseEnums
  400. GroupMask #
  401. PreventEditProperties #No
  402. ENDPROPERTIES
  403.  
  404. ENDGROUP
  405.  
  406. GROUP #ConfigurationKeys
  407. PROPERTIES
  408. Name #ConfigurationKeys
  409. ProjectGroupType #ConfigurationKeys
  410. GroupMask #
  411. PreventEditProperties #No
  412. ENDPROPERTIES
  413.  
  414. ENDGROUP
  415.  
  416. GROUP #SecurityKeys
  417. PROPERTIES
  418. Name #SecurityKeys
  419. ProjectGroupType #SecurityKeys
  420. GroupMask #
  421. PreventEditProperties #No
  422. ENDPROPERTIES
  423.  
  424. ENDGROUP
  425.  
  426. ENDGROUP
  427.  
  428. GROUP #Classes
  429. PROPERTIES
  430. Name #Classes
  431. ProjectGroupType #Classes
  432. GroupMask #
  433. PreventEditProperties #No
  434. ENDPROPERTIES
  435.  
  436. BEGINNODE
  437. FILETYPE 0
  438. UTILTYPE 45
  439. UTILOBJECTID 50025
  440. NODETYPE 329
  441. NAME #MPRParameterTables
  442. ENDNODE
  443. ENDGROUP
  444.  
  445. GROUP #Forms
  446. PROPERTIES
  447. Name #Forms
  448. ProjectGroupType #Forms
  449. GroupMask #
  450. PreventEditProperties #No
  451. ENDPROPERTIES
  452.  
  453. BEGINNODE
  454. FILETYPE 0
  455. UTILTYPE 11
  456. UTILOBJECTID 0
  457. NODETYPE 201
  458. NAME #MPRParameters
  459. ENDNODE
  460. ENDGROUP
  461.  
  462. GROUP #Reports
  463. PROPERTIES
  464. Name #Reports
  465. ProjectGroupType #Reports
  466. GroupMask #
  467. PreventEditProperties #No
  468. ENDPROPERTIES
  469.  
  470. ENDGROUP
  471.  
  472. GROUP #Jobs
  473. PROPERTIES
  474. Name #Jobs
  475. ProjectGroupType #Jobs
  476. GroupMask #
  477. PreventEditProperties #No
  478. ENDPROPERTIES
  479.  
  480. BEGINNODE
  481. FILETYPE 0
  482. UTILTYPE 5
  483. UTILOBJECTID 0
  484. NODETYPE 215
  485. NAME #listparameterTables
  486. ENDNODE
  487. BEGINNODE
  488. FILETYPE 0
  489. UTILTYPE 5
  490. UTILOBJECTID 0
  491. NODETYPE 215
  492. NAME #exportDataJob
  493. ENDNODE
  494. ENDGROUP
  495.  
  496. GROUP #Menus
  497. PROPERTIES
  498. Name #Menus
  499. ProjectGroupType #Menus
  500. GroupMask #
  501. PreventEditProperties #No
  502. ENDPROPERTIES
  503.  
  504. ENDGROUP
  505.  
  506. GROUP #MenuItems
  507. PROPERTIES
  508. Name #MenuItems
  509. ProjectGroupType #MenuItems
  510. GroupMask #
  511. PreventEditProperties #No
  512. ENDPROPERTIES
  513.  
  514. GROUP #Display
  515. PROPERTIES
  516. Name #Display
  517. ProjectGroupType #Display
  518. GroupMask #
  519. PreventEditProperties #No
  520. ENDPROPERTIES
  521.  
  522. ENDGROUP
  523.  
  524. GROUP #Output
  525. PROPERTIES
  526. Name #Output
  527. ProjectGroupType #Output
  528. GroupMask #
  529. PreventEditProperties #No
  530. ENDPROPERTIES
  531.  
  532. ENDGROUP
  533.  
  534. GROUP #Action
  535. PROPERTIES
  536. Name #Action
  537. ProjectGroupType #Action
  538. GroupMask #
  539. PreventEditProperties #No
  540. ENDPROPERTIES
  541.  
  542. ENDGROUP
  543.  
  544. ENDGROUP
  545.  
  546. ENDPROJECT
  547.  
  548.  
  549. ***Element: END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement