diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 0b4359a64..3079f5ad9 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -22490,23 +22490,23 @@ Partial Class Ventas
             End If
 
             'VERIFICA QUE LAS FACTURAS TENGAN EL MISMO ESTATUS EN ALMACEN (NO MEZCLAR REMISIONES 'SURTIDAS' CON 'NO SURTIDAS')
-            If dtSeleccionadas.COUNT("Surtido", "Surtido = 'Si'") > 0 AndAlso dtSeleccionadas.COUNT("Surtido", "Surtido = 'No'") > 0 Then
-                Dim SbRem As New StringBuilder
-                SbRem.Append("Solo debe seleccionar remisiones con el mismo estatus de almacen. Por favor verifique y vuelva a intentar.</br>")
+            'If dtSeleccionadas.COUNT("Surtido", "Surtido = 'Si'") > 0 AndAlso dtSeleccionadas.COUNT("Surtido", "Surtido = 'No'") > 0 Then
+            '    Dim SbRem As New StringBuilder
+            '    SbRem.Append("Solo debe seleccionar remisiones con el mismo estatus de almacen. Por favor verifique y vuelva a intentar.</br>")
 
-                SbRem.Append("<b>Remisiones Surtidas:</b></br>")
-                For Each RowSurtida As DataRow In dtSeleccionadas.FiltraParametros("Surtido = 'Si'", DistinctColumns:={"Folio"}).Rows
-                    SbRem.AppendFormat("{0}</br>", RowSurtida("Folio"))
-                Next
+            '    SbRem.Append("<b>Remisiones Surtidas:</b></br>")
+            '    For Each RowSurtida As DataRow In dtSeleccionadas.FiltraParametros("Surtido = 'Si'", DistinctColumns:={"Folio"}).Rows
+            '        SbRem.AppendFormat("{0}</br>", RowSurtida("Folio"))
+            '    Next
 
-                SbRem.Append("<b>Remisiones No Surtidas:</b></br>")
-                For Each RowSurtida As DataRow In dtSeleccionadas.FiltraParametros("Surtido = 'No'", DistinctColumns:={"Folio"}).Rows
-                    SbRem.AppendFormat("{0}</br>", RowSurtida("Folio"))
-                Next
+            '    SbRem.Append("<b>Remisiones No Surtidas:</b></br>")
+            '    For Each RowSurtida As DataRow In dtSeleccionadas.FiltraParametros("Surtido = 'No'", DistinctColumns:={"Folio"}).Rows
+            '        SbRem.AppendFormat("{0}</br>", RowSurtida("Folio"))
+            '    Next
 
-                Alert(SbRem.ToString(), TipoMensaje.MsgAdvertencia)
-                Exit Sub
-            End If
+            '    Alert(SbRem.ToString(), TipoMensaje.MsgAdvertencia)
+            '    Exit Sub
+            'End If
 
             DdlMoneda.SelectedValue = GlobalDTMonedas.FiltroPrimeroValor("CveMoneda", $"Abreviatura = '{dtSeleccionadas.FiltroPrimeroValor("Abreviatura")}'")
             DdlMoneda.Enabled = False