Change Name to MultiTool

MultiTool.Shared/Winline/Entities/Account.vb

@@ -0,0 +1,24 @@
+Namespace Winline
+    Public Class Account
+        Public Property Id As String
+        Public Property Name As String
+
+        Public Property StreetName As String
+        Public Property CityName As String
+        Public Property ZipCode As String
+
+        Public Property Mandator As String
+
+        Public Overrides Function GetHashCode() As Integer
+            Return Id.GetHashCode()
+        End Function
+
+        Public Overrides Function Equals(obj As Object) As Boolean
+            Return DirectCast(obj, Account).Id = Id
+        End Function
+
+        Public Overrides Function ToString() As String
+            Return $"{Name} ({Id})"
+        End Function
+    End Class
+End Namespace

MultiTool.Shared/Winline/Entities/Contact.vb

@@ -0,0 +1,12 @@
+Namespace Winline
+    Public Class Contact
+        Public Property Id As Integer
+        Public Property Number As String
+        Public Property Name As String
+
+        Public Overrides Function ToString() As String
+            Return Name
+        End Function
+    End Class
+
+End Namespace

MultiTool.Shared/Winline/Entities/DocumentKind.vb

@@ -0,0 +1,19 @@
+Namespace Winline
+    Public Class DocumentKind
+        Public Id As Integer
+        Public Name As String
+        Public Mandator As String
+
+        Public Overrides Function GetHashCode() As Integer
+            Return Id.GetHashCode()
+        End Function
+
+        Public Overrides Function Equals(obj As Object) As Boolean
+            Return DirectCast(obj, DocumentKind).Id = Id
+        End Function
+
+        Public Overrides Function ToString() As String
+            Return $"{Name} ({Id})"
+        End Function
+    End Class
+End Namespace

MultiTool.Shared/Winline/Entities/Mandator.vb

@@ -0,0 +1,23 @@
+Namespace Winline
+    Public Class Mandator
+        Public Property Id As String
+        Public Property Name As String
+        Public Property Database As String
+        Public Property Server As String
+        Public Property Regex As String
+        Public Property Order As Integer
+        Public Property IsWhitelisted As Boolean
+
+        Public Overrides Function GetHashCode() As Integer
+            Return Id.GetHashCode()
+        End Function
+
+        Public Overrides Function Equals(obj As Object) As Boolean
+            Return DirectCast(obj, Mandator).Id = Id
+        End Function
+
+        Public Overrides Function ToString() As String
+            Return $"{Name} ({Id})"
+        End Function
+    End Class
+End Namespace

MultiTool.Shared/Winline/Entities/TemplateColumn.vb

@@ -0,0 +1,13 @@
+Namespace Winline
+    Public Class TemplateColumn
+        Public Name As String
+        Public Root As String
+        Public Type As String
+        Public IsHead As Boolean
+        Public Template As String
+        Public [ReadOnly] As Boolean
+        Public Visible As Boolean
+        Public [Function] As Constants.XmlFunction
+    End Class
+
+End Namespace