EnumMembersInList

Sie verwenden die Subroutine EnumMembersInList, um einer Liste Elemente hinzuzufügen. Für eine statische Elementliste listen Sie alle Elemente der Liste im Skript auf. In der Subroutine "EnumMembersInList ()" werden die in dieser Tabelle angegebenen Syntaxelemente und Funktionen zum Definieren der Elemente der einzelnen Elementlisten verwendet:

Für alle Dimensionen mit Ausnahme von Entity verwenden Sie die Anweisung HS.AddMemberTo List, in der Sie ein Element angeben müssen. Für die Dimension Entity verwenden Sie die Anweisung HS.AddEntityToList, in der Sie ein Element und dessen übergeordnetes Element angeben müssen.

Tabelle 5-1 EnumMembersInList-Syntax

Syntax Beschreibung

HS.Dimension = "Element"

wobei Element die Dimension ist. Beispiel:

If HS.Dimension = "Entity" Then

HS.MemberListID=n

Gibt die Elementliste anhand ihrer numerischen ID an

wobei n = numerische ID, die der Elementliste in der Subroutine EnumMemberLists zugewiesen ist

HS.MemberListID = 1

HS.AddEntityToList Member

HS.AddMemberToList Member

Fügt einer Liste für Dimensionen mit Ausnahme von Entity Elemente hinzu

wobei Member der Elementname ist

HS.AddEntityToList "UnitedStates,""Maine"
HS.AddMemberToList "July"

HS.AddEntityToList Parent, Member

Fügt einer Liste für die Dimension Entity Elemente hinzu

wobei Parent das übergeordnete Element des Elements darstellt, das Sie hinzufügen, und Member ein Element der Dimension Entity.

HS.AddEntityToList "UnitedStates", "California"

HS.Entity.List

Fügt einer Liste für die Dimension Entity Elemente hinzu

HS.Entity.List("""[Base])"

HS.MemberListEntity HS.MemberListScenario HS.MemberListYear HS.MemberListPeriod

Wird zum Angeben einer dynamischen Elementliste verwendet.

In diesem Abschnitt ist ein Beispiel für den Abschnitt EnumMembersInList der Datei dargestellt. In diesem Beispiel werden die Entitys für drei Entity-Listen definiert. Die Elemente der Liste "Account" werden ebenfalls definiert.

Sub EnumMembersInList()
If HS.Dimension = "Entity" Then
   If HS.MemberListID = 1 Then
      HS.AddEntityToList "United States", "Massachusetts"
      HS.AddEntityToList "United States", "Rhode Island"
      HS.AddEntityToList "United States", "Maine"
   ElseIf HS.MemberListID = 2 Then
      HS.AddEntityToList ,"United States" "Connecticut"
   ElseIf HS.MemberListID = 3 Then
      HS.AddEntityToList "United States", "California"
   End If
ElseIf HS.Dimension = "Account" Then
   If HS.MemberListID = 1 Then
      HS.AddMemberToList "Sales"
      HS.AddMemberToList "Purchases"
      HS.AddMemberToList "Salaries"
      HS.AddMemberToList "OtherCosts"
      HS.AddMemberToList "TotalCosts"
      HS.AddMemberToList "GrossMargin"
      HS.AddMemberToList "HeadCount"
      HS.AddMemberToList "AdminExpenses"
      HS.AddMemberToList "InterestCharges"
      HS.AddMemberToList "NetIncome"
      HS.AddMemberToList "Taxes"
      HS.AddMemberToList "NetProfit"
   End If
End If
End Sub

Hinweis:

Jede Dimension kann beliebig viele Elementlisten aufweisen, und Sie müssen nicht für alle Dimensionen eine Elementliste erstellen.