WIP: PDF Attachment Extractor

Modules.Jobs/EDMI/ZUGFeRD/WorkerArgs.vb

@@ -9,6 +9,7 @@ Public Class WorkerArgs
     Public AttachmentsSubDirectory As String
     Public PropertyMap As Dictionary(Of String, XmlItemProperty)
     Public InsertIntoSQLServer As Boolean
+    Public GDPictureKey As String
 
     Public Sub New()
         WatchDirectories = New List(Of String)
@@ -19,5 +20,6 @@ Public Class WorkerArgs
         AttachmentsSubDirectory = Nothing
         PropertyMap = New Dictionary(Of String, XmlItemProperty)
         InsertIntoSQLServer = False
+        GDPictureKey = String.Empty
     End Sub
 End Class