MS Service Invitations API,Form 2Faktor Properties

EnvelopeGenerator.Common/Jobs/APIBackendJobs/SendInvitationMailJob.vb

@@ -44,7 +44,7 @@ Namespace Jobs
             myTempFiles = New TempFiles(LogConfig)
             myTempFiles.Create()
             Dim JobId = pContext.JobDetail.Key
-            Logger.Info("SendInvMail - Starting job {0}", JobId)
+            Logger.Debug("SendInvMail - Starting job {0}", JobId)
 
             Try
                 Logger.Debug("SendInvMail - Loading Database..")
@@ -81,7 +81,6 @@ Namespace Jobs
 
                 For Each oId In oEnvelopeIds
                     Logger.Info("SendInvMail - Gathering Info for Envelope [{0}] ({1}/{2})", oId, oCurrent, oTotal)
-                    Logger.Debug("SendInvMail - Loading Envelope..")
                     Try
                         Dim oEnvelope = EnvelopeModel.GetById(oId)
                         If oEnvelope Is Nothing Then
@@ -98,10 +97,11 @@ Namespace Jobs
                         End If
                         Logger.Info("SendInvMail - Sending InvitationMails for Envelope [{0}]", oId)
                         If ActionService.SendEnvelope(oEnvelope) = False Then
+                            Logger.Warn("SendInvMail - Could not send the InvitationMails for Envelope [{0}]", oId)
                             Throw New ArgumentNullException("EnvelopeData")
                         End If
                     Catch ex As Exception
-                        Logger.Warn(ex, $"Unhandled exception while working envelope [{oId}]")
+                        Logger.Warn(ex, $"SendInvMail - Unhandled exception while working envelope [{oId}]")
                     End Try
 
                     oCurrent += 1
@@ -114,7 +114,7 @@ Namespace Jobs
                 Logger.Warn("SendInvMail job failed!")
                 Logger.Error(ex)
             Finally
-                Logger.Info("SendInvMail execution for [{0}] ended", JobId)
+                Logger.Debug("SendInvMail execution for [{0}] ended", JobId)
             End Try
 
             Return Task.FromResult(True)

EnvelopeGenerator.Common/Jobs/FinalizeDocument/FinalizeDocumentJob.vb

@@ -53,7 +53,7 @@ Namespace Jobs
             myTempFiles = New TempFiles(LogConfig)
             myTempFiles.Create()
             Dim JobId = pContext.JobDetail.Key
-            Logger.Info("Starting job {0}", JobId)
+            Logger.Debug("Starting job {0}", JobId)
 
             Try
                 Logger.Debug("Loading GdViewer..")
@@ -108,7 +108,6 @@ Namespace Jobs
 
                 For Each oId In oEnvelopeIds
                     Logger.Info("Finalizing Envelope [{0}] ({1}/{2})", oId, oCurrent, oTotal)
-                    Logger.Debug("Loading Envelope..")
                     Try
                         Dim oEnvelope = EnvelopeModel.GetById(oId)
                         If oEnvelope Is Nothing Then
@@ -290,11 +289,15 @@ Namespace Jobs
             If oMailToCreator <> FinalEmailType.No Then
                 Logger.Debug("Sending email to creator ...")
                 SendFinalEmailToCreator(pEnvelope) ', pAttachment
+            Else
+                Logger.Warn($"No SendFinalEmailToCreator - oMailToCreator [{oMailToCreator}] <> [{FinalEmailType.No}] ")
             End If
 
             If oMailToReceivers <> FinalEmailType.No Then
                 Logger.Debug("Sending emails to receivers..")
                 SendFinalEmailToReceivers(pEnvelope) ', pAttachment
+            Else
+                Logger.Warn($"No SendFinalEmailToReceivers - oMailToCreator [{oMailToReceivers}] <> [{FinalEmailType.No}] ")
             End If
 
             Return True