-- mejora liga descargacomplemento pago

This commit is contained in:
2024-04-19 20:01:15 -07:00
parent a2eb902b19
commit 961479c0f8

View File

@@ -8843,7 +8843,7 @@ Public Class ClsPaginas
Alert("Ocurrió un error al generar el PDF", TipoMensaje.MsgAdvertencia) Alert("Ocurrió un error al generar el PDF", TipoMensaje.MsgAdvertencia)
End Try End Try
Else Else
File.WriteAllBytes($"{UsuarioActual.Empresa.Ruta}\PDF\Pag\{SerieFolio}.pdf", StreamPDF(rutaArchivo, lrds, params, "Pago", "PDF")) File.WriteAllBytes($"{UsuarioActual.Empresa.Ruta}PDF\Pag\{SerieFolio}.pdf", StreamPDF(rutaArchivo, lrds, params, "Pago", "PDF"))
End If End If
If imprimir Then If imprimir Then
ImprimirPDF(rutaArchivo, lrds, params, SerieFolio, "PDF") ImprimirPDF(rutaArchivo, lrds, params, SerieFolio, "PDF")