Boa tarde..fiz algumas mudanças no envio da NFe e aparentemente encontrei onde ocorre o problema. Percebi que ao colocar a fatura na NFe da o erro. Estranho que mesmo com a impressão errada, se eu for em outro FORM e reemitir o DANFE, ele sai correto. Por esse motivo fiz a rotina abaixo tentando resolver o problema.
No comando ACBrNFe1.Enviar(StrToint(edtNf.Text), FALSE); coloquei a propriedade FALSE para não imprimir e depois de atualizar minhas tabelas e gerar o procXML, dei um Clear no componente e carreguei o XML com o LoadFromFile novamente. Mesmo assim não deu certo
ACBrNFe1.NotasFiscais.Clear;
ACBrNFe1.NotasFiscais.LoadFromFile(frmImpNf.tabEmpPathNfe.AsString+'\'+NomeArq,False);
// Gerar PDF
ACBrNFe1.NotasFiscais.ImprimirPDF;
// Gerar DANFE
ACBrNFe1.NotasFiscais.Imprimir;
Coloquei a rotina de como mando a fatura para o componente ACBR, se alguém puder analisar eu agradeço. Essa rotina é muito antiga e tentei fazer algumas mudanças nela recentemente. Fonte Fatura Acbr.txt
no aguardo,
att
Alexandre
fonte fatura acbr.txt