Enumerations

Analysis Services Programming

Analysis Services Programming

Enumerations

The Decision Support Objects (DSO) object model provides a number of enumerations. The following table lists the public enumerated types available through DSO. Click the name of an enumeration for a more detailed description.

Enumeration Description
AggregatesTypes Enumerates values for the AggregateFunction property
ClassTypes Enumerates values for the ClassType property
CloneOptions Enumerates options for the Clone method
CommandTypes Enumerates values for the CommandType property
DimensionAggUsageTypes Enumerates values for the AggregationUsage property
DimensionTypes Enumerates values for the DimensionType property
ErrorCodes Enumerates error codes
GroupingValues Enumerates options for level groups
HideIfValues Enumerates options for hidden level members
LanguageValues Enumerates the Language property of member properties
LevelTypes Enumerates values for the LevelType property
MembersWithDataValues Enumerates values for the MembersWithData property
OlapEditions Enumerates values for the Edition property
OlapLockTypes Enumerates values for the LockObject method
OlapStateTypes Enumerates values for the State property
OlapStorageModes Enumerates values for the OlapMode property
OrderTypes Enumerates values for the Ordering property
ProcessOptimizationModes Enumerates values for the ProcessOptimizationMode property
ProcessTypes Enumerates values for the Process method
PropertyTypeValue Enumerates the values used in the PropertyType property
RootIfValues Enumerates values for the RootMemberIf property
ServerStates Enumerates values for the State property
StorageModeValues Enumerates values for the StorageMode property
SubClassTypes Enumerates values for the SubClassType property
Examples
Using the ClassTypes Enumeration

The following code uses the ClassTypes enumeration to retrieve the class type of an object and determine whether the object is a cube, a virtual cube, or some other object:

' Assume that the object dsoServer of ClassType clsServer exists.
Dim dsoDB as MDStore
Dim dsoCube as MDStore
Dim CubeCounter as Integer

Set dsoDB = dsoServer.MDStores(1)
For CubeCounter = 1 To dsoDB.MDStores.Count
  Set dsoCube = dsoDB.MDStores(CubeCounter)
  Debug.Print "  Cube: " & dsoCube.Name
  If dsoCube.SubClassType = sbclsRegular Then
    Debug.Print "       SubClassType: Regular"
    Debug.Print "        SourceTable: " & dsoCube.SourceTable
  Else
    Debug.Print "       SubClassType: Virtual"
  End If
Next CubeCounter