From 9e2f6a6ccb75c3aa746c5bf8d087a22328e7f506 Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Wed, 17 Apr 2024 17:50:39 -0700
Subject: [PATCH] Ajustes Kardex siguiente  siguiente PS con movimientos

---
 Inventarios/KardexAlmacen.aspx              |  4 +-
 Inventarios/KardexAlmacenHorizontal.aspx    | 44 ++++----------
 Inventarios/KardexAlmacenHorizontal.aspx.vb | 65 ---------------------
 Inventarios/RepEntradasSalidas.aspx         |  4 +-
 4 files changed, 15 insertions(+), 102 deletions(-)

diff --git a/Inventarios/KardexAlmacen.aspx b/Inventarios/KardexAlmacen.aspx
index 2970592c7..3c9358519 100644
--- a/Inventarios/KardexAlmacen.aspx
+++ b/Inventarios/KardexAlmacen.aspx
@@ -66,11 +66,11 @@
 </asp:Content>
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
     <li>
-        <asp:LinkButton ID="ImgImprimir" runat="server"><i class="fa fa-ad-pdf"></i> Generar PDF</asp:LinkButton>
+        <asp:LinkButton ID="ImgImprimir" runat="server"><i class="fa fa-file-pdf-o"></i> Generar PDF</asp:LinkButton>
     </li>
 
       <li>
-        <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
+        <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-file-excel-o"></i> Generar Excel</asp:LinkButton>
     </li>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
diff --git a/Inventarios/KardexAlmacenHorizontal.aspx b/Inventarios/KardexAlmacenHorizontal.aspx
index 08e57cd0d..770f57010 100644
--- a/Inventarios/KardexAlmacenHorizontal.aspx
+++ b/Inventarios/KardexAlmacenHorizontal.aspx
@@ -96,18 +96,17 @@
 
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
     <li>
-        <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
+        <asp:LinkButton ID="LnkExportar" runat="server"><i class="fa fa-file-excel-o"></i> Generar Excel</asp:LinkButton>
     </li>
     <asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
-            <ContentTemplate>
-    <li>        
-                <asp:LinkButton runat="server" ID="LnkProyectado" OnClick="LnkProyectado_Click" Text="Cargar Proyecciones" />            
-    </li>
-    
-                </ContentTemplate>
-        </asp:UpdatePanel>
-        <li>        
-                <asp:LinkButton runat="server" ID="LnkPOG" OnClick="LnkProyectado_Click" Visible="false"><i class="fa fa-ad-excel"></i> POG</asp:LinkButton>            
+        <ContentTemplate>
+            <li>                
+                <asp:LinkButton ID="LnkProyectado" runat="server" OnClick="LnkProyectado_Click"><i class="fa fa-upload"></i> Cargar Proyecciones</asp:LinkButton>                
+            </li>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <li>
+        <asp:LinkButton runat="server" ID="LnkPOG" OnClick="LnkProyectado_Click" Visible="false"><i class="fa fa-file-excel-o"></i> POG</asp:LinkButton>
     </li>
 </asp:Content>
 
@@ -237,29 +236,8 @@
                             </asp:DropDownList>
                         </div>
                     </asp:Panel>
+           
 
-                         <div class="row" runat="server" visible="false" id="DVFiltroCodigo">
-                          <div class="col-md-1">Código Inicio:</div>
-                          <div class="col-md-2"><asp:TextBox runat="server" ID="TxtCodigoInicio" Height="26px"></asp:TextBox></div>
-                          <div class="col-md-1">Código Fin:</div>
-                          <div class="col-md-2"><asp:TextBox runat="server" ID="TxtCodigoFinal" Height="26px"></asp:TextBox></div>                       
-
-                          <div class="col-md-1" runat="server" id="DVNavegar"  >
-                         <div class="row">
-                             <div class="col-md-5">
-                                 <asp:LinkButton runat="server" ID="LnkPSAntyerior" OnClick="LnkPSAntyerior_Click" CssClass="btn btn-primary">Anterior</asp:LinkButton>
-                             </div>
-                             <div class="col-md-2">
-                             </div>
-                             <div class="col-md-5">
-                                 <asp:LinkButton runat="server" ID="LnkPSSiguiente" OnClick="LnkPSSiguiente_Click" CssClass="btn btn-primary">Siguiente</asp:LinkButton>
-                             </div>
-                         </div>
-
-
-    </div>
-    
- </div>
                 </div>
 
                
@@ -329,7 +307,7 @@
                                 <asp:ListItem Text="Entrada" Value="1" Selected="True" />
                                 <asp:ListItem Text="Salida" Value="2" />
                             </asp:RadioButtonList>
-                            <asp:Button runat="server" ID="BtnDescargarFormato" OnClick="BtnDescargarFormato_Click" Text="Descargar formato" CssClass="btn btn-warning" />
+                            <asp:LinkButton runat="server" ID="BtnDescargarFormato" OnClick="BtnDescargarFormato_Click" CssClass="btn btn-warning" ><i class='fa fa-download' aria-hidden='true'></i> Descargar formato</asp:LinkButton>
                         </div>
                         <asp:Label runat="server" ID="Label1" Text="Subir Proyección:" Style="font-size: 15px" />
                         <br />
