EsbOtlCopyAliasTable() copies an alias table to another alias table.
EsbOtlCopyAliasTable (hOutline, pszSourceAliasTable, pszDestAliasTable, fMerge)
ByVal hOutline As Long ByVal pszSourceAliasTable As String ByVal pszDestAliasTable As String ByVal fMerge As Integer
hOutline | Outline context handle. |
pszSourceAliasTable | Name of alias table to copy from. If this parameter is "", the default alias table is used. |
pszDestAliasTable | Name of alias table to copy to. |
fMerge | Set to ESB_YES to merge the source file into the existing destination alias table. Set to ESB_NO to clear the destination alias table before copying. |
Returns 0 if successful; otherwise one of the following:
OTLAPI_BAD_ALIASTABLE
OTLAPI_ERR_MAXALIASTABLES
OTLAPI_ERR_ALIASTABLENAME
Declare Function EsbOtlCopyAliasTable Lib "ESBOTLW" (ByVal hOutline As Long, ByVal pszSourceAliasTable As String, ByVal pszDestAliasTable As String, ByVal fMerge As Integer) As Long Sub ESB_OtlCopyAliasTable() 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 = EsbOtlCopyAliasTable (hOutline, "", "Alias Table 2", ESB_YES) End If End Sub
EsbOtlCreateAliasTable()
EsbOtlClearAliasTable()
EsbOtlRenameAliasTable()
EsbOtlDeleteAliasTable()