diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 983c7cbdc..83868a810 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -23198,7 +23198,7 @@ Partial Class Ventas
         If CveMovimientoInventario > 0 Then
 
             'Agregamos los detalles
-            For Each MovDet As DataRow In DtMovDetalle.Rows
+            For Each MovDet As DataRow In DtMovDetalle.FiltraParametros("CantidadDisponible > 0").Rows
 
                 Dim Cantidad As Decimal = 0
                 Dim CantidadRemision As Decimal = DtRemisionesTmpDT.FiltroPrimeroValor("Cantidad", $"CveVentaDetalleRemision={MovDet("CveVentaDetalle").ToString()}").ToDecimal