diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb
index b3a35cb8a..684a7cc16 100644
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -458,7 +458,7 @@ Partial Class ProductosyServicios
             DivCitricos.Visible = True
             CargaPanelCitricos()
         End If
-        If UsuarioActual.CveEmpresa = 119 Then
+        If UsuarioActual.CveEmpresa.Contiene(119, 194) Then
             DiveCommerce.Visible = True
             Dim CveCategoria2 As Integer = GlobalDTGralCategorias2(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveCategoria", "Categoria = 'Ecommerce'").ToEntero
             DdlEcommerceClasificacion.DataSource = GlobalDTClasificaciones2(UsuarioActual.CveEmpresa, CveCategoria2)