diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 4fcdc2a61..d9436f340 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -988,8 +988,8 @@ Partial Class Inventarios_EntradasSalidas
                 End If
 
             End If
-            If CveConcepto.Contiene(26, 27) Then
-                LnkAgregarProducto.Visible = False ' si es traspaso no se debe permitir agregar
+            If CveConcepto.Contiene(26, 27, 8, 9) Then
+                LnkAgregarProducto.Visible = False ' si es traspaso no se debe permitir agregar, ni entregas por adelantado
             End If
             If CveConcepto.Contiene(3, 8) Then
                 LiLnkGuias.Visible = True