gravacao automatica da NFE em PDF

[eclipse2047_comercial@hotm]

Boa tarde a todos, 

existe algum lugar pra eu deixar marcado pra que sempre que gerar ujm nota nova(quando aprovada e aparecer na tela)

ela ja seja gravada automaticamente em alguma pasta ja pre definida?

[datilas]

automático não. mas você poderia usar:

ACBrNFe1.DANFE.PathPDF := 'suapastapdf';
ACBrNFe1.NotasFiscais.Items[0].ImprimirPDF;
ou
ACBrNFe1.NotasFiscais[0].ImprimirPDF;
ou
ACBrNFe1.NotasFiscais.ImprimirPDF;

 

Editado 7 Outubro, 2025 por datilas

[eclipse2047_comercial@hotm]

onde eu coloco isto?, 

como faco isto funcionar?

NFE_LimparLista()
NFE_LimparListaEventos()
SET CENTURY OFF

oNFe := TACBrNFe():ValidarXml(te_arq_vez,.t.)

**\ if oNfe:ValidarXml(te_arq_vez,.t.)
if oNfe = .t.
  osayc0:varput("XML Validado em ACBr "+dtoc(date())+" "+time())
  osayc0:Refresh()
  memvar->te_xml = "ON"
else  
  oNFe:cXML := ""
  memvar->te_xml = "OFF" 
endif

if memvar->te_xml = "ON"

  oNFe := TACBrNFe():StatusInternet()

  if oNFe = .F.    
    osayc0:varput("Sem Internet para emissao "+dtoc(date())+" "+time())
    osayc0:Refresh()
  else
    te_val_ok = "N"
    oNFe := TACBrNFe():EnviarXml()
    if te_val_ok = "S" 
      osayc0:varput("NFCE Autorizada em ACBr "+dtoc(date())+" "+time())
      osayc0:Refresh()
      memvar->te_xml = "IMP"
    endif
  endif   
endif

if memvar->te_xml = "IMP"

  NFE_Imprimir(alltrim(memvar->te_tel_re1),,,"true")

  memvar->te_emitiu = "S"

  osayc0:varput("Aguardando Proxima Nota "+dtoc(date())+" "+time())
  osayc0:Refresh()
  osaycc:varput("Validade Certificado: "+dtoc(Dfimvalidade))
  osaycc:Refresh()
endif

esta é a torina de emissao, onde coloco estes 2 comandos?

 

 

[datilas]

10 minutos atrás, eclipse2047_comercial@hotm disse:

onde eu coloco isto?, 

como faco isto funcionar?

se voce usa:
ACBrNFe1.Enviar(seulote); //nesse caso a impressão é automatica

então voce pode fazer assim:
ACBrNFe1.Enviar(seulote);
ACBrNFe1.DANFE.PathPDF := 'suapastapdf';
ACBrNFe1.NotasFiscais.ImprimirPDF;
//*
se voce usa:
ACBrNFe1.Enviar(seulote, False, True) ;//nesse caso a impressão não é automatica

então voce pode fazer assim:
ACBrNFe1.Enviar(seulote, False, True) ;

// aki aparece na tela
ACBrNFe1.NotasFiscais.Imprimir;

// e depois que aparecer na tela
ACBrNFe1.DANFE.PathPDF := 'suapastapdf';
ACBrNFe1.NotasFiscais.ImprimirPDF;

lembrando que:
ACBrNFe1.DANFE.PathPDF := 'suapastapdf'; //voce pode alimentar onde vc faz a configuração do componente

 

10 minutos atrás, eclipse2047_comercial@hotm disse:

onde eu coloco isto?, 

como faco isto funcionar?

NFE_LimparLista()
NFE_LimparListaEventos()
SET CENTURY OFF

oNFe := TACBrNFe():ValidarXml(te_arq_vez,.t.)

**\ if oNfe:ValidarXml(te_arq_vez,.t.)
if oNfe = .t.
  osayc0:varput("XML Validado em ACBr "+dtoc(date())+" "+time())
  osayc0:Refresh()
  memvar->te_xml = "ON"
