EsbGetDimensionInfo() gets dimension information.
EsbGetDimensionInfo (hCtx, Dimension, pItems)
ByVal hCtx As Long
ByVal Dimension As String
pItems As Integer
| hCtx | Essbase API context handle. |
| Dimension | Member name of dimension for which to return information. If NULL, returns information about each dimension. |
| pItems | Number of information structures returned. |
This function requires the caller to have database design privilege for the specified database (ESB_PRIV_DBDESIGN).
Declare Function EsbGetDimensionInfo Lib "ESBAPIW" (ByVal hCtx As Long, ByVal Dimension As String, pItems As Integer) As Long Sub ESB_GetDimensionInfo()
Dim sts As Long
Dim Dimension As String
Dim nDims As Integer
Dim DimInfo As ESB_DIMENSIONINFO_T
Dimension = "Year"
sts = EsbGetDimensionInfo(hCtx, Dimension, nDims)
If Not sts Then
For n = 1 To nDims
'**************************
' Get next Dimension Info
' from the list
'**************************
sts = EsbGetNextItem(hCtx,
ESB_DIMINFO_TYPE, DimInfo)
Next
End If
End Sub
EsbBuildDimension()