Dynamics AX Blog - Microsoft Dynamics AX (Axapta) - Seite 21

In den letzten Jahren, in denen ich mich fast hauptsächlich mit der Entwicklung im Umfeld von Microsoft Dynamics AX (vormals Axapta) beschäftigt habe, ist das eine oder andere Code-Fragment entstanden, von dem ich mir vorstellen könnte, daß es auch für andere AX-Entwickler ganz nützlich sein könnte. Aber auch Tips und Tricks zu dem mächtigen ERP-System werde ich in dieser Kategorie präsentieren.
RSS-Feed dieser KategorieAX 2012: LedgerDimension generieren III
11.05.2014Microsoft Dynamics AX (Axapta)
Im folgenden ein kurzes Code-Snippet, welches zeigt wie man beispielsweise die Standard-Finanzdimensionen eines Debitoren mit einem Haupt-/Sachkonto zu einer RecId verbindet, welche beispielsweise als LedgerDimension in einer Sachkontenjournal-Zeile (Allgemeine Erfassung; LedgerJournalTrans.LedgerDimension) verwendet werden kann. static void mergeDimensions_I(Args _args) { LedgerDimensionAccount ledgerDimensionAccount; CustTable custTable; custTable = CustTable::find('2000'); // Merge main account and source dimension values and return RecId which can be used as ledgerDimension ledgerDimensionAccount = DimensionDefaultingService::serviceCreateLedgerDimension(DimensionStorage::getDefaultAccountForMainAccountNum("4100"), custTable.DefaultDimension); info(strFmt("DefaultDimension (Source RecId): %1 LedgerDimension (Merged RecId): %2", custTable.DefaultDimension, ledgerDimensionAccount)); } |
AX 2012: Feststellen ob ein Formular eine Listpage istMit dem folgenden Stück Code kann man feststellen, ob es sich bei einer Form um eine Listpage handelt. static void isFormListPage(Args _args)
{ TreeNode treeNode; str formTemplateProperty; #Properties; treeNode = TreeNode::findNode(@"\\Forms\\CustTableListPage"); formTemplateProperty = global::findProperty(treeNode.AOTgetProperties(), #PropertyFormTemplate); if(formTemplateProperty == #PropertyValueListPage) { warning("Form is ListPage"); } } Wenn jemand eine bessere/elegantere Lösung kennt, so würde ich mich freuen, wenn er/sie über die Kommentarfunktion beisteuert. |
AX 2012: Fehler beim Import des Modelstores nach Update auf CU7
27.04.2014Microsoft Dynamics AX (Axapta)
Vor kurzem hatte ich beim Import eines Modelstores über AXUTIL (in Zuge eines Updates einer Applikation auf CU7) folgende Fehlermeldung:
In meinem Fall hat der folgende Befehl geholfen, welcher den Modelstore initalisiert: AXUTIL
Dynamics AX Management Shell
|
Wie kann man die Ausführungsdauer einer Funktion messen?Mit Hilfe der Funktion timeConsumed kann man auf sehr einfache Art & Weise die Ausführungsdauer einer Funktion testen: static void stopWatch(Args _args)
{ FromTime fromTime = timeNow(); Counter c; // Simulating time consuming function for (c=1;c<=100;c++) { sleep(1000); } info(strFmt("Total time consumed: %1", timeConsumed(fromTime, timeNow()))); } Ergebnis im Infolog: |
Funktion als anderer Benutzer ausführen
18.04.2014Microsoft Dynamics AX (Axapta)
Über die unten dargestellte Klasse möchte ich demonstrieren, wie man in Dynamics AX 2012 eine Funktion mit den Credentials eines anderen Benutzers ausführt. Die Klasse führt die Funktion - im Beispiel handelt es sich um die Kreditlimitprüfung des Debitoren 100001 - im ersten Schritt mit dem eigenen Benutzer und im zweiten Schritt mit den Credentials des Benutzers User1 aus. Aufgerufen wird die Klasse entweder über das Kontext-Menü im AOT bzw. über DEV_RunAsDemo::main(new args()). class DEV_RunAsDemo
{ }
// Changes within this method may require (incremental) CIL compile
public static server void checkCreditLimit(container _con) // incoming _con is only needed for runAs-Pattern { Args args = new Args(); args.record(CustTable::find("100001")); CustCreditLimit::main(args); }
// Changes within this method requires (incremental) CIL compile
private static void checkCreditLimitAsUser(container _con) // _con should only contain userid { RunAsPermission perm; UserId runAsUser; runAsUser = curUserId(); if(_con && conLen(_con) == 1) { runAsUser = conPeek(_con, 1); } perm = new RunAsPermission(runAsUser); perm.assert(); runAs(runAsUser, classnum(DEV_RunAsDemo), "checkCreditLimit", [runAsUser]); CodeAccessPermission::revertAssert(); }
public static server void main(Args args)
{ setPrefix("Credit limit check"); DEV_RunAsDemo::checkCreditLimit(conNull()); // Container only needed for runAs-Pattern DEV_RunAsDemo::checkCreditLimitAsUser(["User1"]); } Die obenstehende Klasse ist basierend auf dem folgenden MSDN-Beitrag entstanden: http://msdn.microsoft.com/en-us/library/aa893873.aspx |
Objekte per Code zu einem Projekt hinzufügenNachstehend ein kurzer Job, mit dessen Hilfe man AOT-Elemente zu einem bestehenden Shared Project hinzufügen kann. static void AddNodeToSharedProject(Args _args)
{ projectNode projectNode; TreeNode treeNode; #AOT #AOTExport projectNode = infolog.projectRootNode(); projectNode = projectNode.AOTfindChild(#expProjectShared); projectNode = projectNode.AOTfindChild('MyProject'); // Add objects treenode = TreeNode::findNode(#TablesPath+'\\'+tableid2name(tablenum(CustGroup))); projectNode.addNode(treenode); treenode = TreeNode::findNode(#TablesPath+'\\'+tableid2name(tablenum(VendGroup))); projectNode.addNode(treenode); treenode = TreeNode::findNode(#ClassesPath+'\\'+classStr(PriceDisc)); projectNode.addNode(treenode); } Das geänderte Projekt sieht beispielsweise wie folgt aus: |
|
|
|
|
|
|
Im Beispiel wird ein beliebiger Datensatz aus der LedgerJournalTrans selektiert und dessen Finanzdimensionen bzw. das Gegenkonto so ausgegeben, wie der Benutzer es im sog. Segmented Entry Control sieht.
Ergebnis beispielsweise:
5170-10-00AB03---1500-