From 17cf81c0e4d99b76728ab6cdac3da98b5493728b Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 11 Mar 2025 08:07:37 -0700
Subject: [PATCH] -- mejora para el ordenamiento DESC

---
 Inventarios/Kardex.aspx.vb | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/Inventarios/Kardex.aspx.vb b/Inventarios/Kardex.aspx.vb
index 2277199e7..e1e95ac28 100644
--- a/Inventarios/Kardex.aspx.vb
+++ b/Inventarios/Kardex.aspx.vb
@@ -432,7 +432,7 @@ Partial Class Inventarios_Kardex
             If UsuarioActual.TienePermisoProceso(201) Then
                 DivIndicadores.Visible = True
 
-                Dim Dr = dt.FiltroUltimo("")
+                Dim Dr = dt.FiltroUltimo("", "FechaMovto , CveMovimiento , CveMovimientoDetalle ")
                 Dim TC = If(GlobalTipoCambio(NowADS()) > 0, GlobalTipoCambio(NowADS()), 1)
 
                 LtIndicador_Existencia.Text = Dr("Existencias").ToString.ToDecimal.ToString("#,##0.####")
@@ -470,7 +470,7 @@ Partial Class Inventarios_Kardex
                 GvM.Attributes.Add("data-heighterror", "270")
             End If
         End If
-        If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then dt = dt.FiltraParametros("", "FechaMovto DESC") ' ordenamiento descendente
+        'If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then dt = dt.FiltraParametros("", "FechaMovto DESC") ' ordenamiento descendente
         ObjInventarios.Dispose()
 
         Return dt
@@ -728,9 +728,6 @@ Partial Class Inventarios_Kardex
 #End Region
 
 
-
-
-
     Protected Sub LnkPSAntyerior_Click(sender As Object, e As EventArgs)
         NavegacionPS(Siguiente:=False)
     End Sub