jj 09.11 docgrid

app/DD-Record-Organiser/frmRecordView.vb

@@ -126,6 +126,10 @@ Public Class frmRecordView
         End Try
     End Sub
 
+    Private Sub OnCheckboxValueChanged(sender As Object, e As EventArgs)
+        'TODO Save Checkboxvalue
+    End Sub
+
     Private Sub RUN_WDSEARCH_GRID()
         Me.Cursor = Cursors.WaitCursor
         Try
@@ -155,7 +159,9 @@ Public Class frmRecordView
                         DT_DOCRESULT_DROPDOWN_ITEMS,
                         AddressOf OnCBSelectedValueChanged,
                         AddressOf OnDateSelectedValueChanged,
-                        AddressOf OnTextSelectedValueChanged, "RECORD")
+                        AddressOf OnTextSelectedValueChanged,
+                        AddressOf OnCheckboxValueChanged,
+                        "RECORD")
                 End If
             Else
                 Dim msg = "Keine Windream-Dokumente für Record: " & JUMP_RECORD_ID & " gefunden"