From 31f27971d06efc69864c09f5ac876152ee0ded90 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 15 May 2024 11:37:39 -0700
Subject: [PATCH] =?UTF-8?q?--=20activaci=C3=B3n=20de=20registro=20de=20Equ?=
 =?UTF-8?q?ivalencias?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/ProductosServicios.aspx    | 44 +++++++++++++++++++++++++++++++
 Ventas/ProductosServicios.aspx.vb | 20 ++++++++++++++
 2 files changed, 64 insertions(+)

diff --git a/Ventas/ProductosServicios.aspx b/Ventas/ProductosServicios.aspx
index 6d0844d4d..3f136ba72 100644
--- a/Ventas/ProductosServicios.aspx
+++ b/Ventas/ProductosServicios.aspx
@@ -80,6 +80,9 @@
             <li>
                 <asp:LinkButton ID="LnkGenerarEtiqueta" runat="server" data-toggle="tooltip" data-placement="left" title="Generar Etiqueta" Visible="false" OnClick="LnkGenerarEtiqueta_Click" Text="<i class='fa fa-qrcode'></i>  Imprimir Etiqueta"></asp:LinkButton>
             </li>
+             <li>
+                 <asp:LinkButton ID="LnkEquivalenciaAdd" runat="server" data-toggle="tooltip" data-placement="left" title="Agregar Equivalencia"  OnClick="LnkEquivalenciaAdd_Click" Text="<i class='fa fa-plus'></i>  Agregar Equivalencia"></asp:LinkButton>
+             </li>
         </ContentTemplate>
 
     </asp:UpdatePanel>
@@ -355,6 +358,7 @@
                                                         </div>
                                                         <div class="actions">
                                                             <div class="btn-group">
+                                                                a
                                                             </div>
                                                         </div>
                                                     </div>
@@ -2086,6 +2090,46 @@
         </div>
     </div>
 
+    <div id="divEquivalenciaModal" class="modal ADS fade" role="dialog">
+    <div class="modal-dialog">
+        <asp:UpdatePanel ID="UPPEquiv" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
+            <ContentTemplate>
+                <div class="modal-header">
+                    <button type="button" class="close" data-dismiss="modal" aria-label="Close">
+                        <span aria-hidden="true">&times;</span>
+                    </button>
+                    <h4 class="modal-title" id="H1" runat="server">Equivalencia</h4>
+                </div>
+                <div class="modal-body">
+                    
+                             <div class="form-group form-md-line-input input-iconright">
+                                  <asp:DropDownList ID="DdlEquivalenciaUM" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true"  CausesValidation="true" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida" Width="206px">                                
+                                </asp:DropDownList>
+                                <label for="<%= DdlEquivalenciaUM.ClientID.ToString()%>">Unidad de Medida:</label>                                                              
+                                    <asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlEquivalenciaUM" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad de medida''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEliminarPS"></asp:RequiredFieldValidator>
+                                  <i></i>
+                            </div>
+                            <div class="form-group form-md-line-input input-iconright">                                
+                                <asp:TextBox ID="TxtCantidadEquivalencia" runat="server"   Width="60"  CausesValidation="true" MaxLength="10"></asp:TextBox>
+                                 <label for="<%= TxtCantidadEquivalencia.ClientID.ToString()%>">Cantidad:</label>   
+                                <asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripcion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEliminarPS"></asp:RequiredFieldValidator>
+                                <i></i>
+                            </div>
+                         
+                    <div class="modal-footer">
+                        <asp:UpdatePanel ID="UpdatePanel5" runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+                                <asp:LinkButton ID="LnkAgregarEquivalencia" runat="server" CssClass="btn btn-primary" OnClick="LnkAgregarEquivalencia_Click"> Guardar</asp:LinkButton>
+                                <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+                </div>
+            </ContentTemplate>
+        </asp:UpdatePanel>
+    </div>
+</div>
+
     <div id="ModalCodigoBarrasQR" class="modal ADS fade" role="dialog">
         <div class="modal-dialog">
             <div class="modal-content">
diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb
index 1a49ae181..472e50a77 100644
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -3689,4 +3689,24 @@ Partial Class ProductosyServicios
         End If
 
     End Sub
+
+    Protected Sub LnkEquivalenciaAdd_Click(sender As Object, e As EventArgs)
+        DdlEquivalenciaUM.Items.Clear()
+        DdlEquivalenciaUM.DataSource = GlobalDTUnidadesMedida(UsuarioActual.CveEmpresa)
+        DdlEquivalenciaUM.DataBind()
+        UPPEquiv.Update()
+        RegistraScript(String.Format("$('#{0}').modal('show');", "divEquivalenciaModal"))
+    End Sub
+
+    Protected Sub LnkAgregarEquivalencia_Click(sender As Object, e As EventArgs)
+        Dim Ps As New ClsProductosServicios
+
+        If Ps.AddPSEquivalencias(CvePS, DdlEquivalenciaUM.SelectedValue.ToEntero, TxtCantidadEquivalencia.Text.ToDecimal, False, 0, UsuarioActual.CveUsuario) Then
+            Alert("Equivalencia registrada correctamente.", TipoMensaje.ToastInformacion)
+            CargaEquivalencias()
+            RegistraScript(String.Format("$('#{0}').modal('hide');", "divEquivalenciaModal"))
+        End If
+
+        Ps.Dispose()
+    End Sub
 End Class