MS BaseControler

This commit is contained in:
SchreiberM 2024-03-13 15:03:16 +01:00
parent 47f924ad7e
commit 21baf0bad0

View File

@ -128,9 +128,14 @@ Public MustInherit Class BaseController
End Function End Function
Public Function DeleteDocumentsFromDisk(pEnvelope As Envelope) As Boolean Public Function DeleteDocumentsFromDisk(pEnvelope As Envelope) As Boolean
Return pEnvelope.Documents. If Not IsNothing(pEnvelope.Documents) Then
Select(Function(d) DeleteDocumentFromDisk(d)). Return pEnvelope.Documents.
All(Function(r) r = True) Select(Function(d) DeleteDocumentFromDisk(d)).
All(Function(r) r = True)
Else
Return True
End If
End Function End Function
Public Function DeleteDocumentFromDisk(pDocument As EnvelopeDocument) As Boolean Public Function DeleteDocumentFromDisk(pDocument As EnvelopeDocument) As Boolean