EsbOtlSetMemberAlias

指定した別名テーブルの指定したメンバーに対して、デフォルトのメンバー別名を設定します。

構文

            EsbOtlSetMemberAlias
             (
            hOutline, hMember, pszAliasTable, pszAlias
            )
ByVal 
            hOutline
                  As Long
ByVal 
            hMember
                   As Long
ByVal 
            pszAliasTable
             As String
ByVal 
            pszAlias
                  As String

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
hMember	別名を設定するメンバーのハンドル。
pszAliasTable	別名を設定する別名テーブル。このパラメータが""の場合、デフォルトの別名テーブルが使用されます。
pszAlias	別名。

備考

メンバー・ハンドルは共有メンバーにできません。共有メンバーに別名を使用できません。
別名を削除するには、EsbOtlDeleteMemberAlias()を使用します。

戻り値

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

OTLAPI_BAD_ALIASTABLE
OTLAPI_ERR_ALIASSHARED
OTLAPI_ERR_ILLEGALDEFALIAS
OTLAPI_ERR_ILLEGALCOMBOALIAS
OTLAPI_ERR_ILLEGALALIASSTRING
OTLAPI_ERR_DUPLICATEALIAS

例

         Declare Function EsbOtlSetMemberAlias Lib 
"ESBOTLN" (ByVal hOutline As Long, ByVal hMember As Long,
ByVal pszAliasTable As String, ByVal pszAlias As String) As Long

Sub ESB_OtlSetMemberAlias()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberYear As Long
Dim szAlias 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, 
SB_YES, ESB_YES, hOutline)
If sts = 0 Then
   sts = EsbOtlFindMember(hOutline, "Year",
    hMemberYear) 
End If
If sts = 0 And hMemberYear <> 0 Then
   szAlias = "Year Dimension"
   sts = EsbOtlSetMemberAlias(hOutline, 
    hMemberYear, "", szAlias)
End If
End Sub