diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index e706f9aca..dcd7ee0ba 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -1752,7 +1752,7 @@ Partial Class Clientes
                 TxtExtOtro.Text = ObjClientes.ExtOtros
 
 
-                If UsuarioActual.CveEmpresa.Contiene(119, 4, 7, 11, 12, 122, 145) Then
+                If UsuarioActual.CveEmpresa.Contiene(4, 7, 11, 12, 122, 145) Then
 
                     If ObjClientes.IdCtaContClientes > 0 Then DdlCtaContableClientes.Items.Add(New ListItem(NombreCuenta(ObjClientes.IdCtaContClientes), ObjClientes.IdCtaContClientes.ToString())) : DdlCtaContableClientes.SelectedValue = ObjClientes.IdCtaContClientes.ToString()
                     If ObjClientes.IdCtaContAnticipos > 0 Then