DiskussionWorkerClass

This commit is contained in:
Digital Data - Marlon Schreiber
2019-06-14 12:26:41 +02:00
parent 91c02adea0
commit f946b849d7
6 changed files with 16 additions and 7 deletions

View File

@@ -24,8 +24,10 @@ Public Class frmWorkflowStep
Private Async Function GetRequestData(RequestId) As Task
Await My.Channel.CreateDatabaseRequestAsync("Get Request Data", True)
Dim oSQL = $"SELECT PROCESS_NAME, TITLE, FORM_ID FROM VWIDB_WF_REQUEST WHERE RECORD_ID = {RequestId}"
Dim oSQL = $"SELECT RECORD_ID,PROCESS_NAME, REQUESTTITLE, FORM_ID FROM VWIDB_PROCESS_REQUEST WHERE REQUESTID = {RequestId}"
If My.Application.Service.Online = False Then
End If
Dim oResult = Await My.Channel.ReturnDatatableAsync(oSQL)
If Not oResult.OK Then