From c74b778227262bb63918a01aa88839c582d52715 Mon Sep 17 00:00:00 2001
From: Developer01 <developer01@didaloghe.onmicrosoft.com>
Date: Thu, 10 Apr 2025 22:28:58 +0200
Subject: [PATCH] MS PRopertyValues Interfaces

---
 Interfaces/ZUGFeRDInterface/PropertyValues.vb | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/Interfaces/ZUGFeRDInterface/PropertyValues.vb b/Interfaces/ZUGFeRDInterface/PropertyValues.vb
index f5c98981..c9a9c29b 100644
--- a/Interfaces/ZUGFeRDInterface/PropertyValues.vb
+++ b/Interfaces/ZUGFeRDInterface/PropertyValues.vb
@@ -83,7 +83,9 @@ Public Class PropertyValues
                     _logger.Error(ex)
                     oPropertyValues = New List(Of Object)
                 End Try
-
+                If oRowCount = 0 Then '08.04.2025 MS Added as Workaround for Positions Or oGroupScope = "POSITIONS" !
+                    oRowCount = oPropertyValues.Count
+                End If
                 ' Flatten result value
                 oPropertyValues = GetFinalPropValue(oPropertyValues)
 
@@ -91,9 +93,7 @@ Public Class PropertyValues
                 oPropertyList.Add(oProperty.Value, oPropertyValues)
 
                 ' check the first batch of values to determine the row count
-                If oRowCount = 0 Or oGroupScope = "POSITIONS" Then '08.04.2025 MS Added as Workaround for Positions!
-                    oRowCount = oPropertyValues.Count
-                End If
+
             Next
 
             ' Structure of oPropertyList