wip

ImporterShared/Winline/Entities/Account.vb

@@ -0,0 +1,19 @@
+Namespace Winline
+    Public Class Account
+        Public Property Id As String
+        Public Property Name 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