# EsbOtlRenameAliasTable

Description

EsbOtlRenameAliasTable() renames an existing alias table.

Syntax

    EsbOtlRenameAliasTable (hOutline, pszAliasTable, pszNewAliasTable)

    ByVal hOutline         As Long
    ByVal pszAliasTable    As String
    ByVal pszNewAliasTable As String

Parameters

hOutline | Outline context handle.
pszAliasTable | Name of alias table to rename.
pszNewAliasTable | Name of new alias table.

Return Value

Returns 0 if successful; otherwise one of the following:

OTLAPI_BAD_ALIASTABLE
OTLAPI_ERR_RENAMEDEFALIAS
OTLAPI_ERR_ALIASTABLENAME
OTLAPI_ERR_ALIASTABLEEXISTS

Notes

- The default alias table cannot be renamed from "Default".

Example

    Declare Function EsbOtlRenameAliasTable Lib
    "ESBOTLW" (ByVal hOutline As Long, ByVal pszAliasTable As String,
    ByVal pszNewAliasTable As String) As Long

    Sub ESB_OtlRenameAliasTable()
    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
       EsbOtlRenameAliasTable(hOutline, "Alias Table 1",
        "1st Alias Table")
    End If
    End Sub

See Also

EsbOtlCreateAliasTable()
EsbOtlCopyAliasTable()
EsbOtlClearAliasTable()
EsbOtlDeleteAliasTable()