Re: Gerar PDF de um relatório - Qlik Community

rafits_ctba · ‎2013-01-30

Boa Tarde Pessoal,

Estou com um problema ao gerar PDF de um relatório utilizando macro, atualmente estou utilizando o PDFCreator, mas uma versão mais antiga que me da o suporte para gerar os arquivos, porem a algum tempo ele começou a apresentar problemas, devido ao pedido de atualização a cada vez que ele vai gerar o PDF, pois bem, gostaria de saber se vocês tem algum outro programa para eu utilizar ou alguma idéia de como fazer para gerar esses relatórios.

Server: QV11sr2

PDF gerando de forma automatica na carga (pelo agendador de tarefas, pois pelas tarefas do QV ele não executa a macro)

PDF: PDFCrator

Atenciosamente

Rafael Mendes

Report Inappropriate Content · ‎2013-01-30

Rafael,

Eu utilizo o QvPDF. mas não cheguei a realizar testes no QV11 SR2.

Segue a macro:

'==================== Função Exporta o relatório p/ PDF ====================

FUNCTION printReportPDF(oReport, pdfOutputFile)

SET WSHShell = CreateObject("WScript.Shell")

WSHShell.RegWrite "HKCU\Software\QlikViewPDF\OutputFile", pdfOutputFile, "REG_SZ"

WSHShell.RegWrite "HKCU\Software\QlikViewPDF\BypassSaveAs", "1", "REG_SZ"

ActiveDocument.PrintReport oReport, "QlikViewPDF", FALSE

SET WSHShell = NOTHING

END FUNCTION

rafits_ctba · ‎2013-01-30

Obrigado Eduardo,

Vou testar!

Atenciosamente

Rafael Mendes

rafits_ctba · ‎2013-01-30

Eduardo, Consegui fazer funcionar em partes, ele "gera" o relatorio, mas não está salvando no diretório, segue o script que eu montei:

Sub GerarPDF

ActiveDocument.Fields("AnoAbertura").select ActiveDocument.Variables("vrAno").GetContent.String

Print_PDF "C:\Indicadores\IndicadoresPDF\ControleProtocolos_"&ActiveDocument.Variables("vrAno").GetContent.String, "RP02"

ActiveDocument.GetApplication.Sleep 10000

End Sub

Sub Print_PDF(pdfOutputFile,oReport)