EsbOtlGetLevelName

次元内の特定のレベルの名前を取得します。レベル名はEsbOtlSetLevelNameでアウトラインに明示的に追加されます。

構文

            EsbOtlGetLevelName
             (
            hOutline, pszDimension, usLevel, pszName
            )
ByVal 
            hOutline
                 As Long
ByVal 
            pszDimension
             As String
ByVal 
            usLevel
                  As Integer
ByVal 
            pszName
                  As String

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
pszDimension	対象の世代を含む次元の名前。
usLevel	名前を取得するレベル番号の番号。リーフ・メンバーはレベル0です。
pszName	呼出し元によって割り当てられた、指定された次元のレベルの戻しのためのバッファ。バッファは有効なメンバー名(ESB_MBRNAMELEN)を保存するのに十分な大きさである必要があります。

備考

世代名はメンバー名と同じルールに従い、メンバー名全体で一意性が必要です。他の世代、レベル、メンバー名、または別名と重複できません。重複した名前を追加しようとすると、エラーが発生します。
レベル名は自動的には割り当てられません。この関数で名前を戻すには、名前を割り当てておく必要があります。名前はEsbOtlSetLevelNameで割り当てられます。

戻り値

関数が正常終了した場合、戻り値は0になります。それ以外の場合のコマンドの戻り値は次のとおりです:

OTLAPI_NO_GENLEVELNAME
OTLAPI_ERR_NOTADIM

例

         Declare Function EsbOtlGetLevelName Lib 
"ESBOTLN" (ByVal hOutline As Long, ByVal pszDimension
As String, ByVal usLevel As Integer, ByVal pszName
As String) As Long 

Sub ESB_OtlGetLevelName()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim Dimension As String
Dim LevelNum As Integer
Dim LevelName As String * ESB_MBRNAMELEN
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)
'*****************************************
'********** Get Level Name ***************
'*****************************************
Dimension = "Year"
LevelNum = 2
If Not sts Then
   sts = EsbOtlGetLevelName(hOutline,
    Dimension, LevelNum, LevelName)
End If
End Sub