EsbGetFilterList() gets the list of users who are assigned a filter.
EsbGetFilterList (hCtx, AppName, DbName, FltName, pItems) ByVal hCtx As Long ByVal AppName As String ByVal DbName As String ByVal FltName As String pItems As Integer
hCtx | Essbase VB API context handle. |
AppName | Application name. |
DbName | Database name. |
FltName | Filter name. |
pItems | Address of variable to receive Items of users assigned this filter. |
Declare Function EsbGetFilterList Lib "ESBAPIW" (ByVal hCtx As Long, ByVal AppName As String, ByVal DbName As String, ByVal FilterName As String, Items As Integer) As Long Sub ESB_GetFilterList () Dim Items As Integer Dim AppName As String Dim DbName As String Dim FilterName As String Dim User As String * ESB_USERNAMELEN Dim sts As Long AppName = "Sample" DbName = "Basic" FilterName = "Filter" '**************** ' Get Filter List '**************** sts = EsbGetFilterList (hCtx, AppName, DbName, FilterName, Items) For n = 1 To Items '************************** ' Get next User Name String ' from the list '************************** sts = EsbGetNextItem (hCtx, ESB_FUSERNAME_TYPE, ByVal User) Next End SubEsbGetFilter()