-- fix de impresion de ticket, etiqueta por empresa

2024-02-27 13:38:08 -07:00
parent e1750cbfde
commit 06d8f385e4
2 changed files with 5 additions and 2 deletions
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -6040,6 +6040,9 @@ Partial Class PopUpVerFactura

        If DtPrecios IsNot Nothing Then
            Dim DirectorioArchivo As String = "Empresas/Grales/Formatos/Etiqueta.mrt"
+            If System.IO.File.Exists(UsuarioActual.Empresa.Ruta + "Formatos/Etiqueta.mrt") Then
+                DirectorioArchivo = UsuarioActual.Empresa.Ruta + "Formatos/Etiqueta.mrt"
+            End If
            Dim params As New List(Of ReportParameter)

            ImprimirPDFStimul(DirectorioArchivo, DtPrecios, params, "Precios")