EsbListRequests() returns information about sessions and requests in progress, terminated, or in the process of being terminated.
EsbListRequests (hCtx, UserName, AppName, DbName, Items)
ByVal hCtx As Long
ByVal UserName As String
ByVal AppName As String
ByVal DbName As String
Items As Long
| hCtx | Context handle |
| AppName | Application name |
| DbName | Database name |
| UserName | User name |
| Items | Number of index and data files returned |
If successful, returns a count of the number of users in Items, and generates a list of users with access to the specified application and database that is accessible using EsbGetNextItem().
EsbListRequests() returns information about sessions and requests in progress, terminated, or in the process of being terminated.
This function requires no special privileges.
Declare Function EsbListRequests Lib "ESBAPIW" (ByVal hCtx As Long, ByVal UserName As String, ByVal AppName As String, ByVal DbName As String, pItems As Integer) As Long
Sub ESB_ListRequests ()
Dim Items As Integer
Dim ReqInfo As ESB_REQUESTINFO_T
Dim UserName As String
Dim AppName As String
Dim DbName As String
Dim sts As Long
UserName = "Admin"
AppName = "Demo"
DbName = "Basic"
'*************
' List Requests
'*************
sts = EsbListRequests (hCtx, Items)
For n = 1 To Items
'********************
' Get next Request Info
' from the list
'********************
sts = EsbGetNextItem (hCtx,
ESB_REQUESTINFO_TYPE, ByVal ReqInfo)
Next
End Sub