add forms, prepare webservices call

WinLineArtikelnummerGenerator/Models/ProductGroup.vb

@@ -1,9 +1,18 @@
 Public Class ProductGroup
-    Public Property Id As Integer
-    Public Property Vendor As String
+    Public Property Guid As Integer
+    Public Property GroupId As Integer
+    Public Property Code As String
     Public Property Name As String
 
+    Public ReadOnly Property GroupString As String
+        Get
+            Return GroupId.ToString.PadLeft(2, "0")
+        End Get
+    End Property
+
     Public Overrides Function ToString() As String
-        Return $"{Id.ToString.PadLeft(2, "0")} - {Name}"
+        Return $"{GroupId.ToString.PadLeft(2, "0")} - {Name}"
     End Function
+
+
 End Class

WinLineArtikelnummerGenerator/Models/ProductVersion.vb

@@ -1,9 +1,17 @@
 Public Class ProductVersion
-    Public Property Id As Integer
+    Public Property Guid As Integer
+    Public Property Code As String
+    Public Property GroupId As Integer
+    Public Property VersionId As Integer
     Public Property Name As String
-    Public Property Part As Integer
+
+    Public ReadOnly Property VersionString As String
+        Get
+            Return VersionId.ToString.PadLeft(2, "0")
+        End Get
+    End Property
 
     Public Overrides Function ToString() As String
-        Return $"{Id.ToString.PadLeft(2, "0")} - {Name}"
+        Return $"{VersionId.ToString.PadLeft(2, "0")} - {Name}"
     End Function
 End Class

WinLineArtikelnummerGenerator/Models/Vendor.vb

@@ -1,8 +1,11 @@
 Public Class Vendor
+    Public Property Guid As Integer
     Public Property Code As String
     Public Property Name As String
+    Public Property WinlineName As String
+    Public Property WinlineNumber As String
 
     Public Overrides Function ToString() As String
-        Return $"{Code} - {Name}"
+        Return $"{Code} - {Name} ({WinlineNumber.Trim} | {WinlineName.Trim})"
     End Function
 End Class