Registros PAF-NFC-e

[Perfect7]

Bom dia!

Eu linguei os componentes ACBrPAF.EAD :=ACBrEAD mudei o campo Layout para lpPAFNFCe e inclui as chaves em 

procedure TForm6.ACBrEADGetChavePrivada(var Chave: AnsiString);
procedure TForm6.ACBrEADGetChavePublica(var Chave: AnsiString);
 

e marquei Assinar Arquivos com EAD, porem não esta gerando para mim os dados EAD no final do arquivo do botão "Tipo Z"

falta em preencher algo?

[antonio.carlos]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[Juliomar Marchetti]

Estranho mesmo. rodei aqui o exemplo. consegue depurar com o f8 e f7 pra entrar e ver se ele está configurado para assinar?

[Perfect7]

Esta parando nessa função, ainda não entedi o porque, mais parece que esta faltando iniciar alguma coisa

function TACBrPAF.AssinaArquivoComEAD(const Arquivo: String): Boolean;
begin
  if Assigned(fsOnPAFCalcEAD ) then
 -->    fsOnPAFCalcEAD( Arquivo )
  else
     GetACBrEAD.AssinarArquivoComEAD( Arquivo ) ;

  Result := True;
end;
 

[Perfect7]

@Juliomar Marchetti

Resolvido

Falha minha, eu inverti os dados da chave ACBrEADGetChavePrivada e ACBrEADGetChavePublica

Coloquei certinho cada um no seu lugar e funcionou

[antonio.carlos]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.