ms

app/DD_PM_WINDREAM/ClassInit.vb

@@ -297,6 +297,11 @@ Public Class ClassInit
             Dim oStopWatch As New RefreshHelper.SW("InitBasics2")
             Dim oSql = String.Format("SELECT * FROM VWPM_PROFILE_USER WHERE USER_ID = {0}", USER_ID)
             BASEDATA_DT_VW_PROFILE_USER = ClassDatabase.Return_Datatable(oSql, "InitBasics2_1")
+            If BASEDATA_DT_VW_PROFILE_USER.Rows.Count = 0 Then
+                LOGGER.Warn($"no profiles for user: '{USER_USERNAME}' configured - Check SQL [{oSql}]!", False)
+            End If
+
+
             oStopWatch.Done()
         Catch ex As Exception
             LOGGER.Error(ex)