diff --git a/Inventarios/KardexAlmacenHorizontal.aspx.vb b/Inventarios/KardexAlmacenHorizontal.aspx.vb
index 75a3dd999..61a191dec 100644
--- a/Inventarios/KardexAlmacenHorizontal.aspx.vb
+++ b/Inventarios/KardexAlmacenHorizontal.aspx.vb
@@ -38,10 +38,6 @@ Partial Class Inventarios_KardexAlmacenHorizontal
             If IfNull(Request("CvePS"), "-1").ToString.ToEntero > 0 Then CargarKardex(Request("CvePS").ToString.ToEntero)
             ddlProducto2.SelectedValue = If(Request("CvePS") IsNot Nothing, Request("CvePS").ToString, "-1")
 
-            If UsuarioActual.Empresa.Funcionalidad(574).ToEntero = 1 Then
-                DVFiltroCodigo.Visible = True
-            End If
-
         End If
     End Sub
     Private Sub CargaCombos()
@@ -534,65 +530,4 @@ Partial Class Inventarios_KardexAlmacenHorizontal
     End Sub
 
 
-
-
-    Protected Sub LnkPSAntyerior_Click(sender As Object, e As EventArgs)
-        NavegacionPS(Siguiente:=False)
-    End Sub
-
-    Protected Sub LnkPSSiguiente_Click(sender As Object, e As EventArgs)
-        NavegacionPS(Siguiente:=True)
-    End Sub
-    Private Sub NavegacionPS(Siguiente As Boolean)
-        Dim CvePS As Integer = ddlProducto2.SelectedValue.ToEntero
-
-        If Not CvePS > 0 Then
-            Exit Sub
-        End If
-        Dim dt As DataTable = New DataTable
-
-        Dim Entrada As Boolean = True
-        Dim Salida As Boolean = True
-
-        Dim FechaI As String = "-1"
-        Dim FechaF As String = If(TxtFechaF.Text <> "" AndAlso TxtFechaF.Text <> "__/__/____", TxtFechaF.Text, "-1")
-        Dim CveAlmacen As Integer = If(ddlAlmacen.SelectedValue.ToEntero = 0, -1, ddlAlmacen.SelectedValue.ToEntero)
-        Dim CveAlmacenes As String = ddlAlmacen.GetSelectedValues()
-        If CveAlmacenes.Contains(",") Then
-            CveAlmacen = -1
-        End If
-        If CvePS > 0 Then
-            Dim dr As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=CvePS).FiltroPrimero("")
-            If dr IsNot Nothing Then
-                ddlProducto2.SelectedText = dr("PSCodigo").ToString
-                ddlProducto2.SelectedValue = CvePS.ToString
-            End If
-
-        End If
-
-        Dim CveTiposAlmacen As String = "-1"
-
-
-        Dim CodigoInicio As String = If(TxtCodigoInicio.Text.Trim.Length = 0, "-1", TxtCodigoInicio.Text.Trim)
-        Dim CodigoFin As String = If(TxtCodigoFinal.Text.Trim.Length = 0, "-1", TxtCodigoFinal.Text.Trim)
-
-        Dim ObjInventarios As New ClsInventarios
-        If ObjInventarios.GetKardexPSNavegacion(Entrada, Salida, CvePS, FechaI, FechaF, CveAlmacen, CveTiposAlmacen, DdlUnidadMedida.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa,
-                                                CveAlmacenes, Siguiente:=Siguiente, CodigoInicio:=CodigoInicio, CodigoFin:=CodigoFin) Then
-            dt = ObjInventarios.DtResultados.Copy
-        End If
-        ObjInventarios.Dispose()
-
-        If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
-            ddlProducto2.SelectedValue = dt.Rows(0)("CvePS").ToString
-            ddlProducto2.SelectedText = dt.Rows(0)("CodigoPS").ToString
-            ddlProducto2.txtValue.Value = dt.Rows(0)("CvePS").ToString
-            ddlProducto2.txtText.Value = dt.Rows(0)("CodigoPS").ToString
-            CargarKardex(dt.Rows(0)("CvePS").ToString.ToEntero)
-            UPFiltros.Update()
-
-        End If
-
-    End Sub
-
 End Class
diff --git a/Inventarios/RepEntradasSalidas.aspx b/Inventarios/RepEntradasSalidas.aspx
index 170435582..bcba0f2df 100644
--- a/Inventarios/RepEntradasSalidas.aspx
+++ b/Inventarios/RepEntradasSalidas.aspx
@@ -11,11 +11,11 @@
         </li>
 
         <li>
-            <asp:LinkButton ID="LnkExcelPersonalizado" runat="server" Visible="false"><i class="fa fa-ad-excel"></i> Excel Personalizado</asp:LinkButton>
+            <asp:LinkButton ID="LnkExcelPersonalizado" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i> Excel Personalizado</asp:LinkButton>
         </li>
 
         <li>
-            <asp:LinkButton ID="LnkFormatoInventario" runat="server" Visible="false"><i class="fa fa-ad-excel"></i> Generar Formato Inventario</asp:LinkButton>
+            <asp:LinkButton ID="LnkFormatoInventario" runat="server" Visible="false"><i class="fa fa-file-excel-o"></i> Generar Formato Inventario</asp:LinkButton>
         </li>
 
         <li>