else  
  oNFe:cXML := ""
  memvar->te_xml = "OFF" 
endif

if memvar->te_xml = "ON"

  oNFe := TACBrNFe():StatusInternet()

  if oNFe = .F.    
    osayc0:varput("Sem Internet para emissao "+dtoc(date())+" "+time())
    osayc0:Refresh()
  else
    te_val_ok = "N"
    oNFe := TACBrNFe():EnviarXml()
    if te_val_ok = "S" 
      osayc0:varput("NFCE Autorizada em ACBr "+dtoc(date())+" "+time())
      osayc0:Refresh()
      memvar->te_xml = "IMP"
    endif
  endif   
endif

if memvar->te_xml = "IMP"

  NFE_Imprimir(alltrim(memvar->te_tel_re1),,,"true")

  memvar->te_emitiu = "S"

  osayc0:varput("Aguardando Proxima Nota "+dtoc(date())+" "+time())
  osayc0:Refresh()
  osaycc:varput("Validade Certificado: "+dtoc(Dfimvalidade))
  osaycc:Refresh()
endif

esta é a torina de emissao, onde coloco estes 2 comandos?

 

 

agora que vi... vc usa ACBrLib. desculpa eu não sabia. 

com ACBrLib não consigo te ajudar.

algum outro membro do forum, vai te ajudar melhor

Editado 7 Outubro, 2025 por datilas

[eclipse2047_comercial@hotm]

ok, mesmo assim obrigado datilas

tem mais alguem que pode me ajudar:?

 

[eclipse2047_comercial@hotm]

nas configuraroes tem o

PathPDF, me parece que seria o caminho pra salvr os PDF, eu coloquei la mas nao esta salvando

alguem tem outra coisa que se possa fazer pra gravar a nota em PDF automaticamente?

 

[eclipse2047_comercial@hotm]

tem tambem o NFE_SalvarPDF(), mas tambem nao funciona

me ajudem por favor

 

[IMATECH]

https://acbr.sourceforge.io/ACBrLib/MetodosNFe.html

Editado 8 Outubro, 2025 por IMATECH

[eclipse2047_comercial@hotm]

foi dai que peguei o NFE_SalvarPDF, porem nao funciona

 

[eclipse2047_comercial@hotm]

bom dia alguem tem como resolver isto?

 

[Juliomar Marchetti]

1 hora atrás, eclipse2047_comercial@hotm disse:

bom dia alguem tem como resolver isto?

 

Quando postar sobre a LIB use os canais da LIB, o pessoal vai achar que é o copmonente aqui e lhe passar como fazer no delphi

o método que tu postou acima funciona sim

só deve carregar o xml primeiro e depois comandar o PDF

[eclipse2047_comercial@hotm]

nao esta funcionando nao, a tela de impressao da nota aparece e o usuario escolhe onde vai imprimir a nota, como voce sabe, ousuario nao tem nocao de onde ele grava, (fora raras excessoes), entao eu queria que independente de onde ele mande gravar ou imprimir o sistema automaticamente gravasse a nota em uma pasta(pre definida) pra que ele possa reimprimir a hora que quiser pois eu ja tenho esperiencia dos usuario que na sua grande maioria se enrolam sempre entao quanto mais "masticado" a gente entregar pra eles menos problemas a gente vai ter

nao sei se voce me entendeu.(juliomar marchet)

 

 

 

[Juliomar Marchetti]

funciona com toda a certeza.

mas segue esse passo a passo do manual e certeza que vai dar 

https://acbr.sourceforge.io/ACBrLib/ComoemitirumaNFeouNFCe.html

os métodos estão descritos.

e lembrando aqui é um canal do componente em delphi e tu está usando a LIB certo

[IMATECH]

Em 07/10/2025 at 22:04, eclipse2047_comercial@hotm disse:

tem tambem o NFE_SalvarPDF(), mas tambem nao funciona

me ajudem por favor

 

NFE_SalvarPDF() não existe nos métodos. Simples assim.

[eclipse2047_comercial@hotm]

 

como nao tem, neste mesmo lugar que voce me mandou olhar (que nao tem nada sobre gravacao automatica de PDF)

