From b4482a6195adccb37a7ee3c917c4c5461ef2dbbd Mon Sep 17 00:00:00 2001
From: Oscar Irigoyen <rakcsle@outlook.com>
Date: Thu, 11 Aug 2022 09:34:58 -0700
Subject: [PATCH] eFacturas  Solicitudes SAT Descarga de Comprimido

---
 Compras/eFacturas.aspx    |  4 ++--
 Compras/eFacturas.aspx.vb | 28 +++++++++++++++++-----------
 2 files changed, 19 insertions(+), 13 deletions(-)

diff --git a/Compras/eFacturas.aspx b/Compras/eFacturas.aspx
index de1251359..0d4ddcff7 100644
--- a/Compras/eFacturas.aspx
+++ b/Compras/eFacturas.aspx
@@ -1163,13 +1163,13 @@
                                                         </ItemTemplate>
                                                     </asp:TemplateField>
 
-                                                 <%--   <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="XML">
+                                                <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="XML">
                                                         <ItemTemplate>
                                                             <asp:LinkButton ID="LnkDescargaXML" CssClass="btn btn-circle btn-sm blue" OnClick="LnkDescargaXML_Click" runat="server" ToolTip="Descargar archivo"
                                                                 Text="<i class='fa fa-download' style='color:white' title='Descargar Documento'></i>" CausesValidation="False" Visible="false" />
                                                         </ItemTemplate>
                                                     </asp:TemplateField>
-
+                                                      <%--  
                                                      <asp:TemplateField  HeaderText="R Nombres" Visible="false">
                                                         <ItemTemplate>
                                                             <asp:LinkButton ID="LnkRenombrarArchivos" CssClass="btn btn-circle btn-sm blue" OnClick="LnkRenombrarArchivos_Click" runat="server" ToolTip="Renombrar Archivos"
diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index 59c5509b8..9a6b09cd0 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -2951,6 +2951,23 @@ Partial Class Compras_eFacturas
     End Sub
 
 
+    Protected Sub LnkDescargaXML_Click(ByVal sender As Object, ByVal e As EventArgs)
+        Dim GvRow As GridViewRow = CType((CType(sender, LinkButton)).NamingContainer, GridViewRow)
+        Dim UrlDescarga = $"{UsuarioActual.Empresa.Ruta}NomXMLSAT\\Descargas\\{GvRow.DataKey("ArchivoXML")}"
+        Dim Archivo = New System.IO.FileInfo(UrlDescarga)
+
+        If Archivo.Exists Then
+            Response.Clear()
+            Response.AddHeader("Content-Disposition", "attachment; filename=" & Archivo.Name)
+            Response.AddHeader("Content-Length", Archivo.Length.ToString())
+            Response.ContentType = "text/octet-stream"
+            Response.Flush()
+            Response.TransmitFile(Archivo.FullName)
+            Response.[End]()
+        End If
+    End Sub
+
+
 #End Region
 
 
@@ -4394,8 +4411,6 @@ Partial Class Compras_eFacturas
             Alert("no se pudo procesar el archivo xml")
         End If
     End Sub
-
-
     Private Sub VinculacionMasivaComplementos()
 
         Dim CountVinculados As Integer = 0
@@ -4744,15 +4759,10 @@ Partial Class Compras_eFacturas
 
 
     End Sub
-
-
     Protected Sub LnkVinculacionMasivaComplementos_Click(sender As Object, e As EventArgs)
         VinculacionMasivaComplementos()
     End Sub
 
-
-
-
 #Region "TRASLADOS"
 
 
@@ -4931,7 +4941,6 @@ Partial Class Compras_eFacturas
 
 #End Region
 
-
     Protected Sub LnkModalPersonalizar_Click(sender As Object, e As EventArgs)
 
         GvD.Columns(11).Visible = ChkModalPersonalzarFolioFiscal.Checked
@@ -4946,9 +4955,6 @@ Partial Class Compras_eFacturas
         RegistraScript("$('#DvmodalPersonalizar').modal('hide');")
     End Sub
 
-
-
-
     Protected Sub LnkPersonalizar_Click(sender As Object, e As EventArgs)
 
         RegistraScript("$('#DvmodalPersonalizar').modal('show');")