job

EnvelopeGenerator.Common/Jobs/CertificateDocumentJob.vb

@@ -9,11 +9,14 @@ 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
 
@@ -78,7 +81,7 @@ Namespace Jobs
                     End If
 
                     GenerateFinalPDF(oEnvelopeData)
-                    Await GenerateReportPdf()
+                    Await GenerateReportPdf(oId)
 
                 Next
 
@@ -155,7 +158,7 @@ Namespace Jobs
             Dim oCreator As New ReportCreator(oEnvelope)
             Dim oBuffer = Await oCreator.CreateReport(oItems)
 
-            Return
+            Return True
         End Function
 
         Private Function GetReportSource(pDataTable As DataTable) As List(Of ReportItem)

EnvelopeGenerator.Common/Jobs/PDFBurner.vb

@@ -1,4 +1,5 @@
-Imports DevExpress.Pdf
+Imports System.Drawing
+Imports DevExpress.Pdf
 Imports DigitalData.Modules.Base
 Imports DigitalData.Modules.Logging
 Imports GdPicture14