MS

app/DD_PM_WINDREAM/frmMain.vb

@@ -588,11 +588,16 @@ Public Class frmMain
         End Try
     End Function
     Sub Layout_Single_Profile()
-        If GridControl_Docs.Visible = False Then
-            BindingNavigator1.Visible = True
-            BindingNavigator1.Dock = DockStyle.Top
-            GridControl_Docs.Visible = True
-        End If
+        Try
+            If GridControl_Docs.Visible = False Then
+                BindingNavigator1.Visible = True
+                BindingNavigator1.Dock = DockStyle.Top
+                GridControl_Docs.Visible = True
+            End If
+        Catch ex As Exception
+            LOGGER.Error(ex)
+        End Try
+
     End Sub
 
 
@@ -1652,8 +1657,9 @@ Public Class frmMain
             Else
                 NO_WORKFLOWITEMS = True
                 GridControl_Docs.Visible = False
+                'BindingNavigator1.Dock = DockStyle.None
                 BindingNavigator1.Visible = False
-                BindingNavigator1.Dock = DockStyle.None
+
                 GridControl_Docs.DataSource = Nothing
                 tslblObjectCount.Text = "No objects"
 
@@ -1709,7 +1715,7 @@ Public Class frmMain
             End If
             Dim info As GridGroupRowInfo = TryCast(e.Info, GridGroupRowInfo)
             Dim view As GridView = sender
-            Dim item As GridGroupSummaryItem = CType(view.GroupSummary(Tag), GridGroupSummaryItem)
+            Dim oGroupItem As GridGroupSummaryItem = CType(view.GroupSummary(Tag), GridGroupSummaryItem)
             ' Dim value As Object = view.GetGroupSummaryValue(e.RowHandle, item)
 
             If info.Column.FieldName = "GROUP_TEXT" Then