EsbOtlAddDimension

アウトラインに次元を追加し、メンバーの属性を設定します。

構文

            EsbOtlAddDimension
             (
            hOutline, pMemberInfo, hPrevSibling, pszDataMbr, phMember
            )
ByVal 
            hOutline
                 As Long
      
            pMemberInfo
              As ESB_MBRINFO_T
ByVal 
            hPrevSibling
             As Long
ByVal 
            pszDataMbr
               As String
      
            phMember
                 As Long
         
パラメータ説明

hOutline

アウトラインのコンテキスト・ハンドル。

pMemberInfo

メンバーとその属性を定義しているメンバー情報構造体。

HPrevSibling

前の兄弟のハンドル。このフィールドがESB_NULLである場合、次元は、アウトラインの最初の次元になります。それ以外の場合、次元はhPrevSiblingで指定された次元の後に配置されます。

PszDataMbr

アウトラインが再構成されるときにデータ値を受領する、新規次元のメンバーのメンバー名。このフィールドがESB_NULLである場合、次元メンバー自身が使用されます。

phMember

APIから戻された新規メンバーのハンドル。

備考

戻り値

正常終了の場合は0が戻されます。それ以外の場合は、次のいずれかの値が戻されます:

         Declare Function EsbOtlAddDimension Lib "ESBOTLN" 
(ByVal hOutline As Long, pMemberInfo As ESB_MBRINFO_T,
ByVal hPrevSibling As Long, ByVal pszDataMbr As String,
phMember As Long) As Long

Sub ESB_OtlAddDimension()
Dim sts As Long
Dim NewInfo as ESB_OUTLINEINFO_T
Dim hOutline As Long
Dim MbrInfo As ESB_MBRINFO_T
Dim hDimMeasures As Long
NewInfo.usOutlineType = ESB_DBTYPE_NORMAL
NewInfo.fCaseSensitive = ESB_FALSE
NewInfo.fAutoConfigure = ESB_TRUE
sts = EsbOtlNewOutline(hLocalCtx, NewInfo, hOutline)
If sts = 0 Then
   MbrInfo.szMember = "Measures"
    sts = EsbOtlAddDimension(hOutline,
     MbrInfo, ESB_NULL, "Profit", hDimMeasures)
End If
End Sub
      

関連トピック