ms

app/DD_PM_WINDREAM/frmMain.vb

@@ -408,11 +408,19 @@ Public Class frmMain
                 GridView_Docs.Columns.Item("ICON").MinWidth = 24
                 GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
                 GridView_Docs.Columns.Item("ICON").Fixed = FixedStyle.Left
-                GridView_Docs.Columns.Item("CONV_YN").Visible = False
-                GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
-                GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
-                'GridView_Docs.Columns.Item("CONVERSATION").AppearanceCell.BackColor = Color.White
-                GridView_Docs.Columns.Item("CONVERSATION").Fixed = FixedStyle.Left
+                Try
+                    GridView_Docs.Columns.Item("CONV_YN").Visible = False
+                Catch ex As Exception
+                    LOGGER.Warn("Check wether Column CONV_YN is part of select/view")
+                End Try
+                Try
+                    GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
+                    GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
+                    GridView_Docs.Columns.Item("CONVERSATION").Fixed = FixedStyle.Left
+                Catch ex As Exception
+                    LOGGER.Warn("Check wether Column CONVERSATION is part of select/view")
+                End Try
+
                 Try
                     GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
                     GridView_Docs.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
@@ -647,11 +655,16 @@ Public Class frmMain
                 End Select
             Next
             For Each oRow As DataRow In CURR_DT_OVERVIEW.Rows
-                Dim oCONVYN As Boolean = oRow.Item("CONV_YN")
-                Select Case oCONVYN
-                    Case True
-                        oRow.Item("CONVERSATION") = My.Resources.conversation
-                End Select
+                Try
+                    Dim oCONVYN As Boolean = oRow.Item("CONV_YN")
+                    Select Case oCONVYN
+                        Case True
+                            oRow.Item("CONVERSATION") = My.Resources.conversation
+                    End Select
+                Catch ex As Exception
+                    LOGGER.Warn($"Please check Your select/view Config - Column CONV_YN is missing [{ex.Message}]")
+                End Try
+
             Next
             bindsourcegrid.DataSource = CURR_DT_OVERVIEW
             GridControl_Docs.DataSource = bindsourcegrid
@@ -669,12 +682,19 @@ Public Class frmMain
             GridView_Docs.Columns.Item("ICON").MinWidth = 24
             GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
             GridView_Docs.Columns.Item("ICON").Fixed = FixedStyle.Left
+            Try
+                GridView_Docs.Columns.Item("CONV_YN").Visible = False
+            Catch ex As Exception
+                LOGGER.Warn("Check wether Column CONV_YN is part of select/view")
+            End Try
+            Try
+                GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
+                GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
+                GridView_Docs.Columns.Item("CONVERSATION").Fixed = FixedStyle.Left
+            Catch ex As Exception
+                LOGGER.Warn("Check wether Column CONVERSATION is part of select/view")
+            End Try
 
-            GridView_Docs.Columns.Item("CONV_YN").Visible = False
-            GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
-            GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
-            'GridView_Docs.Columns.Item("CONVERSATION").AppearanceCell.BackColor = Color.White
-            GridView_Docs.Columns.Item("CONVERSATION").Fixed = FixedStyle.Left
             ' GridView_Docs.OptionsView.ShowIndicator = False
             Try
                 GridView_Docs.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
@@ -939,7 +959,7 @@ Public Class frmMain
                 NotifyIcon1.ShowBalloonTip(30000, $"Reminder {ADDITIONAL_TITLE}", oMessage, ToolTipIcon.Info)
             End If
         Catch ex As Exception
-            LOGGER.Warn($"Error TimerReminder:  {ex.Message}")
+            LOGGER.Warn($"Unexpected errin in TimerReminder:  {ex.Message}")
         End Try
 
     End Sub
@@ -1137,6 +1157,7 @@ Public Class frmMain
                     CURRENT_JUMP_DOC_GUID = 0
                     CURRENT_DOC_GUID = 0
                     CURRENT_ProfilGUID = oHitProfilID
+                    LOGGER.Debug($"Item_Scope: hitInfo.InGroupRow...oHitProfilID [{oHitProfilID}]")
 
 
                     Load_Profil_from_Grid(oHitProfilID)
@@ -1451,12 +1472,17 @@ Public Class frmMain
                     CURR_DT_OVERVIEW.Columns.Add(columnConvIcon)
                 End If
                 For Each oRow As DataRow In CURR_DT_OVERVIEW.Rows
-                    Dim oCONVYN As Boolean = oRow.Item("CONV_YN")
-                    Select Case oCONVYN
-                        Case True
-                            '        RedDocuments += 1
-                            oRow.Item("CONVERSATION") = My.Resources.conversation
-                    End Select
+                    Try
+                        Dim oCONVYN As Boolean = oRow.Item("CONV_YN")
+                        Select Case oCONVYN
+                            Case True
+                                '        RedDocuments += 1
+                                oRow.Item("CONVERSATION") = My.Resources.conversation
+                        End Select
+                    Catch ex As Exception
+                        LOGGER.Warn("Check wether Column CONVERSATION is part of select/view")
+                    End Try
+
                 Next
 
                 bindsourcegrid.DataSource = CURR_DT_OVERVIEW
@@ -1520,11 +1546,19 @@ Public Class frmMain
                     GridView_Docs.Columns.Item("ICON").MinWidth = 24
                     GridView_Docs.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
                     GridView_Docs.Columns.Item("ICON").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left
-                    GridView_Docs.Columns.Item("CONV_YN").Visible = False
-                    GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
-                    GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
-                    'GridView_Docs.Columns.Item("CONVERSATION").AppearanceCell.BackColor = Color.White
-                    GridView_Docs.Columns.Item("CONVERSATION").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left
+                    Try
+                        GridView_Docs.Columns.Item("CONV_YN").Visible = False
+                    Catch ex As Exception
+                        LOGGER.Warn("LoadGridOverview - Check wether Column CONV_YN is part of select/view")
+                    End Try
+                    Try
+                        GridView_Docs.Columns.Item("CONVERSATION").MaxWidth = 24
+                        GridView_Docs.Columns.Item("CONVERSATION").MinWidth = 24
+                        GridView_Docs.Columns.Item("CONVERSATION").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left
+                    Catch ex As Exception
+                        LOGGER.Warn("LoadGridOverview - Check wether Column CONVERSATION is part of select/view")
+                    End Try
+
                     'GridView_Docs.OptionsView.ShowIndicator = False
                     LOGGER.Debug(" GridView_Docs.Columns loaded...")
                     Try