MS

EnvelopeGenerator.Form/EnvelopeGenerator.Form.vbproj

@@ -84,6 +84,10 @@
     <Reference Include="DigitalData.Modules.Logging">
       <HintPath>..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
     </Reference>
+    <Reference Include="EnvelopeGenerator.Common, Version=1.8.0.0, Culture=neutral, processorArchitecture=MSIL">
+      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\EnvelopeGenerator.Common\bin\Debug\EnvelopeGenerator.Common.dll</HintPath>
+    </Reference>
     <Reference Include="GdPicture.NET.14">
       <HintPath>D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll</HintPath>
     </Reference>

EnvelopeGenerator.Test/EnvelopeGenerator.Test.vbproj

@@ -76,6 +76,9 @@
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
     </Reference>
+    <Reference Include="EnvelopeGenerator.Common">
+      <HintPath>..\EnvelopeGenerator.Common\bin\Debug\EnvelopeGenerator.Common.dll</HintPath>
+    </Reference>
     <Reference Include="GdPicture.NET.14, Version=14.1.0.152, Culture=neutral, processorArchitecture=MSIL">
       <SpecificVersion>False</SpecificVersion>
       <HintPath>D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll</HintPath>

EnvelopeGenerator.Test/My Project/Application.Designer.vb

@@ -1,10 +1,10 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     This code was generated by a tool.
+'     Dieser Code wurde von einem Tool generiert.
-'     Runtime Version:4.0.30319.42000
+'     Laufzeitversion:4.0.30319.42000
 '
-'     Changes to this file may cause incorrect behavior and will be lost if
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     the code is regenerated.
+'     der Code erneut generiert wird.
 ' </auto-generated>
 '------------------------------------------------------------------------------
 
@@ -14,10 +14,10 @@ Option Explicit On
 
 Namespace My
     
-    'NOTE: This file is auto-generated; do not modify it directly.  To make changes,
+    'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden.  Wenn Sie Änderungen vornehmen möchten
-    ' or if you encounter build errors in this file, go to the Project Designer
+    ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
-    ' (go to Project Properties or double-click the My Project node in
+    ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
-    ' Solution Explorer), and make changes on the Application tab.
+    ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
     '
     Partial Friend Class MyApplication
         

EnvelopeGenerator.Test/My Project/Settings.Designer.vb

@@ -1,26 +1,97 @@
 '------------------------------------------------------------------------------
 ' <auto-generated>
-'     This code was generated by a tool.
+'     Dieser Code wurde von einem Tool generiert.
-'     Runtime Version:4.0.30319.18047
+'     Laufzeitversion:4.0.30319.42000
 '
-'     Changes to this file may cause incorrect behavior and will be lost if
+'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-'     the code is regenerated.
+'     der Code erneut generiert wird.
 ' </auto-generated>
 '------------------------------------------------------------------------------
 
+Option Strict On
+Option Explicit On
+
+
 Namespace My
     
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
+     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.9.0.0"),  _
+     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
+    Partial Friend NotInheritable Class Settings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
         
-    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0")>
+        Private Shared defaultInstance As Settings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New Settings()),Settings)
-    Friend NotInheritable Partial Class Settings
-        Inherits System.Configuration.ApplicationSettingsBase
         
-        Private Shared defaultInstance As Settings = (CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New Settings()), Settings))
+#Region "Automatische My.Settings-Speicherfunktion"
+#If _MyType = "WindowsForms" Then
+    Private Shared addedHandler As Boolean
+
+    Private Shared addedHandlerLockObject As New Object
+
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
+    Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
+        If My.Application.SaveMySettingsOnExit Then
+
+            End If
+    End Sub
+#End If
+#End Region
         
         Public Shared ReadOnly Property [Default]() As Settings
             Get
