From 7e9ed47ad9432b7db29bec6214c6dcb799bbdc6b Mon Sep 17 00:00:00 2001 From: pitzm Date: Tue, 25 Feb 2025 10:47:14 +0100 Subject: [PATCH 1/4] =?UTF-8?q?Modules.Interfaces:=20Leere=20Knoten=20k?= =?UTF-8?q?=C3=B6nnen=20zu=20einer=20Exception=20f=C3=BChren.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Interfaces/ZUGFeRDInterface/PropertyValues.vb | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/Interfaces/ZUGFeRDInterface/PropertyValues.vb b/Interfaces/ZUGFeRDInterface/PropertyValues.vb index 4644afb4..ddeaa844 100644 --- a/Interfaces/ZUGFeRDInterface/PropertyValues.vb +++ b/Interfaces/ZUGFeRDInterface/PropertyValues.vb @@ -343,7 +343,12 @@ Public Class PropertyValues Return DoGetFinalPropValue(Value) Else - Return Value.ToString + If Value = Nothing Then + Return Nothing + Else + Return Value.ToString + End If + End If End Function From 35d80212785b382afc4ca38473df7636e9ccaa39 Mon Sep 17 00:00:00 2001 From: pitzm Date: Tue, 25 Feb 2025 10:48:25 +0100 Subject: [PATCH 2/4] Modules.Interfaces: version 2.2.4.0 --- Interfaces/My Project/AssemblyInfo.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Interfaces/My Project/AssemblyInfo.vb b/Interfaces/My Project/AssemblyInfo.vb index dfb81214..b45f8941 100644 --- a/Interfaces/My Project/AssemblyInfo.vb +++ b/Interfaces/My Project/AssemblyInfo.vb @@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices - + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + From 32f87e25f554b7272323a9ea374a103d014ea056 Mon Sep 17 00:00:00 2001 From: pitzm Date: Tue, 25 Feb 2025 13:46:58 +0100 Subject: [PATCH 3/4] Modules.Interfaces: PropertyValue kann NULL sein, wenn der Knoten leer ist, aber Nothing (vb) ist nicht gleich NULL (c#) --- Interfaces/ZUGFeRDInterface/PropertyValues.vb | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Interfaces/ZUGFeRDInterface/PropertyValues.vb b/Interfaces/ZUGFeRDInterface/PropertyValues.vb index ddeaa844..e5402117 100644 --- a/Interfaces/ZUGFeRDInterface/PropertyValues.vb +++ b/Interfaces/ZUGFeRDInterface/PropertyValues.vb @@ -343,8 +343,9 @@ Public Class PropertyValues Return DoGetFinalPropValue(Value) Else - If Value = Nothing Then - Return Nothing + ' Nothing kann auch der Default-Wert der Variablen bedeuten. Also auch 0.00 + If IsNothing(Value) Then + Return String.Empty Else Return Value.ToString End If From 4ab924907ae5b3d1dd72b2bdd781c2723695b9c4 Mon Sep 17 00:00:00 2001 From: pitzm Date: Tue, 25 Feb 2025 13:49:07 +0100 Subject: [PATCH 4/4] Modules.Interfaces: Version 2.2.5.0 --- Interfaces/My Project/AssemblyInfo.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Interfaces/My Project/AssemblyInfo.vb b/Interfaces/My Project/AssemblyInfo.vb index b45f8941..461ce58c 100644 --- a/Interfaces/My Project/AssemblyInfo.vb +++ b/Interfaces/My Project/AssemblyInfo.vb @@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices - + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + +