EsbOtlGetMemberAlias

Gets the default member alias for a specified member in a specified alias table.

Syntax

EsbOtlGetMemberAlias (hOutline, hMember, pszAliasTable, pszAlias)
ByVal hOutline      As Long
ByVal hMember       As Long
ByVal pszAliasTable As String
ByVal pszAlias      As String

Parameter	Description
hOutline	Outline context handle.
hMember	Handle of member to get the alias for.
pszAliasTable	Alias table to get the alias from. If this parameter is "", the default alias table is used.
pszAlias	Buffer for the return of the alias. The buffer is allocated by the caller.

Notes

The pszAlias parameter should be a buffer allocated by the caller of at least ESB_MBRNAMELEN bytes.

Return Value

Returns 0 if successful; otherwise:

OTLAPI_BAD_ALIASTABLE

Example

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

Sub ESB_OtlGetMemberAlias()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberProfit As Long
Dim szAlias As String * ESB_MBRNAMELEN
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, 
    "Profit", hMemberProfit) 
End If
If sts = 0 And hMemberProfit <> 0 Then
   sts = EsbOtlGetMemberAlias(hOutline,
    hMemberProfit, "Default", szAlias)
End If
End Sub