Description
Returns all approval requests in your company.
Syntax
Example
| Getting the Full List of the Approval Requests (C#) |  Copy Code |
|---|
'Get full list of approval request
Dim oApprovalRequestsService As ApprovalRequestsService = oCompany.GetCompanyService().GetBusinessService(ServiceTypes.ApprovalRequestsService)
Dim oApprovalRequest As ApprovalRequest = oApprovalRequestsService.GetDataInterface(ApprovalRequestsServiceDataInterfaces.arsApprovalRequest)
Dim oApprovalRequestsParams As ApprovalRequestsParams = oApprovalRequestsService.GetDataInterface(ApprovalRequestsServiceDataInterfaces.arsApprovalRequestsParams)
Dim oApprovalRequestParams As ApprovalRequestParams = oApprovalRequestsService.GetDataInterface(ApprovalRequestsServiceDataInterfaces.arsApprovalRequestParams)
'Get full list
oApprovalRequestsParams = oApprovalRequestsService.GetAllApprovalRequestsList()
Dim i As Integer
Dim approvalcode As Integer
Dim sRemarks, sXML, sStatus As String
Dim sReqStatus As SAPbobsCOM.BoApprovalRequestStatusEnum
For i = 0 To oApprovalRequestsParams.Count - 1
' Get request information in order to find the request you want to approve
approvalcode = oApprovalRequestsParams.Item(i).Code
sRemarks = oApprovalRequestsParams.Item(i).Remarks
sReqStatus = oApprovalRequestsParams.Item(i).Status
sStatus = ""
Select Case sReqStatus
Case BoApprovalRequestStatusEnum.arsApproved
sStatus = "Approved"
Case BoApprovalRequestStatusEnum.arsCancelled
sStatus = "Cancelled"
Case BoApprovalRequestStatusEnum.arsGenerated
sStatus = "Approved"
Case BoApprovalRequestStatusEnum.arsGeneratedByAuthorizer
sStatus = "GeneratedByAuthorizer"
Case BoApprovalRequestStatusEnum.arsNotApproved
sStatus = "NotApproved"
Case BoApprovalRequestStatusEnum.arsPending
sStatus = "Pending"
End Select
sXML = oApprovalRequestsParams.Item(i).ToXMLString
Next
|
|
See Also
