diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 055ef4dc0..0867898eb 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -14661,7 +14661,7 @@ Partial Class Compras_Compras
             If UsuarioActual.Empresa.UsaInventarios And UsuarioActual.Empresa.Funcionalidad(131).ToEntero > 0 And Not UsuarioActual.Empresa.Funcionalidad(153).ToEntero > 0 Then
                 Select Case DdlOCVinculaInv.SelectedValue.ToEntero
                     Case 176
-                        DTOCGV = DTOCGV.FiltraParametros("(EstatusInventario IN (3,5) AND CveTipoPS = 2) OR CveTipoPS = 1")
+                        DTOCGV = DTOCGV.FiltraParametros("((EstatusInventario IN (3,5) AND CveTipoPS = 2) OR CveTipoPS = 1) AND CantidadPorAdelantado > 0")
                     Case 205
                         DTOCGV = DTOCGV.FiltraParametros("(EstatusInventario IN (1,2) AND CveTipoPS = 2) OR CveTipoPS = 1")
                 End Select