EsbOtlAddAliasCombination

Adds an alias combination to a member for a single alias table.

Syntax

EsbOtlAddAliasCombination (hOutline, hMember, pszAliasTable, pszAlias, pszCombination)
ByVal hOutline       As Long
ByVal hMember        As Long
ByVal pszAliasTable  As String
ByVal pszAlias       As String
ByVal pszCombination As String

Parameter	Description
hOutline	Outline context handle.
hMember	Handle of member to create an alias combination for.
PszAliasTable	Alias table to add the combination to. If this parameter is "", the default alias table is used.
pszAlias	Alias.
PszCombination	Member combination to associate with the alias. This can be a cross-dimensional member list.

Notes

The member handle cannot be a shared member. Aliases are not allowed for shared members.

Return Value

Returns 0 if successful; otherwise one of the following:

OTLAPI_BAD_ALIASTABLE
OTLAPI_ERR_ALIASSHARED
OTLAPI_ERR_ILLEGALCOMBOALIAS
OTLAPI_ERR_ILLEGALALIASSTRING
OTLAPI_ERR_DUPLICATEALIAS

Example

Declare Function EsbOtlAddAliasCombination Lib
"ESBOTLN" (ByVal hOutline As Long, ByVal hMember
As Long, ByVal pszAliasTable As String, ByVal pszAlias As String, ByVal 
pszCombination As String) As Long

Sub ESB_EsbOtlAddAliasCombination() 
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim MbrInfo As ESB_MBRINFO_T
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 = EsbOtlAddAliasCombination(hOutline,
    hMemberJan, "Default", "alias combination",
    "Year->Market")
End If
End Sub