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
ParameterDescription

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:

Example

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

See Also