EDMIService: Apply timeout of 4 minutes for datatable jobs

This commit is contained in:
Jonathan Jenne 2021-05-05 15:04:51 +02:00
parent c11533a2e4
commit b9c7a23ddd

View File

@ -9,6 +9,8 @@ Imports Quartz
Public Class DatatableJob
Implements IJob
Private Const COMMAND_SQL_TIMEOUT = 240
Private _MSSQL As MSSQLServer
Public Function Execute(context As IJobExecutionContext) As Task Implements IJob.Execute
@ -41,7 +43,8 @@ Public Class DatatableJob
oLogger.Debug("Connection Id: {0}", oConnectionId)
Dim oConnectionString = oMSSQL.Get_ConnectionStringforID(oConnectionId)
Dim oTable = oMSSQL.GetDatatableWithConnection(oSQL, oConnectionString)
Dim oTable = oMSSQL.GetDatatableWithConnection(oSQL, oConnectionString, COMMAND_SQL_TIMEOUT)
oTable.TableName = oDatatableName
oLogger.Debug("Result Datatable [{0}] contains [{1}] rows", oTable.TableName, oTable.Rows.Count)