EsbListApplications() lists all applications which are accessible to the caller.
EsbListApplications (hCtx, pItems)
ByVal hCtx As Long pItems As Integer
hCtx | Essbase VB API context handle. |
pItems | Address of variable to receive Items of returned applications. |
Declare Function EsbListApplications Lib "ESBAPIW" (ByVal hCtx As Long, Items As Integer) As Long Sub ESB_ListApplications () Dim sts As Long Dim Items As Integer Dim AppName As String * ESB_APPNAMELEN '****************************** ' Get List of Application names '****************************** sts = EsbListApplications (hCtx, Items) For n = 1 To Items '********************************* ' Get next Application name string '********************************* sts = EsbGetNextItem (hCtx, ESB_APPNAME_TYPE, ByVal AppName) Next End SubEsbListDatabases()