Example

What follows is an example of the EnumMembersInList section of the file. In this example, the entities for three entity lists are defined. The members of the Account list are also defined.

Sub EnumMembersInList()
If HS.Dimension = “Entity” Then
   If HS.MemberListID = 1 Then
      HS.AddEntityToList “UnitedStates”, “Connecticut”
      HS.AddEntityToList ”UnitedStates”, ”Massachusetts”
      HS.AddEntityToList ”UnitedStates”, ”RhodeIsland”
      HS.AddEntityToList ”UnitedStates”, ”Maine”
   ElseIf HS.MemberListID = 2 Then
      HS.AddEntityToList ”UnitedStates”, ”Connecticut”
   ElseIf HS.MemberListID = 3 Then
      HS.AddEntityToList ”UnitedStates”, ”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

Note:

You can have as many member lists for each dimension as you need, and you do not need to create member lists for all dimensions.