From c93c270e89ff285d30254b6d297fa44b89e929d7 Mon Sep 17 00:00:00 2001
From: Jonathan Jenne <j.jenne@didalog.de>
Date: Fri, 1 Feb 2019 11:07:21 +0100
Subject: [PATCH] jj: licensestate

---
 EDMI_ClientSuite/State/LicenseState.vb | 26 ++++++++++++++++++++++----
 EDMI_ClientSuite/State/ModuleState.vb  |  7 -------
 2 files changed, 22 insertions(+), 11 deletions(-)
 delete mode 100644 EDMI_ClientSuite/State/ModuleState.vb

diff --git a/EDMI_ClientSuite/State/LicenseState.vb b/EDMI_ClientSuite/State/LicenseState.vb
index 0e830809..f96b306d 100644
--- a/EDMI_ClientSuite/State/LicenseState.vb
+++ b/EDMI_ClientSuite/State/LicenseState.vb
@@ -1,7 +1,25 @@
 Public Class LicenseState
-    Public Modules As List(Of ModuleState)
+    Public Modules As List(Of LicenseModule)
+End Class
+
+Public Class LicenseModule
+    Public Name As String
+    Public ValidUntil As Date
+    Public Users As List(Of LicenseUser)
+End Class
 
-    Public Sub New()
-        Modules = New List(Of ModuleState)
-    End Sub
+Public Class LicenseUser
+    Public Type As UserType
+    Public Count As Integer
+    Public Test As Boolean
+    Public ValidUntil As Date
 End Class
+
+Public Enum UserType
+    PowerUser
+    [ReadOnly]
+    [WriteOnly]
+    ReadWrite
+End Enum
+
+
diff --git a/EDMI_ClientSuite/State/ModuleState.vb b/EDMI_ClientSuite/State/ModuleState.vb
deleted file mode 100644
index b7d16406..00000000
--- a/EDMI_ClientSuite/State/ModuleState.vb
+++ /dev/null
@@ -1,7 +0,0 @@
-Public Class ModuleState
-    Public Name As String
-
-    Public Sub New(Name As String)
-        Me.Name = Name
-    End Sub
-End Class