Merge branch 'master' of http://192.168.10.111:8383/SIG

OS/RepOSMedicas.aspx

@@ -133,7 +133,7 @@
                                                 </asp:DropDownList>
                              </div>
 
-                          <label class="col-md-1 ">Episodio:</label>
+                          <label class="col-md-1 ">Procedimiento:</label>
                              <div class="col-md-1">
                                 <asp:DropDownList ID="DdlProcedimiento" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" CausesValidation="true" DataTextField="Procedimiento" DataValueField="CveProcedimiento" Width="100%" >
                                                     <asp:ListItem Value="-1">Todos</asp:ListItem>

Ventas/Ventas.aspx

@@ -10435,9 +10435,13 @@
                 $('#divAgregarSucursal').modal();
             }
 
-            function hideDivAgregarSucursal() {
+        function hideDivAgregarSucursal() {
-                $('#divAgregarSucursal').modal('hide');
+            $('#divAgregarSucursal').modal('hide');
-            }
+        }
+
+
+        
+
 
     </script>
 </asp:Content>

Ventas/Ventas.aspx.vb

@@ -3446,6 +3446,37 @@ Partial Class Ventas
 
         End If
 
+
+        If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
+            Dim jsFocus As String = "$(document).ready(function () {
+                                        
+                                         $('#TxtCantidad').on('keydown', function (e) {                                            
+                                            if (e.which == 13 || e.which == 9 ) { 
+                                                let valorNumericoCantidad = parseFloat($('#TxtCantidad').val());
+                                                e.preventDefault();                                                  
+                                                if(valorNumericoCantidad > 0){                                                
+                                                    $('#C_Tab_TabGenerales_DdlPS > select').select2('open').next().find(':input.select2-search__field').focus();
+                                                }
+                                                
+                                                
+                                            }
+                                        });
+
+                                        $('#TxtPrecio').on('keydown', function (e) {
+                                            if (e.which == 13 || e.which == 9 ) { 
+                                                let valorNumericoPrecio = parseFloat($('#TxtCantidad').val());
+                                                e.preventDefault();                                                  
+                                                if(valorNumericoPrecio > 0){ 
+                                                    $('#LbAgregar').focus();
+                                                }                                                
+                                            }
+                                        });
+
+
+                                    });"
+            RegistraScript(jsFocus)
+        End If
+
     End Sub
 
     Private Sub CargaListasPrecios()
@@ -6878,6 +6909,11 @@ Partial Class Ventas
         End If
 
 
+        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
@@ -16835,6 +16871,12 @@ Partial Class Ventas
             CargaPS(DdlClasificacion.SelectedValue.ToEntero(), Ddl)
         End If
 
+
+        If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
+            TxtPrecio.Focus()
+        End If
+
+
         UPPPS.Update()
         UpPS.Update()
 
@@ -18074,6 +18116,11 @@ Partial Class Ventas
                     CargaGvComercioExterior()
                 End If
             End If
+
+            If UsuarioActual.CveEmpresa.Contiene(186, 189) Then
+                TxtCantidad.Focus()
+            End If
+
             UpPS.Update()
         Catch ex As Exception
             OnError("Ocurrió un error al agregar el producto", ex)
@@ -36205,5 +36252,6 @@ Partial Class Ventas
     'End Sub
 
 
+
 End Class