diff --git a/Ventas/ActualizarPrecios.aspx.vb b/Ventas/ActualizarPrecios.aspx.vb
index f16c9c9df..56c8fb0dc 100644
--- a/Ventas/ActualizarPrecios.aspx.vb
+++ b/Ventas/ActualizarPrecios.aspx.vb
@@ -93,7 +93,7 @@ Partial Class Ventas_ActualizarPrecios
                 LblModalidad.Visible = True
                 DivModalidad.Visible = True
             End If
-            If UsuarioActual.CveEmpresa.Contiene(189, 190, 192) Then
+            If UsuarioActual.CveEmpresa.Contiene(189, 190, 192, 193) Then
                 LblModalidad.Visible = True
                 DivModalidad.Visible = True
             End If