EsbOtlDeleteAliasCombination

単一の別名テーブルに対するメンバーから別名の組合せを削除します。

構文

            EsbOtlDeleteAliasCombination
             (
            hOutline, hMember, pszAliasTable, pszAlias
            )
ByVal 
            hOutline
                  As Long
ByVal 
            hMember
                   As Long
ByVal 
            pszAliasTable
             As String
ByVal 
            pszAlias
                  As String
         
パラメータ説明

hOutline

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

hMember

別名の組合せを削除するメンバーのハンドル。

pszAliasTable

組合せを削除する別名テーブル。このパラメータが""の場合、デフォルトの別名テーブルが使用されます。

pszAlias

削除する別名。

戻り値

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

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

Sub ESB_OtlDeleteAliasCombination()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberJan 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, 
    "Jan", hMemberJan) 
End If
If sts = 0 And hMemberJan <> 0 Then
   sts = EsbOtlDeleteAliasCombination(hOutline,
    hMemberJan, "Default", "alias combination")
End If
End Sub
      

関連トピック