Validation, More Lookup Grid Control Tweaks

app/DD_PM_WINDREAM/frmValidator.vb

@@ -3665,23 +3665,36 @@ Public Class frmValidator
         btnSave.Enabled = False
 
         ' TODO: Use when working on Validation
-        'Dim oGrids = (From oControl In pnldesigner.Controls
-        '              Where TypeOf oControl Is GridControl
-        '              Select oControl).ToList()
+        Dim oValidation As Boolean = True
+        Dim oGrids = (From oControl In pnldesigner.Controls
+                      Where TypeOf oControl Is GridControl
+                      Select oControl).ToList()
 
-        'For Each oGrid As GridControl In oGrids
-        '    Dim oView As GridView = oGrid.MainView
+        For Each oGrid As GridControl In oGrids
+            Dim oView As GridView = oGrid.MainView
 
-        '    For index = 0 To oView.RowCount - 1
-        '        oView.FocusedRowHandle = index
-        '        oView.UpdateCurrentRow()
-        '    Next
+            If oView.RowCount = 0 Then
+                Continue For
+            End If
 
-        'Next
+            For index = 0 To oView.RowCount - 1
+                oView.FocusedRowHandle = index
 
-        'Return
+                If oView.UpdateCurrentRow() = False Then
+                    oValidation = False
+                    Exit For
+                End If
+            Next
+
+            If oValidation = False Then
+                Exit For
+            End If
+        Next
+
+        If oValidation = True Then
+            Finish_WFStep()
+        End If
 
-        Finish_WFStep()
         btnSave.Enabled = True
     End Sub
     Private Function btnFinish_continue()