Como Pré-Visualizar a Danfe

[porter]

Olá pessoal, estou gerando a Danfe pelo AcbrMonitorPlus, gostaria de saber, se for para apenas fazer uma Pré-Visualização da Danfe, antes de transmitir, bastaria Validar e em seguida Imprimir, seria esse o procedimento ?

Obrigado.

[Itamar M. Lins Jr.]

Olá!

Código: Selecionar todos

 NFE.ImprimirDanfe(cArqXML,[cImpressora],[nNumCopias],[cProtocolo],[bMostrarPreview],[cMarcaDagua],[bViaConsumidor],[bSimplificado])

Parâmetros
cArqXML - Caminho do arquivo XML da NF-e.
cImpressora - Nome da Impressora. Obs.: Parâmetro opcional.
nNumCopias - Número de Cópias. Obs.: Parâmetro opcional.
cProtocolo - Número de Protocolo de NF-e. Obs.: Parâmetro opcional.
bMostrarPreview - exibe o preview antes da impressão (1 - para exibir). Obs.: Parâmetro opcional.
cMarcaDagua - Imprime parâmetro informado como MarcaDagua. Obs.: Parâmetro opcional.
bViaConsumidor - Emitir via do Consumidor (1 - para emitir)  Obs.: Parâmetro opcional.
bSimplificado - Imprimir DANFe modelo Simplificado (1 - para emitir). Obs.: Parâmetro opcional.

NFE.ImprimirDanfe("c:\35XXXXXXXXXXXXXXXX550010000000050000000058-nfe.xml", , , ,1)

Saudações,
Itamar M. Lins Jr.

[porter]

Olá Itamar,
Irei implementar aqui e fazer os testes, obrigado.

[JoséQuintas]

Código: Selecionar todos

               IF MsgYesNo( "Deseja um PREVIEW SEM VALIDADE JURÍDICA" )
                  cXml := cnSQL:ReturnFunction( "ze_XmlNfe", :Number( "IDNOTFIS" ), :Number( "NFFILIAL" ), AppVersaoExe() )
                  cFilePDF := MyTempFile( "pdf" )
                  hbnfeDaGeral():ToPdf( cXml, cFilePdf )
                  ShellExecuteOpen( cFilePdf )
               ENDIF

[porter]

Olá, estou tentando fazer dessa forma, para ver o resultado, e ver como funciona, quero mostrar uma mensagem em marca dagua, "SEM VALOR FISCAL", estou fazendo os testes, em regime de Homologação, para dar certo, tem que ser em regime de produção, ou dessa forma, ou dessa forma não está certo ?
Dessa forma, não acontece nada.

"NFe.ImprimirDANFE(" + '"' + cXML + '"' + ',' + ',' + ',' + ',' + '1' +")";

[porter]

Olá, Procurei fazer de diversas formas, mas nenhuma dessas tentativas, deu certo a marca dagua, estou fazendo algo errado ?

NFe.ImprimirDANFE("C:\ACBRMONITORPLUS\DOCS\35XXXXXXXXXX550010000001411000001465-NFE.XML",,,"TESTE TESTE TESTE",1)

NFe.ImprimirDANFE("C:\ACBRMONITORPLUS\DOCS\35XXXXXXXXXX550010000001411000001465-NFE.XML",,,,"TESTE TESTE TESTE",1)

NFe.ImprimirDANFE("C:\ACBRMONITORPLUS\DOCS\35XXXXXXXXXX550010000001411000001465-NFE.XML",,,,,"C:\TEMP\IMAGENS\mensag.jpg",1)

[rochinha]

Amiguinhos,

Porter

Veja em https://pctoledo.org/forum/viewtopic.php?f=20&t=17353#p108175