From 1b852365136960f2fb0610c8f167b70d9a5f5880 Mon Sep 17 00:00:00 2001
From: Jonathan Jenne <j.jenne@digitaldata.works>
Date: Fri, 8 Dec 2023 11:37:14 +0100
Subject: [PATCH] clean up

---
 .../Jobs/CertificateDocumentJob.vb                | 15 ++++-----------
 EnvelopeGenerator.Web/Program.cs                  |  2 +-
 2 files changed, 5 insertions(+), 12 deletions(-)

diff --git a/EnvelopeGenerator.Common/Jobs/CertificateDocumentJob.vb b/EnvelopeGenerator.Common/Jobs/CertificateDocumentJob.vb
index 04d5ae75..73c1fe47 100644
--- a/EnvelopeGenerator.Common/Jobs/CertificateDocumentJob.vb
+++ b/EnvelopeGenerator.Common/Jobs/CertificateDocumentJob.vb
@@ -3,20 +3,13 @@ Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Base
 Imports GdPicture14
 Imports Quartz
-Imports Quartz.Util
-Imports DevExpress.XtraRichEdit.Keyboard
-Imports DevExpress.Pdf
 Imports System.Security.Cryptography
-Imports DevExpress
 Imports System.IO
-Imports System.Runtime.Remoting.Messaging
 
 Namespace Jobs
     Public Class CertificateDocumentJob
         Implements IJob
 
-
-
         Private LicenseManager As New LicenseManager()
         Private GdViewer As GdViewer
 
@@ -39,11 +32,14 @@ Namespace Jobs
 
         End Class
 
-        Public Async Function Execute(pContext As IJobExecutionContext) As Task Implements IJob.Execute
+        Public Function Execute(pContext As IJobExecutionContext) As Task Implements IJob.Execute
             Dim oGdPictureKey As String = pContext.MergedJobDataMap.Item(Constants.GDPICTURE)
             LogConfig = pContext.MergedJobDataMap.Item(Constants.LOGCONFIG)
             Logger = LogConfig.GetLogger()
 
+            Dim JobId = pContext.JobDetail.Key
+            Logger.Info("Starting job {0}", JobId)
+
             Try
                 InitializeModels()
                 InitializeServices()
@@ -61,9 +57,6 @@ Namespace Jobs
                 Logger.Debug("Loading Configuration..")
                 Config = ConfigModel.LoadConfiguration()
 
-                Dim JobId = pContext.JobDetail.Key
-                Logger.Debug("Starting job {0}", JobId)
-
                 Dim oCompleteStatus As Integer = Constants.EnvelopeStatus.EnvelopeCompletelySigned
                 Dim oSql = $"SELECT * FROM TBSIG_ENVELOPE WHERE STATUS = {oCompleteStatus}"
                 Dim oTable = Database.GetDatatable(oSql)
diff --git a/EnvelopeGenerator.Web/Program.cs b/EnvelopeGenerator.Web/Program.cs
index 6f23ec7e..416076f5 100644
--- a/EnvelopeGenerator.Web/Program.cs
+++ b/EnvelopeGenerator.Web/Program.cs
@@ -29,7 +29,7 @@ namespace EnvelopeGenerator.Web
             builder.Services.AddQuartz(q =>
             {      
                 Scheduler scheduler = InitScheduler(builder);
-                scheduler.ScheduleJob<Common.Jobs.CertificateDocumentJob>(q, "CertificateDocument", 5);
+                scheduler.ScheduleJob<Common.Jobs.CertificateDocumentJob>(q, "CertificateDocument", 1);
             });
             builder.Services.AddQuartzHostedService();