La subrutina EnumMembersInList se utiliza para agregar miembros a una lista. En las listas de miembros estáticas se muestran todos los miembros de la lista en el script. En la subrutina EnumMembersInList () se utilizan la sintaxis y las funciones de la siguiente tabla para definir los miembros de cada lista:
Utilice la sentencia HS.AddMemberToList, en la que se debe especificar un miembro, en todas las dimensiones excepto en Entity. Para la dimensión Entity se utiliza la sentencia HS.AddEntityToList, en la que se debe especificar un miembro y su padre.
Tabla 5-1 Sintaxis de EnumMembersInList
Sintaxis | Descripción |
---|---|
HS.Dimension = "Element" |
donde Element es la dimensión. Por ejemplo: If HS.Dimension = "Entity" Then |
HS.MemberListID=n |
Especifica la lista de miembros por su ID numérico donde n es el ID numérico asignado a la lista de miembros en la subrutina EnumMemberLists HS.MemberListID = 1 |
HS.AddEntityToList Miembro HS.AddMemberToList Miembro |
Agrega miembros a una lista en dimensiones distintas a Entity donde Miembro es el nombre del miembro. HS.AddEntityToList "UnitedStates,""Maine" HS.AddMemberToList "July" |
HS.AddEntityToList Padre, miembro |
Agrega miembros a una lista para la dimensión Entity donde Padre es el padre del miembro que está agregando, y Miembro es un miembro de la dimensión Entidad. HS.AddEntityToList "UnitedStates", "California" |
HS.Entity.List |
Agrega miembros a una lista para la dimensión Entity HS.Entity.List("""[Base])" |
HS.MemberListEntity HS.MemberListScenario HS.MemberListYear HS.MemberListPeriod |
Se utiliza para especificar una lista de miembros dinámica. |
En esta sección se muestra un ejemplo de la sección EnumMembersInList del archivo. En este ejemplo, se definen las entidades para tres listas de entidades. También se definen los miembros de la lista Account.
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
Nota:
Se pueden incluir tantas listas de miembros para cada dimensión como sea necesario y no es preciso crearlas para todas las dimensiones.