MS EnvelopeGenerator.Common v1.6 Reason for Aborting

XX.Form v1.7 Reason Aborting

EnvelopeGenerator.Common/Services/EmailService.vb

@@ -15,14 +15,14 @@ Public Class EmailService
         EmailTemplate = New TemplateService(pState)
     End Sub
 
-    Public Function SendEnvelopeDeletedEmail(pEnvelope As Envelope, pReceiver As EnvelopeReceiver) As Boolean
+    Public Function SendEnvelopeDeletedEmail(pEnvelope As Envelope, pReceiver As EnvelopeReceiver, pReason As String) As Boolean
         Logger.Debug("Creating email data object.")
         Dim oEmailData As New EmailData(pEnvelope, pReceiver, Constants.EnvelopeStatus.MessageDeletionSent) With
         {
             .SignatureLink = ""
         }
 
-        EmailTemplate.FillEnvelopeDeletedEmailBody(oEmailData)
+        EmailTemplate.FillEnvelopeDeletedEmailBody(oEmailData, pReason)
 
         If EmailModel.Insert(oEmailData) = False Then
             Logger.Error("EMail data could not be inserted.")