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

2023-08-07

Browse Source
This commit is contained in:
Jonathan Jenne
2023-08-07 11:23:52 +02:00
parent c8b2f21fea
commit 462bf4a61f
53 changed files with 1415 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
EnvelopeGenerator.Form/Controllers/EnvelopeEditorController.vb
View File

@@ -5,6 +5,7 @@ Imports System.Runtime.Remoting.Messaging
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Imports EnvelopeGenerator.Common
Imports EnvelopeGenerator.Form.My.Resources
Public Class EnvelopeEditorController
@@ -66,7 +67,7 @@ Public Class EnvelopeEditorController
Dim oTransaction = oConnection.BeginTransaction(IsolationLevel.ReadUncommitted)
Try
pEnvelope.Status = Constants.EnvelopeStatus.Saved
pEnvelope.Status = Common.Constants.EnvelopeStatus.Created
If SaveEnvelopeDocumentsToFilesystem(pEnvelope) = False Then
Throw New ApplicationException
@@ -97,7 +98,7 @@ Public Class EnvelopeEditorController
End Function
Public Function CleanupEnvelope() As Boolean
If Envelope.Status = Constants.EnvelopeStatus.Created Then
If Envelope.Status = Common.Constants.EnvelopeStatus.Created Then
'TODO: Delete Documents and Receivers and elements
Return EnvelopeModel.Delete(Envelope)
@@ -171,7 +172,7 @@ Public Class EnvelopeEditorController
Return oEnvelopePath
Catch ex As Exception
Logger.error(ex)
Logger.Error(ex)
Return Nothing
End Try
End Function