Ventas Tabs enter, venta rapida se agrega 189

Ventas/Ventas.aspx.vb

@@ -3447,7 +3447,7 @@ Partial Class Ventas
         End If
 
 
-        If UsuarioActual.CveEmpresa = 186 Then
+        If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
             Dim jsFocus As String = "$(document).ready(function () {
                                         
                                          $('#TxtCantidad').on('keydown', function (e) {                                            
@@ -6908,7 +6908,12 @@ Partial Class Ventas
             HabilitarRemisionesPublicoGeneral()
         End If
 
-        TxtCantidad.Focus()
+
+        If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
+            TxtCantidad.Focus()
+        End If
+
+
         'If UsuarioActual.Empresa.Funcionalidad(705) = "1" Then
         '    Using ObjVentas As New ClsVentas
         '        If ObjVentas.GetLineasAdicionales(-1, CveCliente, -1, -1, DdlMoneda.SelectedValue.ToEntero(), MinFecha, MaxFecha, 0, UsuarioActual.CveEmpresa) Then
@@ -16867,7 +16872,7 @@ Partial Class Ventas
         End If
 
 
-        If UsuarioActual.CveEmpresa = 186 Then
+        If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
             TxtPrecio.Focus()
         End If
 
@@ -18108,7 +18113,7 @@ Partial Class Ventas
                 End If
             End If
 
-            If UsuarioActual.CveEmpresa = 186 Then
+            If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
                 TxtCantidad.Focus()
             End If