Converte NFE de base64 para PDF

[gilbertosilverio]

Ola Amigos,

Alguém teria um exemplo de como converte um arquivo de uma NFe codificado em BASE64 para PDF.

Agradeço a ajuda.

[Itamar M. Lins Jr.]

Olá!
Tem o visualizador de XML, que faz isso.
Agora base64 não vai consegui. Tem que converter para XML, base64 fica impossível de ler o XML.

Saudações,
Itamar M. Lins Jr.

[Wanderlei]

Gilberto o arquivo que está em Base64 é o XML ou o PDF da NF-e?
dependendo do jeito que está no arquivo é um exemplo que vc vai precisar

[gilbertosilverio]

Olá, amigos,

Agradeço as respostas. consegui fazer...

Desculpe, me expressei mal, era um imagem de um arquivo PDF codificado em base64.

Estava errando em não ler o arquivo, hb_memoread(cBase64Image)

Código: Selecionar todos

FUNCTION TESTE_PDF()
   PRIVATE cBase64Image := [C:\PETROBRAS\TESTE.A64], hOutput
   PRIVATE cOutputPdf   := [C:\PETROBRAS\imagem.pdf]
   PRIVATE ARQUIVOTXT   := [C:\PETROBRAS\TESTE.PDF]

   cDecode :=hb_base64decode(hb_memoread(cBase64Image))

   hOutput := FCreate( ARQUIVOTXT )

   FWrite( hOutput, cDecode)

   FClose( hOutput )

RETURN NIL