EsbOtlCreateAliasTable() creates an empty alias table in the outline.
EsbOtlCreateAliasTable (hOutline, pszAliasTable)
ByVal hOutline As Long ByVal pszAliasTable As String
hOutline | Outline context handle. |
pszAliasTable | Name of alias table to create. |
Returns 0 if successful; otherwise one of the following:
OTLAPI_ERR_ALIASTABLEEXISTS
OTLAPI_ERR_MAXALIASTABLES
OTLAPI_ERR_ALIASTABLENAME
Declare Function EsbOtlCreateAliasTable Lib "ESBOTLW" (ByVal hOutline As Long, ByVal pszAliasTable As String) As Long Sub ESB_OtlCreateAliasTable() 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 = EsbOtlCreateAliasTable(hOutline, "Alias Table 1") End If End Sub
EsbOtlCopyAliasTable()
EsbOtlRenameAliasTable()
EsbOtlDeleteAliasTable()