Para Exibir o MD5 do PAF-ECF no campo de informações complementares do Danfe no componente ACBR é muito simples, basta informar na propriedade InfAdic da Nfe.
ACBrNFe1.NotasFiscais.Items[0].NFe.InfAdic.infAdFisco := MD5;
Veja no exemplo abaixo:
var Nfe: string; begin Nfe := DirNFeXMLs + '\' + Numero + '.xml'; if not FileExists(Nfe) then raise Exception.Create('XML da Nota não encontrado'); ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(Nfe); if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis = teDPEC then begin ACBrNFe1.WebServices.ConsultaDPEC.NFeChave := ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID; ACBrNFe1.WebServices.ConsultaDPEC.Executar; ACBrNFe1.DANFE.ProtocoloNFe := ACBrNFe1.WebServices.ConsultaDPEC.nRegDPEC + ' ' + DateTimeToStr(ACBrNFe1.WebServices.ConsultaDPEC.dhRegDPEC); end; ACBrNFe1.NotasFiscais.Items[0].NFe.InfAdic.infAdFisco := MD5 ; ACBrNFe1.NotasFiscais.Imprimir; end;
E a impressão no Danfe: