EsbOtlAssociateAttributeDimension

属性次元を標準次元または基本次元に関連付けます。

構文

            EsbOtlAssociateAttributeDimension
             (
            hOutline
            , 
            BaseDimension
            , 
            AttributeDimension
            )
ByVal 
            hOutline
                       As Long
ByVal 
            BaseDimension
                  As Long
ByVal 
            AttributeDimension
             As Long

パラメータ	説明
hOutline	アウトラインのハンドル
BaseDimension	標準次元または基本次元のハンドル
AttributeDimension	基本次元のハンドル

備考

属性次元は疎である必要があります。
標準または基本次元は疎である必要があります。
属性次元を標準次元または基本次元に関連付ける必要があります。
複数の属性次元を1つの基本次元に関連付けることができます。
1つの属性次元を複数の基本次元に関連付けることはできません。

戻り値

正常終了の場合はSTS = 0が戻されます。それ以外の場合、エラー・コードが戻されます。

アクセス

この関数を使用するのに、特別な権限は必要ありません。

例

         Sub ESB_OtlAssociateAttributeDimension()
        ' NOTE: 'Out' is a sub to print the output within quotes to a listbox or text box
        Dim sts as long
        Dim hOutline as long
Dim BaseMbr As Long
Dim AttrMbr As Long
    
hOutline = ESB_OtlOpenOutline
If hOutline = vbNull Then Out "ESB_OtlOpenOutline() failed: " & sts: Exit Sub
 ' abstract function (using EsbOtlFindMember()) to get member handle, while passing in a prompt string       
BaseMbr = ESB_OtlFindMember("Enter base dimension: ")
If BaseMbr = vbNull Then
Out "ESB_OtlFindMember() failed."
Exit Sub
End If
 
' abstract function (using EsbOtlFindMember()) to get member handle, while passing in a prompt string 
AttrMbr = ESB_OtlFindMember("Enter attribute dimension: ")
If AttrMbr = vbNull Then Out "ESB_OtlFindMember() failed.": Exit Sub
    
sts = EsbOtlAssociateAttributeDimension(ghOutline, BaseMbr, AttrMbr)
' abstract sub to call EsbOtlVerifyOutline(), ESBOTLNriteOutline(), EsbOtlRestructure(),EsbUnlockObject() and
' EsbOtlCloseOutline() as neededà
tuckinoutline
If sts <> 0 Then Out "EsbOtlAssociateAttributeDimension failed: " & sts: Exit Sub
End Sub