refactor(Envelope): rename Receivers property as EnvelopeReceivers

This commit is contained in:
2025-09-08 11:48:54 +02:00
parent 122df4bd62
commit 67f068ef38
18 changed files with 47 additions and 37 deletions

View File

@@ -29,7 +29,7 @@ Public Class ActionService
Return False
End If
Dim oSendResult = pEnvelope.Receivers.
Dim oSendResult = pEnvelope.EnvelopeReceivers.
Select(Function(r) EmailService.SendDocumentReceivedEmail(pEnvelope, r)).
All(Function(r) r = True)
@@ -50,7 +50,7 @@ Public Class ActionService
Return False
End If
Dim oSendResult As Boolean = False
For Each oReceiver In pEnvelope.Receivers
For Each oReceiver In pEnvelope.EnvelopeReceivers
EmailService.SendDocumentReceivedEmail(pEnvelope, oReceiver)
Next
Return oSendResult
@@ -75,7 +75,7 @@ Public Class ActionService
Return False
End If
Dim oSendResult = pEnvelope.Receivers.
Dim oSendResult = pEnvelope.EnvelopeReceivers.
Select(Function(r) EmailService.SendEnvelopeDeletedEmail(pEnvelope, r, pReason)).
All(Function(r) r = True)
@@ -87,7 +87,7 @@ Public Class ActionService
End Function
Public Function API_SendWithdrawn_Mails(pEnvelope As Domain.Entities.Envelope, pReason As String) As Boolean
Dim oSendResult As Boolean = False
For Each oReceiver As ReceiverVM In pEnvelope.Receivers
For Each oReceiver As ReceiverVM In pEnvelope.EnvelopeReceivers
If EmailService.SendEnvelopeDeletedEmail(pEnvelope, oReceiver, pReason) = False Then
Return False
End If