EsbOtlGetMemberAlias() gets the default member alias for a specified member in a specified alias table.
EsbOtlGetMemberAlias (hOutline, hMember, pszAliasTable, pszAlias)
ByVal hOutline As Long ByVal hMember As Long ByVal pszAliasTable As String ByVal pszAlias As String
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. |
Returns 0 if successful; otherwise:
OTLAPI_BAD_ALIASTABLE
Declare Function EsbOtlGetMemberAlias Lib "ESBOTLW" (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