From d6b5bc150ae1c45f08ed73dce6848309e25f41ec Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 15 Aug 2022 19:29:15 -0700
Subject: [PATCH] --

---
 General/CatCompuestos.aspx    | 2 +-
 General/CatCompuestos.aspx.vb | 8 ++++----
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/General/CatCompuestos.aspx b/General/CatCompuestos.aspx
index 1ac8c194f..b9a0aa1bd 100644
--- a/General/CatCompuestos.aspx
+++ b/General/CatCompuestos.aspx
@@ -27,7 +27,7 @@
     </div>
     <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
-            <asp:GridView ID="GvDatos" runat="server" GridLines="None" DataKeyNames="CveCompuesto,Compuesto,Estatus" CssClass="table table-striped table-advance table-hover Widthall" CellSpacing="0" Width="100%" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" ToolTip="Listado de Compuestos Activos">
+            <asp:GridView ID="GvDatos" runat="server" GridLines="None"  data-sort="true" DataKeyNames="CveCompuesto,Compuesto,Estatus" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" CellSpacing="0" Width="100%" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros" ToolTip="Listado de Compuestos Activos">
                 <Columns>
                     <asp:BoundField DataField="Compuesto" ItemStyle-Width="20%" HeaderText="Compuesto" ItemStyle-HorizontalAlign="Left" />
                     <asp:BoundField DataField="FechaIng" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="20%" HeaderText="Fecha Ing" ItemStyle-HorizontalAlign="center" />
diff --git a/General/CatCompuestos.aspx.vb b/General/CatCompuestos.aspx.vb
index ee7e77328..b1276ba2e 100644
--- a/General/CatCompuestos.aspx.vb
+++ b/General/CatCompuestos.aspx.vb
@@ -32,11 +32,11 @@ Partial Class General_CatCompuestos
             CveCompuesto = -1
             EsEditar = 0
             dvEstatus.Visible = False
-            CargaDatos(-1)
+            CargaDatos()
         End If
     End Sub
 
-    Private Sub CargaDatos(CveConductor As Integer)
+    Private Sub CargaDatos()
         Dim PS As New ClsProductosServicios
         If PS.GetCompuestosActivos(UsuarioActual.CveEmpresa) Then
             GvDatos.DataSource = PS.DtResultados
@@ -85,7 +85,7 @@ Partial Class General_CatCompuestos
         TxtCompuesto.Text = ""
 
 
-        CargaDatos(-1)
+        CargaDatos()
         UpDatos.Update()
         UpBodyCompuesto.Update()
 
@@ -98,7 +98,7 @@ Partial Class General_CatCompuestos
             Alert("El Compuesto se eliminó correctamente", TipoMensaje.MsgInformacion)
         End If
         PS.Dispose()
-        CargaDatos(-1)
+        CargaDatos()
         UpDatos.Update()
     End Sub