MS

GUIs.Test.ZUGFeRDTest/Form1.vb

@@ -66,6 +66,7 @@ Public Class Form1
         For Each oRow As DataRow In oResult.Rows
             Dim xmlPath = oRow.Item("XML_PATH")
             Dim tableName = oRow.Item("TABLE_NAME")
+            Dim tableColumn = oRow.Item("TABLE_COLUMN")
             Dim description = oRow.Item("DESCRIPTION")
             Dim isRequired = oRow.Item("IS_REQUIRED")
             Dim isGrouped = oRow.Item("IS_GROUPED")
@@ -74,6 +75,7 @@ Public Class Form1
             Args.PropertyMap.Add(xmlPath, New XmlItemProperty() With {
                 .Description = description,
                 .TableName = tableName,
+                .TableColumn = tableColumn,
                 .IsRequired = isRequired,
                 .IsGrouped = isGrouped,
                 .GroupScope = groupScope