From 1806e3c696c32e5a2c88e30ee27e676c25cf035d Mon Sep 17 00:00:00 2001 From: pitzm Date: Mon, 19 Oct 2026 10:47:44 +0200 Subject: [PATCH] Modules.Jobs & Modules.Interface - Spezifikation abschaltbar machen + Debug-logs --- Interfaces/ZUGFeRDInterface.vb | 17 ++++++++++++++--- Jobs/ZUGFeRD/WorkerArgs.vb | 6 +++--- 2 files changed, 17 insertions(+), 6 deletions(-) diff --git a/Interfaces/ZUGFeRDInterface.vb b/Interfaces/ZUGFeRDInterface.vb index 15dfa1e6..d15165a6 100644 --- a/Interfaces/ZUGFeRDInterface.vb +++ b/Interfaces/ZUGFeRDInterface.vb @@ -68,9 +68,9 @@ Public Class ZUGFeRDInterface Public Class ZugferdOptions Public Property AllowFacturX_Filename As Boolean = True Public Property AllowXRechnung_Filename As Boolean = True - Public Property AllowZugferd_1_0_Schema As Boolean = True - Public Property AllowZugferd_2_x_Schema As Boolean = True - Public Property AllowZugferd_2_3_x_Schema As Boolean = True + Public Property AllowZugferd_1_0_Schema As Boolean = False + Public Property AllowZugferd_2_x_Schema As Boolean = False + Public Property AllowZugferd_2_3_x_Schema As Boolean = False Public Property AllowPeppol_3_x_Schema As Boolean = False Public Property AllowEBInterface_Schema As Boolean = False End Class @@ -111,6 +111,7 @@ Public Class ZUGFeRDInterface _Options = New ZugferdOptions() Else _Options = pOptions + LogSpecificationOptions(_Options) End If ApplyFilenameOptions(_Options) @@ -127,6 +128,16 @@ Public Class ZUGFeRDInterface End Try End Sub + Private Sub LogSpecificationOptions(options As ZugferdOptions) + _logger.Debug("AllowFacturX_Filename has Value [{0}]",options.AllowFacturX_Filename) + _logger.Debug("AllowXRechnung_Filename has Value [{0}]",options.AllowXRechnung_Filename) + _logger.Debug("AllowZugferd_1_0_Schema has Value [{0}]",options.AllowZugferd_1_0_Schema) + _logger.Debug("AllowZugferd_2_x_Schema has Value [{0}]",options.AllowZugferd_2_x_Schema) + _logger.Debug("AllowZugferd_2_3_x_Schema has Value [{0}]",options.AllowZugferd_2_3_x_Schema) + _logger.Debug("AllowPeppol_3_x_Schema has Value [{0}]",options.AllowPeppol_3_x_Schema) + _logger.Debug("AllowEBInterface_Schema has Value [{0}]", options.AllowEBInterface_Schema) + End Sub + Private Sub ApplyFilenameOptions(pOptions As ZugferdOptions) Dim oAllowedFilenames As List(Of String) = ValidFilenames diff --git a/Jobs/ZUGFeRD/WorkerArgs.vb b/Jobs/ZUGFeRD/WorkerArgs.vb index 9dd6fc82..91ac05c7 100644 --- a/Jobs/ZUGFeRD/WorkerArgs.vb +++ b/Jobs/ZUGFeRD/WorkerArgs.vb @@ -29,9 +29,9 @@ Public Class WorkerArgs ' Feature Flags Public AllowFacturX As Boolean = True Public AllowXRechnung As Boolean = True - Public AllowZugferd10 As Boolean = True - Public AllowZugferd2x As Boolean = True - Public AllowZugferd23x As Boolean = True + Public AllowZugferd10 As Boolean = False + Public AllowZugferd2x As Boolean = False + Public AllowZugferd23x As Boolean = False Public AllowPeppolBISBill3x As Boolean = False Public AllowEBInterface As Boolean = False