# EsbOtlDeleteAliasCombination

Description

EsbOtlDeleteAliasCombination() deletes an alias combination from a member for a single alias table.

Syntax

    EsbOtlDeleteAliasCombination (hOutline, hMember, pszAliasTable, pszAlias)

    ByVal hOutline      As Long
    ByVal hMember       As Long
    ByVal pszAliasTable As String
    ByVal pszAlias      As String

Parameters

hOutline | Outline context handle.
hMember | Handle of member to remove the alias combination from.
pszAliasTable | Alias table to remove the combination from. If this parameter is "", the default alias table is used.
pszAlias | Alias to remove.

Return Value

Returns 0 if successful; otherwise one of the following:

OTLAPI_BAD_ALIASTABLE
OTLAPI_ERR_NOALIASCOMBO

Example

    Declare Function EsbOtlDeleteAliasCombination Lib
    "ESBOTLW" (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

See Also

EsbOtlAddAliasCombination()
EsbOtlGetNextAliasCombination()