MS

app/DD_PM_WINDREAM/frmMain.vb

@@ -647,7 +647,13 @@ Public Class frmMain
                         row.Item("ICON") = My.Resources.ampel_gruen
                 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
+            Next
             bindsourcegrid.DataSource = CURR_DT_OVERVIEW
             GridControl_Docs.DataSource = bindsourcegrid
 
@@ -1448,12 +1454,12 @@ Public Class frmMain
                     columnConvIcon.Caption = ""
                     CURR_DT_OVERVIEW.Columns.Add(columnConvIcon)
                 End If
-                For Each row As DataRow In CURR_DT_OVERVIEW.Rows
-                    Dim oCONVYN As Boolean = row.Item("CONV_YN")
+                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
-                            row.Item("CONVERSATION") = My.Resources.conversation
+                            oRow.Item("CONVERSATION") = My.Resources.conversation
                     End Select
                 Next