diff --git a/DDMonorepo.sln b/DDMonorepo.sln index a3690666..a0e54c47 100644 --- a/DDMonorepo.sln +++ b/DDMonorepo.sln @@ -74,8 +74,6 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DBCleaner", "DBCleaner\DBCl EndProject Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EDMIService.Tests", "EDMIService.Tests\EDMIService.Tests.vbproj", "{E3DA65CA-964D-4896-991A-B5426884E215}" EndProject -Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Jobs", "..\DDModules\Jobs\Jobs.vbproj", "{39EC839A-3C30-4922-A41E-6B09D1DDE5C3}" -EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Any CPU = Debug|Any CPU @@ -182,10 +180,6 @@ Global {E3DA65CA-964D-4896-991A-B5426884E215}.Debug|Any CPU.Build.0 = Debug|Any CPU {E3DA65CA-964D-4896-991A-B5426884E215}.Release|Any CPU.ActiveCfg = Release|Any CPU {E3DA65CA-964D-4896-991A-B5426884E215}.Release|Any CPU.Build.0 = Release|Any CPU - {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Debug|Any CPU.ActiveCfg = Debug|Any CPU - {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Debug|Any CPU.Build.0 = Debug|Any CPU - {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Release|Any CPU.ActiveCfg = Release|Any CPU - {39EC839A-3C30-4922-A41E-6B09D1DDE5C3}.Release|Any CPU.Build.0 = Release|Any CPU EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE @@ -216,7 +210,6 @@ Global {9D4AC920-C78E-41C3-994E-91690FF79380} = {8FFE925E-8B84-45F1-93CB-32B1C96F41EB} {5A7913CE-7D3D-4E84-B23D-4747C178CD71} = {CC368D6A-6AC4-4EB9-A092-14700FABEF7A} {E3DA65CA-964D-4896-991A-B5426884E215} = {7AF3F9C2-C939-4A08-95C1-0453207E298A} - {39EC839A-3C30-4922-A41E-6B09D1DDE5C3} = {CC368D6A-6AC4-4EB9-A092-14700FABEF7A} EndGlobalSection GlobalSection(ExtensibilityGlobals) = postSolution SolutionGuid = {C1BE4090-A0FD-48AF-86CB-39099D14B286} diff --git a/GUIs.Test.ZUGFeRDTest/App.config b/GUIs.Test.ZUGFeRDTest/App.config index 1da1135b..417e3a18 100644 --- a/GUIs.Test.ZUGFeRDTest/App.config +++ b/GUIs.Test.ZUGFeRDTest/App.config @@ -163,26 +163,6 @@ - - - - - - - - - - - - - - - - - - - - diff --git a/GUIs.Test.ZUGFeRDTest/Form1.Designer.vb b/GUIs.Test.ZUGFeRDTest/Form1.Designer.vb index 7fa8ec02..7c9d377a 100644 --- a/GUIs.Test.ZUGFeRDTest/Form1.Designer.vb +++ b/GUIs.Test.ZUGFeRDTest/Form1.Designer.vb @@ -24,237 +24,225 @@ Partial Class Form1 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. Private Sub InitializeComponent() - OpenFileDialog1 = New OpenFileDialog() - btRunJob = New Button() - ListBox1 = New ListBox() - btValidateSerializePDF = New Button() - btValidateSerializeParseProps = New Button() - btCreateMD5Checksum = New Button() - GroupBox1 = New GroupBox() - ButtonValidateXMLOnly = New Button() - GroupBox2 = New GroupBox() - btExtractPDFAttachments = New Button() - GroupBox3 = New GroupBox() - txtMD5Checksum = New TextBox() - txtPropName = New TextBox() - GroupBox4 = New GroupBox() - btFindExtractXMLValue = New Button() - FolderBrowserDialog1 = New FolderBrowserDialog() - GroupBox5 = New GroupBox() - btWriteBinary = New Button() - OpenFileDialog2 = New OpenFileDialog() - - GroupBox1.SuspendLayout() - GroupBox2.SuspendLayout() - GroupBox3.SuspendLayout() - GroupBox4.SuspendLayout() - GroupBox5.SuspendLayout() - SuspendLayout() - ' - ' OpenFileDialog1 - ' - OpenFileDialog1.FileName = "OpenFileDialog1" - ' - ' btRunJob - ' - btRunJob.Location = New System.Drawing.Point(8, 29) - btRunJob.Margin = New Padding(4, 5, 4, 5) - btRunJob.Name = "btRunJob" - btRunJob.Size = New System.Drawing.Size(295, 35) - btRunJob.TabIndex = 0 - btRunJob.Text = "Run Job" - btRunJob.UseVisualStyleBackColor = True - ' - ' ListBox1 - ' - ListBox1.Anchor = AnchorStyles.Top Or AnchorStyles.Bottom Or AnchorStyles.Left Or AnchorStyles.Right - ListBox1.FormattingEnabled = True - ListBox1.Location = New System.Drawing.Point(504, 12) - ListBox1.Margin = New Padding(4, 5, 4, 5) - ListBox1.Name = "ListBox1" - ListBox1.Size = New System.Drawing.Size(362, 664) - ListBox1.TabIndex = 1 - ' - ' btValidateSerializePDF - ' - btValidateSerializePDF.Location = New System.Drawing.Point(8, 29) - btValidateSerializePDF.Margin = New Padding(4, 5, 4, 5) - btValidateSerializePDF.Name = "btValidateSerializePDF" - btValidateSerializePDF.Size = New System.Drawing.Size(328, 35) - btValidateSerializePDF.TabIndex = 2 - btValidateSerializePDF.Text = "Validate and Serialize PDF" - btValidateSerializePDF.UseVisualStyleBackColor = True - ' - ' btValidateSerializeParseProps - ' - btValidateSerializeParseProps.Location = New System.Drawing.Point(8, 74) - btValidateSerializeParseProps.Margin = New Padding(4, 5, 4, 5) - btValidateSerializeParseProps.Name = "btValidateSerializeParseProps" - btValidateSerializeParseProps.Size = New System.Drawing.Size(328, 35) - btValidateSerializeParseProps.TabIndex = 3 - btValidateSerializeParseProps.Text = "Validate and Serialize PDF and Parse Props" - btValidateSerializeParseProps.UseVisualStyleBackColor = True - ' - ' btCreateMD5Checksum - ' - btCreateMD5Checksum.Location = New System.Drawing.Point(8, 29) - btCreateMD5Checksum.Margin = New Padding(4, 5, 4, 5) - btCreateMD5Checksum.Name = "btCreateMD5Checksum" - btCreateMD5Checksum.Size = New System.Drawing.Size(295, 35) - btCreateMD5Checksum.TabIndex = 4 - btCreateMD5Checksum.Text = "Create MD5 Checksum for PDF" - btCreateMD5Checksum.UseVisualStyleBackColor = True - ' - ' GroupBox1 - ' - GroupBox1.Controls.Add(ButtonValidateXMLOnly) - GroupBox1.Controls.Add(btRunJob) - GroupBox1.Location = New System.Drawing.Point(16, 18) - GroupBox1.Margin = New Padding(4, 5, 4, 5) - GroupBox1.Name = "GroupBox1" - GroupBox1.Padding = New Padding(4, 5, 4, 5) - GroupBox1.Size = New System.Drawing.Size(319, 116) - GroupBox1.TabIndex = 7 - GroupBox1.TabStop = False - GroupBox1.Text = "Run Job like in eInvoice Service" - ' - ' ButtonValidateXMLOnly - ' - ButtonValidateXMLOnly.Location = New System.Drawing.Point(8, 74) - ButtonValidateXMLOnly.Margin = New Padding(4, 5, 4, 5) - ButtonValidateXMLOnly.Name = "ButtonValidateXMLOnly" - ButtonValidateXMLOnly.Size = New System.Drawing.Size(295, 35) - ButtonValidateXMLOnly.TabIndex = 4 - ButtonValidateXMLOnly.Text = "Run XML Job (spez. Configuration)" - ButtonValidateXMLOnly.UseVisualStyleBackColor = True - ' - ' GroupBox2 - ' - GroupBox2.Controls.Add(btValidateSerializePDF) - GroupBox2.Controls.Add(btExtractPDFAttachments) - GroupBox2.Controls.Add(btValidateSerializeParseProps) - GroupBox2.Location = New System.Drawing.Point(16, 144) - GroupBox2.Margin = New Padding(4, 5, 4, 5) - GroupBox2.Name = "GroupBox2" - GroupBox2.Padding = New Padding(4, 5, 4, 5) - GroupBox2.Size = New System.Drawing.Size(480, 167) - GroupBox2.TabIndex = 8 - GroupBox2.TabStop = False - GroupBox2.Text = "Run Functions on a single file (needs Breakpoint)" - ' - ' btExtractPDFAttachments - ' - btExtractPDFAttachments.Location = New System.Drawing.Point(8, 118) - btExtractPDFAttachments.Margin = New Padding(4, 5, 4, 5) - btExtractPDFAttachments.Name = "btExtractPDFAttachments" - btExtractPDFAttachments.Size = New System.Drawing.Size(328, 35) - btExtractPDFAttachments.TabIndex = 3 - btExtractPDFAttachments.Text = "Extract PDF Attachments" - btExtractPDFAttachments.UseVisualStyleBackColor = True - ' - ' GroupBox3 - ' - GroupBox3.Controls.Add(btCreateMD5Checksum) - GroupBox3.Controls.Add(txtMD5Checksum) - GroupBox3.Location = New System.Drawing.Point(16, 321) - GroupBox3.Margin = New Padding(4, 5, 4, 5) - GroupBox3.Name = "GroupBox3" - GroupBox3.Padding = New Padding(4, 5, 4, 5) - GroupBox3.Size = New System.Drawing.Size(480, 131) - GroupBox3.TabIndex = 9 - GroupBox3.TabStop = False - GroupBox3.Text = "Open PDF and calculate Checksum" - ' - ' txtMD5Checksum - ' - txtMD5Checksum.Location = New System.Drawing.Point(8, 75) - txtMD5Checksum.Margin = New Padding(4, 5, 4, 5) - txtMD5Checksum.Name = "txtMD5Checksum" - txtMD5Checksum.Size = New System.Drawing.Size(463, 27) - txtMD5Checksum.TabIndex = 5 - ' - ' txtPropName - ' - txtPropName.Location = New System.Drawing.Point(8, 74) - txtPropName.Margin = New Padding(4, 5, 4, 5) - txtPropName.Name = "txtPropName" - txtPropName.Size = New System.Drawing.Size(463, 27) - txtPropName.TabIndex = 10 - ' - ' GroupBox4 - ' - GroupBox4.Controls.Add(btFindExtractXMLValue) - GroupBox4.Controls.Add(txtPropName) - GroupBox4.Location = New System.Drawing.Point(16, 462) - GroupBox4.Margin = New Padding(4, 5, 4, 5) - GroupBox4.Name = "GroupBox4" - GroupBox4.Padding = New Padding(4, 5, 4, 5) - GroupBox4.Size = New System.Drawing.Size(480, 117) - GroupBox4.TabIndex = 11 - GroupBox4.TabStop = False - GroupBox4.Text = "GroupBox4" - ' - ' btFindExtractXMLValue - ' - btFindExtractXMLValue.Location = New System.Drawing.Point(8, 29) - btFindExtractXMLValue.Margin = New Padding(4, 5, 4, 5) - btFindExtractXMLValue.Name = "btFindExtractXMLValue" - btFindExtractXMLValue.Size = New System.Drawing.Size(295, 35) - btFindExtractXMLValue.TabIndex = 11 - btFindExtractXMLValue.Text = "Find and Extract XML Path Value" - btFindExtractXMLValue.UseVisualStyleBackColor = True - ' - ' GroupBox5 - ' - GroupBox5.Controls.Add(btWriteBinary) - GroupBox5.Location = New System.Drawing.Point(13, 589) - GroupBox5.Margin = New Padding(4, 5, 4, 5) - GroupBox5.Name = "GroupBox5" - GroupBox5.Padding = New Padding(4, 5, 4, 5) - GroupBox5.Size = New System.Drawing.Size(480, 87) - GroupBox5.TabIndex = 12 - GroupBox5.TabStop = False - GroupBox5.Text = "GroupBox5" - ' - ' btWriteBinary - ' - btWriteBinary.Location = New System.Drawing.Point(8, 29) - btWriteBinary.Margin = New Padding(4, 5, 4, 5) - btWriteBinary.Name = "btWriteBinary" - btWriteBinary.Size = New System.Drawing.Size(295, 35) - btWriteBinary.TabIndex = 11 - btWriteBinary.Text = "Write Binary to PDF" - btWriteBinary.UseVisualStyleBackColor = True - ' - ' OpenFileDialog2 - ' - OpenFileDialog2.FileName = "OpenFileDialog2" - OpenFileDialog2.Filter = "XML files (*.xml)|*.xml" - - ' - ' Form1 - ' - AutoScaleDimensions = New System.Drawing.SizeF(8.0F, 20.0F) - AutoScaleMode = AutoScaleMode.Font - ClientSize = New System.Drawing.Size(879, 690) - - Controls.Add(GroupBox5) - Controls.Add(GroupBox4) - Controls.Add(GroupBox3) - Controls.Add(GroupBox2) - Controls.Add(GroupBox1) - Controls.Add(ListBox1) - Margin = New Padding(4, 5, 4, 5) - Name = "Form1" - Text = "E-Invoice-TEST-Tool" - GroupBox1.ResumeLayout(False) - GroupBox2.ResumeLayout(False) - GroupBox3.ResumeLayout(False) - GroupBox3.PerformLayout() - GroupBox4.ResumeLayout(False) - GroupBox4.PerformLayout() - GroupBox5.ResumeLayout(False) - ResumeLayout(False) + Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() + Me.btRunJob = New System.Windows.Forms.Button() + Me.ListBox1 = New System.Windows.Forms.ListBox() + Me.btValidateSerializePDF = New System.Windows.Forms.Button() + Me.btValidateSerializeParseProps = New System.Windows.Forms.Button() + Me.btCreateMD5Checksum = New System.Windows.Forms.Button() + Me.GroupBox1 = New System.Windows.Forms.GroupBox() + Me.ButtonValidateXMLOnly = New System.Windows.Forms.Button() + Me.GroupBox2 = New System.Windows.Forms.GroupBox() + Me.btExtractPDFAttachments = New System.Windows.Forms.Button() + Me.GroupBox3 = New System.Windows.Forms.GroupBox() + Me.txtMD5Checksum = New System.Windows.Forms.TextBox() + Me.txtPropName = New System.Windows.Forms.TextBox() + Me.GroupBox4 = New System.Windows.Forms.GroupBox() + Me.btFindExtractXMLValue = New System.Windows.Forms.Button() + Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog() + Me.GroupBox5 = New System.Windows.Forms.GroupBox() + Me.btWriteBinary = New System.Windows.Forms.Button() + Me.OpenFileDialog2 = New System.Windows.Forms.OpenFileDialog() + Me.Button1 = New System.Windows.Forms.Button() + Me.GroupBox1.SuspendLayout() + Me.GroupBox2.SuspendLayout() + Me.GroupBox3.SuspendLayout() + Me.GroupBox4.SuspendLayout() + Me.GroupBox5.SuspendLayout() + Me.SuspendLayout() + ' + 'OpenFileDialog1 + ' + Me.OpenFileDialog1.FileName = "OpenFileDialog1" + ' + 'btRunJob + ' + Me.btRunJob.Location = New System.Drawing.Point(6, 19) + Me.btRunJob.Name = "btRunJob" + Me.btRunJob.Size = New System.Drawing.Size(221, 23) + Me.btRunJob.TabIndex = 0 + Me.btRunJob.Text = "Run Job" + Me.btRunJob.UseVisualStyleBackColor = True + ' + 'ListBox1 + ' + Me.ListBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ + Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.ListBox1.FormattingEnabled = True + Me.ListBox1.Location = New System.Drawing.Point(430, 7) + Me.ListBox1.Name = "ListBox1" + Me.ListBox1.Size = New System.Drawing.Size(498, 433) + Me.ListBox1.TabIndex = 1 + ' + 'btValidateSerializePDF + ' + Me.btValidateSerializePDF.Location = New System.Drawing.Point(6, 19) + Me.btValidateSerializePDF.Name = "btValidateSerializePDF" + Me.btValidateSerializePDF.Size = New System.Drawing.Size(246, 23) + Me.btValidateSerializePDF.TabIndex = 2 + Me.btValidateSerializePDF.Text = "Validate and Serialize PDF" + Me.btValidateSerializePDF.UseVisualStyleBackColor = True + ' + 'btValidateSerializeParseProps + ' + Me.btValidateSerializeParseProps.Location = New System.Drawing.Point(6, 48) + Me.btValidateSerializeParseProps.Name = "btValidateSerializeParseProps" + Me.btValidateSerializeParseProps.Size = New System.Drawing.Size(246, 23) + Me.btValidateSerializeParseProps.TabIndex = 3 + Me.btValidateSerializeParseProps.Text = "Validate and Serialize PDF and Parse Props" + Me.btValidateSerializeParseProps.UseVisualStyleBackColor = True + ' + 'btCreateMD5Checksum + ' + Me.btCreateMD5Checksum.Location = New System.Drawing.Point(6, 19) + Me.btCreateMD5Checksum.Name = "btCreateMD5Checksum" + Me.btCreateMD5Checksum.Size = New System.Drawing.Size(221, 23) + Me.btCreateMD5Checksum.TabIndex = 4 + Me.btCreateMD5Checksum.Text = "Create MD5 Checksum for PDF" + Me.btCreateMD5Checksum.UseVisualStyleBackColor = True + ' + 'GroupBox1 + ' + Me.GroupBox1.Controls.Add(Me.ButtonValidateXMLOnly) + Me.GroupBox1.Controls.Add(Me.btRunJob) + Me.GroupBox1.Location = New System.Drawing.Point(12, 12) + Me.GroupBox1.Name = "GroupBox1" + Me.GroupBox1.Size = New System.Drawing.Size(239, 75) + Me.GroupBox1.TabIndex = 7 + Me.GroupBox1.TabStop = False + Me.GroupBox1.Text = "Run Job like in eInvoice Service" + ' + 'ButtonValidateXMLOnly + ' + Me.ButtonValidateXMLOnly.Location = New System.Drawing.Point(6, 48) + Me.ButtonValidateXMLOnly.Name = "ButtonValidateXMLOnly" + Me.ButtonValidateXMLOnly.Size = New System.Drawing.Size(221, 23) + Me.ButtonValidateXMLOnly.TabIndex = 4 + Me.ButtonValidateXMLOnly.Text = "Run XML Job (spez. Configuration)" + Me.ButtonValidateXMLOnly.UseVisualStyleBackColor = True + ' + 'GroupBox2 + ' + Me.GroupBox2.Controls.Add(Me.btValidateSerializePDF) + Me.GroupBox2.Controls.Add(Me.btExtractPDFAttachments) + Me.GroupBox2.Controls.Add(Me.btValidateSerializeParseProps) + Me.GroupBox2.Location = New System.Drawing.Point(12, 94) + Me.GroupBox2.Name = "GroupBox2" + Me.GroupBox2.Size = New System.Drawing.Size(360, 109) + Me.GroupBox2.TabIndex = 8 + Me.GroupBox2.TabStop = False + Me.GroupBox2.Text = "Run Functions on a single file (needs Breakpoint)" + ' + 'btExtractPDFAttachments + ' + Me.btExtractPDFAttachments.Location = New System.Drawing.Point(6, 77) + Me.btExtractPDFAttachments.Name = "btExtractPDFAttachments" + Me.btExtractPDFAttachments.Size = New System.Drawing.Size(246, 23) + Me.btExtractPDFAttachments.TabIndex = 3 + Me.btExtractPDFAttachments.Text = "Extract PDF Attachments" + Me.btExtractPDFAttachments.UseVisualStyleBackColor = True + ' + 'GroupBox3 + ' + Me.GroupBox3.Controls.Add(Me.btCreateMD5Checksum) + Me.GroupBox3.Controls.Add(Me.txtMD5Checksum) + Me.GroupBox3.Location = New System.Drawing.Point(12, 209) + Me.GroupBox3.Name = "GroupBox3" + Me.GroupBox3.Size = New System.Drawing.Size(360, 85) + Me.GroupBox3.TabIndex = 9 + Me.GroupBox3.TabStop = False + Me.GroupBox3.Text = "Open PDF and calculate Checksum" + ' + 'txtMD5Checksum + ' + Me.txtMD5Checksum.Location = New System.Drawing.Point(6, 49) + Me.txtMD5Checksum.Name = "txtMD5Checksum" + Me.txtMD5Checksum.Size = New System.Drawing.Size(348, 20) + Me.txtMD5Checksum.TabIndex = 5 + ' + 'txtPropName + ' + Me.txtPropName.Location = New System.Drawing.Point(6, 48) + Me.txtPropName.Name = "txtPropName" + Me.txtPropName.Size = New System.Drawing.Size(348, 20) + Me.txtPropName.TabIndex = 10 + ' + 'GroupBox4 + ' + Me.GroupBox4.Controls.Add(Me.btFindExtractXMLValue) + Me.GroupBox4.Controls.Add(Me.txtPropName) + Me.GroupBox4.Location = New System.Drawing.Point(12, 300) + Me.GroupBox4.Name = "GroupBox4" + Me.GroupBox4.Size = New System.Drawing.Size(360, 76) + Me.GroupBox4.TabIndex = 11 + Me.GroupBox4.TabStop = False + Me.GroupBox4.Text = "GroupBox4" + ' + 'btFindExtractXMLValue + ' + Me.btFindExtractXMLValue.Location = New System.Drawing.Point(6, 19) + Me.btFindExtractXMLValue.Name = "btFindExtractXMLValue" + Me.btFindExtractXMLValue.Size = New System.Drawing.Size(221, 23) + Me.btFindExtractXMLValue.TabIndex = 11 + Me.btFindExtractXMLValue.Text = "Find and Extract XML Path Value" + Me.btFindExtractXMLValue.UseVisualStyleBackColor = True + ' + 'GroupBox5 + ' + Me.GroupBox5.Controls.Add(Me.btWriteBinary) + Me.GroupBox5.Location = New System.Drawing.Point(10, 383) + Me.GroupBox5.Name = "GroupBox5" + Me.GroupBox5.Size = New System.Drawing.Size(360, 57) + Me.GroupBox5.TabIndex = 12 + Me.GroupBox5.TabStop = False + Me.GroupBox5.Text = "GroupBox5" + ' + 'btWriteBinary + ' + Me.btWriteBinary.Location = New System.Drawing.Point(6, 19) + Me.btWriteBinary.Name = "btWriteBinary" + Me.btWriteBinary.Size = New System.Drawing.Size(221, 23) + Me.btWriteBinary.TabIndex = 11 + Me.btWriteBinary.Text = "Write Binary to PDF" + Me.btWriteBinary.UseVisualStyleBackColor = True + ' + 'OpenFileDialog2 + ' + Me.OpenFileDialog2.FileName = "OpenFileDialog2" + Me.OpenFileDialog2.Filter = "XML files (*.xml)|*.xml" + ' + 'Button1 + ' + Me.Button1.Location = New System.Drawing.Point(257, 31) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(115, 23) + Me.Button1.TabIndex = 13 + Me.Button1.Text = "Open Log" + Me.Button1.UseVisualStyleBackColor = True + ' + 'Form1 + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.ClientSize = New System.Drawing.Size(937, 448) + Me.Controls.Add(Me.Button1) + Me.Controls.Add(Me.GroupBox5) + Me.Controls.Add(Me.GroupBox4) + Me.Controls.Add(Me.GroupBox3) + Me.Controls.Add(Me.GroupBox2) + Me.Controls.Add(Me.GroupBox1) + Me.Controls.Add(Me.ListBox1) + Me.Name = "Form1" + Me.Text = "E-Invoice-TEST-Tool" + Me.GroupBox1.ResumeLayout(False) + Me.GroupBox2.ResumeLayout(False) + Me.GroupBox3.ResumeLayout(False) + Me.GroupBox3.PerformLayout() + Me.GroupBox4.ResumeLayout(False) + Me.GroupBox4.PerformLayout() + Me.GroupBox5.ResumeLayout(False) + Me.ResumeLayout(False) End Sub @@ -277,4 +265,5 @@ Partial Class Form1 Friend WithEvents btWriteBinary As Button Friend WithEvents ButtonValidateXMLOnly As Button Friend WithEvents OpenFileDialog2 As OpenFileDialog + Friend WithEvents Button1 As Button End Class diff --git a/GUIs.Test.ZUGFeRDTest/Form1.resx b/GUIs.Test.ZUGFeRDTest/Form1.resx index 6ab56a3c..df26c39c 100644 --- a/GUIs.Test.ZUGFeRDTest/Form1.resx +++ b/GUIs.Test.ZUGFeRDTest/Form1.resx @@ -1,17 +1,17 @@  - diff --git a/GUIs.Test.ZUGFeRDTest/Form1.vb b/GUIs.Test.ZUGFeRDTest/Form1.vb index 3678c190..a1b94f59 100644 --- a/GUIs.Test.ZUGFeRDTest/Form1.vb +++ b/GUIs.Test.ZUGFeRDTest/Form1.vb @@ -216,6 +216,12 @@ Public Class Form1 oResult = FolderBrowserDialog1.ShowDialog() oInputPath = FolderBrowserDialog1.SelectedPath End If + Dim xmlFiles = Directory.GetFiles(oInputPath, "*.xml") + Dim pdfFiles = Directory.GetFiles(oInputPath, "*.pdf") + If xmlFiles.Length = 0 AndAlso pdfFiles.Length = 0 Then + MessageBox.Show($"Keine XML- oder PDF-Dateien in {oInputPath} gefunden!") + Return + End If If oResult = DialogResult.OK Then Dim args As New WorkerArgs() With { @@ -238,6 +244,7 @@ Public Class Form1 Dim job As New ImportZUGFeRDFiles(_logConfig, _mssql) job.Start(args) + End If End Sub @@ -414,6 +421,10 @@ Public Class Form1 End Function + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + Process.Start("explorer.exe", _logConfig.LogDirectory) + End Sub + 'Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click ' Process.Start("explorer.exe", _logConfig.LogDirectory) 'End Sub diff --git a/GUIs.Test.ZUGFeRDTest/ZUGFeRDTest.vbproj b/GUIs.Test.ZUGFeRDTest/ZUGFeRDTest.vbproj index 45cf3ba9..8b3ddbb6 100644 --- a/GUIs.Test.ZUGFeRDTest/ZUGFeRDTest.vbproj +++ b/GUIs.Test.ZUGFeRDTest/ZUGFeRDTest.vbproj @@ -17,7 +17,7 @@ - + diff --git a/Services.ZUGFeRDService/DDZUGFeRDService.vbproj b/Services.ZUGFeRDService/DDZUGFeRDService.vbproj index eb36d078..15c2b124 100644 --- a/Services.ZUGFeRDService/DDZUGFeRDService.vbproj +++ b/Services.ZUGFeRDService/DDZUGFeRDService.vbproj @@ -60,8 +60,7 @@ False ..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll - - False + ..\..\DDModules\Interfaces\bin\Debug\DigitalData.Modules.Interfaces.dll diff --git a/Services.ZUGFeRDService/packages.config b/Services.ZUGFeRDService/packages.config index 37cb9210..ce98cd21 100644 --- a/Services.ZUGFeRDService/packages.config +++ b/Services.ZUGFeRDService/packages.config @@ -1,4 +1,4 @@  - + \ No newline at end of file