+                
+#If _MyType = "WindowsForms" Then
+               If Not addedHandler Then
+                    SyncLock addedHandlerLockObject
+                        If Not addedHandler Then
+                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
+                            addedHandler = True
+                        End If
+                    End SyncLock
+                End If
+#End If
                 Return defaultInstance
             End Get
         End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("10")>  _
+        Public Property envelopeId() As String
+            Get
+                Return CType(Me("envelopeId"),String)
+            End Get
+            Set
+                Me("envelopeId") = value
+            End Set
+        End Property
+        
+        <Global.System.Configuration.UserScopedSettingAttribute(),  _
+         Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+         Global.System.Configuration.DefaultSettingValueAttribute("11")>  _
+        Public Property ReceiverID() As String
+            Get
+                Return CType(Me("ReceiverID"),String)
+            End Get
+            Set
+                Me("ReceiverID") = value
+            End Set
+        End Property
     End Class
 End Namespace
+
+Namespace My
+    
+    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
+     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
+     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
+    Friend Module MySettingsProperty
+        
+        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
+        Friend ReadOnly Property Settings() As Global.EnvelopeGenerator.My.Settings
+            Get
+                Return Global.EnvelopeGenerator.My.Settings.Default
+            End Get
+        End Property
+    End Module
+End Namespace

EnvelopeGenerator.Test/My Project/Settings.settings

@@ -1,7 +1,12 @@
 <?xml version='1.0' encoding='utf-8'?>
-<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)">
+<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="" GeneratedClassName="Settings">
-  <Profiles>
+  <Profiles />
-    <Profile Name="(Default)" />
+  <Settings>
-  </Profiles>
+    <Setting Name="envelopeId" Type="System.String" Scope="User">
-  <Settings />
+      <Value Profile="(Default)">10</Value>
+    </Setting>
+    <Setting Name="ReceiverID" Type="System.String" Scope="User">
+      <Value Profile="(Default)">11</Value>
+    </Setting>
+  </Settings>
 </SettingsFile>

EnvelopeGenerator.Test/app.config

@@ -4,6 +4,9 @@
     <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
       <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
     </sectionGroup>
+    <sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
+      <section name="EnvelopeGenerator.Settings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
+    </sectionGroup>
   </configSections>
   <applicationSettings>
     <DevExpress.LookAndFeel.Design.AppSettings>
@@ -38,4 +41,14 @@
       <!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
     </sharedListeners>
   </system.diagnostics>
+  <userSettings>
+    <EnvelopeGenerator.Settings>
+      <setting name="envelopeId" serializeAs="String">
+        <value>10</value>
+      </setting>
+      <setting name="ReceiverID" serializeAs="String">
+        <value>11</value>
+      </setting>
+    </EnvelopeGenerator.Settings>
+  </userSettings>
 </configuration>

EnvelopeGenerator.Test/frmFinalizePDF.Designer.vb

@@ -23,12 +23,12 @@ Partial Class frmFinalizePDF
     <System.Diagnostics.DebuggerStepThrough()>
     Private Sub InitializeComponent()
         Me.txtReceiver = New System.Windows.Forms.TextBox()
-        Me.txtEnvelope = New System.Windows.Forms.TextBox()
         Me.Label1 = New System.Windows.Forms.Label()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.Button1 = New System.Windows.Forms.Button()
         Me.Button2 = New System.Windows.Forms.Button()
         Me.txtResult = New System.Windows.Forms.TextBox()
+        Me.txtEnvelope = New System.Windows.Forms.TextBox()
         Me.SuspendLayout()
         '
         'txtReceiver
@@ -37,15 +37,7 @@ Partial Class frmFinalizePDF
         Me.txtReceiver.Name = "txtReceiver"
         Me.txtReceiver.Size = New System.Drawing.Size(100, 20)
         Me.txtReceiver.TabIndex = 0
-        Me.txtReceiver.Text = "11"
+
-        '
-        'txtEnvelope
-        '
-        Me.txtEnvelope.Location = New System.Drawing.Point(15, 23)
-        Me.txtEnvelope.Name = "txtEnvelope"
-        Me.txtEnvelope.Size = New System.Drawing.Size(100, 20)
-        Me.txtEnvelope.TabIndex = 0
-        Me.txtEnvelope.Text = "10"
         '
         'Label1
         '
