EsbOtlDeleteMemberAlias

指定された別名テーブルの指定されたメンバーに対する、デフォルトのメンバー別名を削除します。

構文

            EsbOtlDeleteMemberAlias
             (
            hOutline, hMember, pszAliasTable
            )
ByVal 
            hOutline
                  As Long
ByVal 
            hMember
                   As Long
ByVal 
            pszAliasTable
             As String

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

戻り値

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

OTLAPI_ERR_NOALIAS

例

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

Sub ESB_OtlDeleteMemberAlias()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberYear 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)
If sts = 0 Then
   sts = EsbOtlFindMember(hOutline, "Year", hMemberYear) 
End If
If sts = 0 And hMemberYear <> 0 Then
   sts = EsbOtlDeleteMemberAlias(hOutline, hMemberYear, "") 
End If
End Sub