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
Parameter | Description |
---|---|
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 "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