EsbGetApplicationInfoEx() retrieves information from multiple databases, including non user-configurable parameters for the Application.
EsbGetApplicationInfoEx (hCtx, AppName, pItems)
ByVal hCtx As Long
ByVal AppName As String
pItems As Integer
| hCtx | Essbase VB API context handle (logged in). |
| AppName | Application name. |
| pItems | Address of variable to receive Items of returned databases. |
Declare Function EsbGetApplicationInfoEx Lib "ESBAPIW" (ByVal hCtx As Long, ByVal AppName As String, pItems As Integer) As LongSub ESB_GetApplicationInfoEx()
Dim sts As Long
Dim AppName As String
Dim Items As Integer
Dim AppInfoEx As ESB_APPINFOEX_T
AppName = ""
'***********************
'Get application info Ex
'***********************
sts = EsbGetApplicationInfoEx(hCtx, AppName,
Items)
For n = 1 To Items
'***********************************
' Get next Application Info item
' from the list
'***********************************'
sts = EsbGetNextItem(hCtx,ESB_APPINFOEX_TYPE,
AppInfoEx)
Next
End Sub
EsbGetApplicationInfo()