First version of service

EnvelopeGenerator.Service/Scheduler.vb

@@ -10,12 +10,14 @@ Public Class Scheduler
 
     Private Scheduler As IScheduler
     Private ConnectionString As String
+    Private LicenseKey As String
 
     Private Const JobName = "CertificateDocumentJob"
 
-    Public Sub New(pLogConfig As LogConfig, pConnectionString As String)
+    Public Sub New(pLogConfig As LogConfig, pConnectionString As String, pLicenseKey As String)
         MyBase.New(pLogConfig)
         ConnectionString = pConnectionString
+        LicenseKey = pLicenseKey
     End Sub
 
     Public Async Function Start(pInterval As Integer) As Task
@@ -29,6 +31,7 @@ Public Class Scheduler
 
         Dim oJobKey = New JobKey(JobName)
         Dim oJobData = New JobDataMap() From {
+            {Common.Constants.GDPICTURE, LicenseKey},
             {Common.Constants.LOGCONFIG, LogConfig},
             {Common.Constants.DATABASE, ConnectionString}
         }