From 8782ef41c420af1adec54c46eb586e6b45701fde Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Thu, 11 Apr 2024 16:27:25 -0700
Subject: [PATCH] Entrega Almacen Traslados Con Consolar,  agregar texto
 consola al nombre del archivo descargado

---
 Compras/Compras.aspx.vb         | 2 +-
 Compras/PopUpVerFactura.aspx.vb | 7 +++++--
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 7120fe1ca..7765642fb 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -4398,7 +4398,7 @@ Partial Class Compras_Compras
 
         If UsuarioActual.TienePermisoProceso(121) Then
             If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then
-                If Not NCDevolucion Then
+                If Not NCDevolucion And Not ChkNCInvNC.Checked Then
                     Alert("Favor de seleccionar un producto en la pestaña de almacen", TipoMensaje.MsgAdvertencia)
                     Exit Sub
                 End If
diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index b012e31e1..ad012761a 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -3704,6 +3704,8 @@ Partial Class PopUpVerFactura
 
 
                 Dim Archivo As New System.IO.FileInfo(String.Format(RutaFormato, UsuarioActual.Empresa.Ruta))
+                Dim NombreArchivo As String = If(Consola <> "-1" And Consola.Trim.Length > 0, $"Aviso de Traslado - {Folio} Consola", $"Aviso de Traslado - {Folio}")
+
                 If Archivo.Exists Then
                     params.Add(New ReportParameter("LogoPath", RutaImagenLogo))
                     If UsuarioActual.CveEmpresa = 140 Then
@@ -3746,9 +3748,10 @@ Partial Class PopUpVerFactura
                         params.Add(New ReportParameter("ResponsableRecibio", ResponsableRecibio))
 
                         DtMovimientos = DtMovimientos.FiltraParametros("", "PS")
+
                     End If
 
-                    ImprimirPDF(String.Format(RutaFormato, UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Aviso de Traslado - {0}", Folio), RDSName:="DsInventarios")
+                    ImprimirPDF(String.Format(RutaFormato, UsuarioActual.Empresa.Ruta), DtMovimientos, params, NombreArchivo, RDSName:="DsInventarios")
                 Else
 
                     params.Add(New ReportParameter("LogoPath", RutaImagenLogo))
@@ -3760,7 +3763,7 @@ Partial Class PopUpVerFactura
                     If UsuarioActual.CveEmpresa.Contiene(172, 173) Then
                         ImprimirPDFStimul(String.Format("Empresas/Grales/Formatos/Traslado.mrt", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Aviso de Traslado - {0}", Folio), RDSName:="DsInventarios")
                     Else
-                        ImprimirPDF(String.Format("Empresas/Grales/Formatos/Traslado.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, String.Format("Aviso de Traslado - {0}", Folio), RDSName:="DsInventarios")
+                        ImprimirPDF(String.Format("Empresas/Grales/Formatos/Traslado.rdlc", UsuarioActual.Empresa.Ruta), DtMovimientos, params, NombreArchivo, RDSName:="DsInventarios")
                     End If
 
                 End If