From 1bfb7432d16bdaab7bde7d451140a0e1d6f78951 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Mon, 16 Jan 2023 18:44:26 -0700
Subject: [PATCH] Ocultar impresion en cotizaciones en econo

---
 Ventas/PopUpBuscarFolio.aspx.vb | 15 ++++++++++++---
 Ventas/Ventas.aspx.vb           |  4 ++++
 2 files changed, 16 insertions(+), 3 deletions(-)

diff --git a/Ventas/PopUpBuscarFolio.aspx.vb b/Ventas/PopUpBuscarFolio.aspx.vb
index cabab782b..ee4647234 100644
--- a/Ventas/PopUpBuscarFolio.aspx.vb
+++ b/Ventas/PopUpBuscarFolio.aspx.vb
@@ -186,12 +186,21 @@ Partial Class PopUpBuscarFolio
                 e.Row.FCLiteral("LtlXML").Text = "<div class='truncate' style='width:23px;'></div>"
             End If
 
-            If IO.File.Exists($"{Ruta}PDF\{e.Row.DBCampo("TipoDocto")}\{e.Row.DBCampo("Folio")}.pdf") Then
-                e.Row.FCLiteral("LtlPDF").Text = String.Format("<div class='truncate' style='width:23px;'><a class=""Texto"" target=""_blank""  href=""/Compras/PopUpVerFactura.aspx?TipoDocto={0}&File={1}.pdf&TipoArchivo=PDF"">PDF</a></div>", e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("Folio"))
+            If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
+                If e.Row.DBCampo("TipoDocto") <> "Cot" AndAlso IO.File.Exists($"{Ruta}PDF\{e.Row.DBCampo("TipoDocto")}\{e.Row.DBCampo("Folio")}.pdf") Then
+                    e.Row.FCLiteral("LtlPDF").Text = String.Format("<div class='truncate' style='width:23px;'><a class=""Texto"" target=""_blank""  href=""/Compras/PopUpVerFactura.aspx?TipoDocto={0}&File={1}.pdf&TipoArchivo=PDF"">PDF</a></div>", e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("Folio"))
+                Else
+                    e.Row.FCLiteral("LtlPDF").Text = "<div class='truncate' style='width:23px;'></div>"
+                End If
             Else
-                e.Row.FCLiteral("LtlPDF").Text = "<div class='truncate' style='width:23px;'></div>"
+                If IO.File.Exists($"{Ruta}PDF\{e.Row.DBCampo("TipoDocto")}\{e.Row.DBCampo("Folio")}.pdf") Then
+                    e.Row.FCLiteral("LtlPDF").Text = String.Format("<div class='truncate' style='width:23px;'><a class=""Texto"" target=""_blank""  href=""/Compras/PopUpVerFactura.aspx?TipoDocto={0}&File={1}.pdf&TipoArchivo=PDF"">PDF</a></div>", e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("Folio"))
+                Else
+                    e.Row.FCLiteral("LtlPDF").Text = "<div class='truncate' style='width:23px;'></div>"
+                End If
             End If
 
+
         End If
     End Sub
 
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 8a0583f6d..6f69118b0 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -3440,6 +3440,10 @@ Partial Class Ventas
                 LblRotacion.Text = FechaRotaAlinea.AddMonths(6).ToShortDateString
                 LblAlineacion.Text = FechaRotaAlinea.AddMonths(6).ToShortDateString
 
+                If UsuarioActual.Empresa.Funcionalidad(558) = "1" AndAlso Me.CveVenta > 0 AndAlso DdlTipoComprobante.SelectedValue = "Cot" Then
+                    HplDownPDF.Visible = False
+                End If
+
                 UPObservaciones.Update()
             End If