MS Init Design

app/DD-Record-Organizer/Classes/ClassInit.vb

@@ -341,6 +341,7 @@ WHERE (USERNAME = '{0}') AND T2.SHORT_NAME = 'ADDI'", USER_USERNAME)
                         If WM_READ_ONLY = True Then
                             If SHARE_DRIVE_ACTIVE = True Then
                                 LOGGER.Info($"SHAREDRIVE IS ACTIVE = {SHARE_DRIVE_ACTIVE.ToString}")
+                                WM_READ_ONLY = True
                             End If
 
                         Else

app/DD-Record-Organizer/ModuleMySettings.vb

@@ -56,6 +56,7 @@ Module ModuleMySettings
 
     Public DT_CLIENT_USER As DataTable
     Public CLIENT_SELECTED As Integer = 99
+
     'Public USER_CLIENTS_COMMA_SEPERATED As String
     Public FWSCAN_started As Boolean = False