tem este metodo (

tem este metodo que tambem nao esta funcionando

 

[Juliomar Marchetti]

Manda o https://acbr.sourceforge.io/ACBrLib/NFE_ImprimirPDF.html

[eclipse2047_comercial@hotm]

juliomar onde voce me mandou ver nao tem nada sobre a gravacao automatica do pdf

foi dai que eu tirei a minha rotina

o problema que estou tentando explicar é ter uma gravacao automatica independente do

cliente imprimir ou gravar em pdf

é isto que nao estou conseguinfo, tudo esta funcionando correto, estou emitindo a nota

gravando o XML, porem a gravacao automatica da nota em PDF é que nao estou

envcontrando onde deixar definido

 

este NFE_inprimirPDF() tambem nao esta fucnioando, nao esta gravando automatico esta

abrido a opcao para o cliente escolher onde quer imprimir é justamente isto

que eu nao quero que o cliente faca, quero que grave automaticamente em um lugar que eu deixar

definido 

 

[Juliomar Marchetti]

6 minutos atrás, eclipse2047_comercial@hotm disse:

juliomar onde voce me mandou ver nao tem nada sobre a gravacao automatica do pdf

automatico não tem mesmo.

o que te mandei são os comandos que tu tem que executar.

7 minutos atrás, eclipse2047_comercial@hotm disse:

gravando o XML, porem a gravacao automatica da nota em PDF é que nao estou

nao tem mesmo. tu tem que carregar o xml e mandar gerar o pdf ou imprimir pdf. ambos os casos vai gerar o pdf

o Salvar_PDF gera em base 64 o pdf. que na verdade internamente chama o imprimirpdf

[eclipse2047_comercial@hotm]

juliomar, me desculpe mas esta rotina que voce mandou, ela gera o PDF automatico?

ou apenas gera o PDF e eu escolho onde gravar?

 

[IMATECH]

O envio do XML para o destinatário é obrigatório correto ?
Aproveite este evento para ter o PDF salvo.

NFE_EnviarEmail(ePara, eXMLNFe, AEnviaPDF, eAssunto, eCC, eAnexos, eMensagem)

 

[eclipse2047_comercial@hotm]

correto imatech, usando o envio do xml ele grava o PDF?,é isto que eu entedi?

se ele envia ele deve ter gravado, entao onde ele grava?

[Juliomar Marchetti]

2 horas atrás, eclipse2047_comercial@hotm disse:

juliomar, me desculpe mas esta rotina que voce mandou, ela gera o PDF automatico?

ou apenas gera o PDF e eu escolho onde gravar?

 

não sei ao certo a diferença do que está querendo falar em automático.

mas ele gera um pdf. e retorna um caminho pra ti.

bora testar. manda os comandos e veja os resultados

[IMATECH]

10 horas atrás, eclipse2047_comercial@hotm disse:

correto imatech, usando o envio do xml ele grava o PDF?,é isto que eu entedi?

se ele envia ele deve ter gravado, entao onde ele grava?

.ini de configuração da LIB
PathPDF

[eclipse2047_comercial@hotm]

oi IMATECH.

estou usando o 

NFE_EnviarEmail(ePara, eXMLNFe, AEnviaPDF, eAssunto, eCC, eAnexos, eMensagem)

esta dando o erro

SetRetorno(-10, SMTP Error: Server not informed)

onde defino o SMTP, POP3, email emisso, login senha, etc,

 

 

 

[IMATECH]

Acredito ser falta de configuração da LIB ( .ini )

[Email]
NomeExibicao=
Endereco=
Email=
Usuario=
Senha=
Porta=0
ExigeSSL=0
ExigeTLS=0
Confirmacao=0
SegundoPlano=0
Codificacao=
HTML=0
AttemptsMail=3
TimeOutMail=0
SSLType=0
MensagemNFe=
AssuntoNFe=
MensagemCTe=
AssuntoCTe=
MensagemMDFe=
AssuntoMDFe=
AssuntoBPe=
MensagemNFSe=
AssuntoNFSe=