AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Modules.Jobs & Modules.Interface - Spezifikation abschaltbar machen + Debug-logs

Browse Source
This commit is contained in:
PitzM
2026-10-19 10:47:44 +02:00
parent 9bd970c339
commit 1806e3c696
2 changed files with 17 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Interfaces/ZUGFeRDInterface.vb
View File

@@ -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

6
Jobs/ZUGFeRD/WorkerArgs.vb
View File

@@ -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