Returns all attribute members having the specified short name.
Syntax
EsbOtlFindAttributeMembers (hOutline, MemberName, DimensionName, Count, MemberArray) ByVal hOutline As Long ByVal MemberName As String ByVal DimensionName As String Count As Integer MemberArray As Variant
| Parameter | Description |
|---|---|
hOutline | Handle to the outline |
MemberName | Attribute short name |
DimenisonName | Attribute dimension name (optional) |
Count | Number of members returned |
MemberArray | Array of base member handles |
Notes
MemberName must be a short name.
DimensionName is optional. You may enter NULL.
Return Value
Returns STS = 0 when successful. Otherwise, returns an error code.
Access
This function requires no special privileges.
Example
Sub ESB_OtlFindAttributeMembers()
Dim MemberName As String
Dim DimensionName As String
Dim hMember() As Long
Dim Count As Integer
Dim MbrArr As Variant
Dim MbrInfo As ESB_MBRINFO_T
Dim index As Integer
ghOutline = ESB_OtlOpenOutline
If ghOutline = vbNull Then Out "ESB_OtlOpenOutline() failed: " & sts: Exit Sub
' expecting return of handle to "caffeinated_true"
MemberName = "true"
' "null" by default - dimension name is optional
DimensionName = ""
sts = EsbOtlFindAttributeMembers(ghOutline, MemberName, DimensionName, Count, MbrArr)
' sts = EsbOtlFindAttributeMembers(ghOutline, MemberName, Count, MbrArr)
If sts = 0 Then
Out "EsbOtlFindAttributeMembers passed " & sts
Out "Count is : " & Count
For index = 0 To Count - 1
sts = EsbOtlGetMemberInfo(ghOutline, MbrArr(index), MbrInfo)
Out "Member Name : " & MbrInfo.szMember
Next index
Else
Out "EsbOtlFindAttributeMembers failed " & sts
Exit Sub
End If
End SubSee Also