Enumerations (DSO)
Note
This feature will be removed in the next version of Microsoft SQL Server. Do not use this feature in new development work, and modify applications that currently use this feature as soon as possible.
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 |
|---|---|
Enumerates values for the AggregateFunction property |
|
Enumerates values for the ClassType property |
|
Enumerates options for the Clone method |
|
Enumerates values for the CommandType property |
|
Enumerates values for the AggregationUsage property |
|
Enumerates values for the DimensionType property |
|
Enumerates error codes |
|
Enumerates options for level groups |
|
Enumerates options for hidden level members |
|
Enumerates the Language property of member properties |
|
Enumerates values for the LevelType property |
|
Enumerates values for the MembersWithData property |
|
Enumerates values for the Edition property |
|
Enumerates values for the LockObject method |
|
Enumerates values for the State property |
|
Enumerates values for the OlapMode property |
|
Enumerates values for the Ordering property |
|
Enumerates values for the ProcessOptimizationMode property |
|
Enumerates values for the Process method |
|
Enumerates the values used in the PropertyType property |
|
Enumerates values for the RootMemberIf property |
|
Enumerates values for the State property |
|
Enumerates values for the StorageMode property |
|
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