AppStd/EnvelopeGenerator
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS Service Invitations API,Form 2Faktor Properties

Browse Source
This commit is contained in:
Developer01
2025-05-08 14:37:34 +02:00
parent dc4b5bade0
commit 5a8f2d298f
18 changed files with 605 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
EnvelopeGenerator.Common/Jobs/APIBackendJobs/SendInvitationMailJob.vb
View File

@@ -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)