EsbOtlClearAliasTable

Clears all entries from an existing alias table without deleting it.

Syntax

EsbOtlClearAliasTable (hOutline, pszAliasTable)
ByVal   hOutline        As Long
ByVal   pszAliasTable   As String

Parameter	Description
hOutline	Outline context handle.
pszAliasTable	Name of alias table to clear. Use "" or "Default" for the default table.

Notes

When clearing aliases from an alias table, language codes associated with the alias table are removed.

Return Value

Returns 0 if successful; otherwise:

OTLAPI_BAD_ALIASTABLE

Example

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

Sub ESB_OtlClearAliasTable()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline 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 = EsbOtlClearAliasTable(hOutline, "Default")
End If
End Sub