AX 2012: Standardfinanzdimension eines Datensatzes auslesen und Inhalt prüfen
16.05.2012Microsoft Dynamics AX (Axapta)
|
Dieser Beitrag bezieht sich auf die Version:
Dynamics AX 2012
Dynamics AX 2012
Dies ist ein Beitrag aus der Serie »Dynamics AX 2012 - Finanzdimensionen«
In Dynamics AX 2012 hat sich die Handhabung von Finanzdimensionen stark verändert. Und zwar sowohl auf der Oberfläche als auch das dahinterliegende Datenmodell. Wo früher noch ein Feld - meist mit dem Namen Dimension - vom Typ Array in einer Tabelle zu finden war, so findet man nun stattdessen ein von RecId abgeleitetes Feld namens DefaultDimension (o.ä.).
In dieser Serie möchte ich speziell auf diese Änderungen eingehen und das eine oder andere Stück Code präsentieren.
Alle Beiträge dieser Serie anzeigen
|
|
|
|
|
|
Der folgende Job demonstriert, wie man den Inhalt der Standardfinanzdimensionen eines Datensatzes - im Beispiel jene eines Debitoren - per X++ prüft.
Im Beispiel werden die Dimensionen namens CustomerGroup, Debitor und NonExistingDimension als zu prüfen angegeben. Bitte beachtet, daß nicht alle Dimensionen in jeder AX-Instanz vorhanden sind. Vor allem letztere dient lediglich zur Demonstration, wie sich der Code verhält, wenn eine Dimensionen ausgelesen werden soll, die es gar nicht gibt.
{
CustTable custTable = CustTable::find('9101', true);
container validateCon;
container helpCon;
int ii;
container getDimensionValue(RecId _dimensionAttributeValueSetRecId, container _c)
{
DimensionAttributeValueSetItem dimensionAttributeValueSetItem;
DimensionAttributeValue dimensionAttributeValue;
DimensionAttribute dimensionAttribute;
Common dimensionValueEntity;
int i;
Name dimensionName;
str 255 dimensionValue;
container retCon;
for (i=1;i<=conLen(_c);i++)
{
dimensionName = conPeek(_c, i);
if( !DimensionAttribute::findByName(dimensionName))
error(strFmt("Dimension %1 not found", dimensionName));
while select dimensionAttributeValueSetItem
where dimensionAttributeValueSetItem.DimensionAttributeValueSet == _dimensionAttributeValueSetRecId
{
// Find the dimension 'value' (DimensionAttributeValue) that the set item points to.
dimensionAttributeValue = DimensionAttributeValue::find(dimensionAttributeValueSetItem.DimensionAttributeValue);
// Find the underlying attribute.
dimensionAttribute = DimensionAttribute::find(dimensionAttributeValue.DimensionAttribute);
// Use the helper class to obtain a reference to the underlying entity (can be anything)
dimensionValueEntity = DimensionDefaultingControllerBase::findBackingEntityInstance(
curext(),
dimensionAttribute,
dimensionAttributeValue.EntityInstance);
if(dimensionAttribute.Name == dimensionName)
{
retCon = conIns(retCon, conLen(retCon)+1, [dimensionAttribute.Name, dimensionAttributeValue.getValue()]);
}
}
}
return retCon;
}
;
validateCon = getDimensionValue(custTable.DefaultDimension, ["CustomerGroup", "Debitor", "NonExistingDimension"]);
for (ii=1;ii<=conLen(validateCon);ii++)
{
helpCon = conPeek(validateCon, ii);
if(conPeek(helpCon, 1) == "CustomerGroup" && conPeek(helpCon, 2) != custTable.CustGroup)
{
warning(strFmt("Dimension %1 should be %2.", conPeek(helpCon, 1), conPeek(helpCon, 2)));
}
if(conPeek(helpCon, 1) == "Debitor" && conPeek(helpCon, 2) != custTable.AccountNum)
{
warning(strFmt("Dimension %1 should be %2.", conPeek(helpCon, 1), conPeek(helpCon, 2)));
}
if(conPeek(helpCon, 1) == "NonExistingDimension" && conPeek(helpCon, 2) != custTable.AccountNum)
{
warning(strFmt("Dimension %1 should be %2.", conPeek(helpCon, 1), conPeek(helpCon, 2)));
}
}
}