@@ -83,13 +75,21 @@ Partial Class frmFinalizePDF
         Me.Button2.Text = "Merge Json"
         Me.Button2.UseVisualStyleBackColor = True
         '
-        'TextBox1
+        'txtResult
         '
         Me.txtResult.Location = New System.Drawing.Point(333, 12)
         Me.txtResult.Multiline = True
-        Me.txtResult.Name = "TextBox1"
+        Me.txtResult.Name = "txtResult"
         Me.txtResult.Size = New System.Drawing.Size(455, 426)
         Me.txtResult.TabIndex = 4
+        '
+        'txtEnvelope
+        '
+        Me.txtEnvelope.Location = New System.Drawing.Point(15, 23)
+        Me.txtEnvelope.Name = "txtEnvelope"
+        Me.txtEnvelope.Size = New System.Drawing.Size(100, 20)
+        Me.txtEnvelope.TabIndex = 0
+
         '
         'frmFinalizePDF
         '

EnvelopeGenerator.Test/frmFinalizePDF.vb

@@ -48,19 +48,25 @@ Public Class frmFinalizePDF
     End Function
 
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
-        Dim oDocumentPath = LoadEnvelopeDocument()
+        Try
-        Dim oFileInfo = New FileInfo(oDocumentPath)
-        Dim oTable = LoadAnnotationDataForEnvelope()
-        Dim oJsonList = oTable.Rows.
-            Cast(Of DataRow).
-            Select(Function(r As DataRow) r.Item("VALUE").ToString()).
-            ToList()
 
-        Dim oBuffer As Byte() = File.ReadAllBytes(oDocumentPath)
+            Dim oDocumentPath = LoadEnvelopeDocument()
-        Dim oNewBuffer = PDFBurner.BurnInstantJSONAnnotationsToPDF(oBuffer, oJsonList)
+            Dim oFileInfo = New FileInfo(oDocumentPath)
-        Dim oNewPath = Path.Combine(oFileInfo.Directory.FullName, $"{oFileInfo.Name}.burned.pdf")
+            Dim oTable = LoadAnnotationDataForEnvelope()
+            Dim oJsonList = oTable.Rows.
+                Cast(Of DataRow).
+                Select(Function(r As DataRow) r.Item("VALUE").ToString()).
+                ToList()
+
+            Dim oBuffer As Byte() = File.ReadAllBytes(oDocumentPath)
+            Dim oNewBuffer = PDFBurner.BurnInstantJSONAnnotationsToPDF(oBuffer, oJsonList)
+            Dim oNewPath = Path.Combine(oFileInfo.Directory.FullName, $"{oFileInfo.Name}.burned.pdf")
+
+            File.WriteAllBytes(oNewPath, oNewBuffer)
+        Catch ex As Exception
+            MsgBox(ex.Message, MsgBoxStyle.Critical)
+        End Try
 
-        File.WriteAllBytes(oNewPath, oNewBuffer)
     End Sub
 
     Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

EnvelopeGenerator.Web/EnvelopeGenerator.Web.csproj

@@ -13,7 +13,7 @@
   <ItemGroup>
     <PackageReference Include="AutoMapper" Version="13.0.1" />
     <PackageReference Include="DigitalData.Core.Abstractions" Version="1.0.0" />
-    <PackageReference Include="DigitalData.Core.API" Version="1.0.0" />
+    <PackageReference Include="DigitalData.Core.API" Version="1.0.1" />
     <PackageReference Include="DigitalData.Core.Application" Version="1.0.0" />
     <PackageReference Include="DigitalData.Core.DTO" Version="1.0.0" />
     <PackageReference Include="DigitalData.Core.Infrastructure" Version="1.0.0" />