Rep Ventas y rep ventas detalles guardado de filtrado personalizado

Compras/ReembolsosComprobaciones.aspx.vb

@@ -413,11 +413,13 @@ Partial Class Compras_ReembolsosComprobaciones
 
                 Dim FechaFactura As Date = gvRowVal.DataKey("FechaCompra").ToDate
                 Dim FechaDocumento As Date
-                If DDlCheques.SelectedValue.ToEntero = -1 Then
+
+                If DDlCheques.SelectedValue.ToEntero = -1 And Not ChkReembolsarSinBancos.Checked Then
                     FechaDocumento = TxtFechaDocumento.Text.ToDate
                 Else
                     FechaDocumento = TxtFechaPrePoliza.Text.ToDate
                 End If
+
                 Dim AnioFactura As Integer = FechaFactura.Year
                 Dim MesFactura As Integer = FechaFactura.Month
                 Dim AnioDocumento As Integer = FechaDocumento.Year