Outro dia me perguntaram se era possível gerar um arquivo PDF no Protheus, mas sem que abri-se uma tela, procura daqui, procura dali, encontrei a função FWMSPrinter, é o mesmo componente utilizado na geração da Danfe. Para mais detalhes consulte http://tdn.totvs.com/display/public/mp/FWMsPrinter

Abaixo tem um bom exemplo funcional para mostrar o seu funcionamento
 

Arquivos include – Gerando um arquivo em PDF sem interface


Equipe Blog Advpl

Amantes da tecnologia

6 comentários

luciano.aol · 26 de fevereiro de 2015 às 17:32

Por favor se puder enviar os arquivos “RPTDEF.CH” e “FWPrintSetup.ch” pq sem eles não roda.
luciano.aol@gmail.com

Izildinha Kavai · 5 de março de 2015 às 10:43

Bom dia,
Estou precisando gerar um arquivo PDF, utilizei o exemplo acima, e funcionou. Não sei o que aconteceu que parou de funcionar. O programa gera o .rel e nao consegue gerar o pdf, mas não gera nenhum erro.
parace que a funcao File2Printer( cFilePrint, “PDF” ) não consegue gerar.
Onde obtenho informações a respeito desta função?

    Moderador · 5 de março de 2015 às 17:07

    Boa tarde!

    Poderia enviar para nosso e-mail (contatos@blogadvpl.com) o seu fonte para compararmos.

    Possíveis problemas para não gerar o arquivo PDF:
    1. caracteres especiais no nome do arquivo (incluindo acento)
    2. caracteres especiais no caminho onde será gravado o PDF
    3. caminho não existente

    Aguardamos seu retorno

Izildinha Kavai · 6 de março de 2015 às 12:07

Bom dia ,
Obrigada pelo retorno
Segue o programa de teste copiei e executei, que so gera o arquivo orcamento_000000.rel no diretorio d:temp

    Moderador · 6 de março de 2015 às 13:29

    Olá!
    Neste exemplo é necessário que a propriedade Preview() esteja habilitada, mas para gravar o PDF em alguma pasta definida por você é necessário incluir a propriedade cPathPDF
    Exemplo:
    oPrinter:cPathPDF:= cLocal

    Atualizei o fonte para que você possa visualizar melhor.

Deixe uma resposta

Comodo SSL