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

1
EnvelopeGenerator.Form/Controllers/EnvelopeListController.vb
View File

@@ -1,5 +1,6 @@
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Database
Imports EnvelopeGenerator.Common
Public Class EnvelopeListController
Inherits BaseClass

3
EnvelopeGenerator.Form/Controllers/FieldEditorController.vb
View File

@@ -3,6 +3,7 @@ Imports DevExpress.Utils.CommonDialogs
Imports DevExpress.XtraBars.Docking2010.Views.NativeMdi
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Database
Imports EnvelopeGenerator.Common
Imports GdPicture14.Annotations
Public Class FieldEditorController
@@ -36,7 +37,7 @@ Public Class FieldEditorController
oELement.Y = pAnnotation.Top
Else
Elements.Add(New EnvelopeDocumentElement() With {
.ElementType = Constants.ElementType.Signature.ToString,
.ElementType = Common.Constants.ElementType.Signature.ToString,
.Height = pAnnotation.Height,
.Width = pAnnotation.Width,
.X = pAnnotation.Left,