Deletes the name for a specific level within a dimension. Level names are explicitly added to the outline with EsbOtlSetLevelName.
Syntax
EsbOtlDeleteLevelName (hOutline, pszDimension, usLevel) ByVal hOutline As Long ByVal pszDimension As String ByVal usLevel As Integer
Parameter | Description |
---|---|
hOutline | Outline context handle. |
pszDimension | Name of dimension that contains the level name. |
usLevel | Number of level for which to delete name. Leaf members are level 0. |
Return Value
Returns 0 if successful; otherwise one of the following:
OTLAPI_NO_GENLEVELNAME
OTLAPI_ERR_NOTADIM
Example
Declare Function EsbOtlDeleteLevelName Lib "ESBOTLN" (ByVal hOutline As Long, ByVal pszDimension As String, ByVal usLevel As Integer) As Long Sub ESB_OtlDeleteLevelName() Dim sts As Long Dim Dimension As String Dim LevelNum As Integer Dim Object As ESB_OBJDEF_T Dim hOutline As Long Object.hCtx = hCtx Object.Type = ESB_OBJTYPE_OUTLINE Object.AppName = "Sample" Object.DbName = "Basic" Object.FileName = "Basic" sts = EsbOtlOpenOutline(hCtx, Object, ESB_YES, ESB_YES, hOutline) '************************************ '******* Delete Level Name ********** '************************************ Dimension = "Year" LevelNum = 1 LevelName = "Month" If sts = 0 Then sts = EsbOtlDeleteLevelName(hOutline, Dimension, LevelNum) End If End Sub
See Also