Capturar chave da NFS-e

[Maurício Sareto]

Galera, boa tarde, tenho uma pequena duvida sobre a emissão de uma NFSe. Ao enviar um RPS para a prefeitura a mesma retorna a NFS-e, como eu posso fazer para capturar a chave dessa NFS-e?

[Italo Giurizzato Junior]

Boa tarde Mauricio,

Todos os provedores que seguem o layout da ABRASF não tem em seu layout um campo com a chave.

O que tem é um campo com o código de verificação.

Pelo que me recordo somente um provedor que tem um campo com a chave.

Sem eu saber qual é o provedor não temos como lhe ajudar.

[Maurício Sareto]

O provedor é SystemPro, mas na verdade eu que não estava entendendo o código legado aqui, agora ja consegui.

Tenho só um outro detalhe que ao consulta eu tenho o retorno do XML da NFSe que é salvo em disco, porém, parece que o mesmo não é lido pelo componente por que a propriedade situação fica em branco.

Estou usando assim:

Response := FACBrNFSe.ConsultarNFSePorFaixa(IntToStr(FNotaFiscal.NUMERO),IntToStr(FNotaFiscal.NUMERO));
ProcessarResposta(Response);

Na procedure ProcessarRespota
if Response is TNFSeConsultaNFSeResponse then
  begin
    ShowMessage('Situação: '+ TNFSeConsultaNFSeResponse(Response).InfRetorno.Situacao);
  end;

Caso precise abrir outro topico me avise que eu faço

[Italo Giurizzato Junior]

Mauricio,

Você esta com os seus fontes desatualizados.

Favor atualizar todos os fontes de todas as pastas e reinstale a suíte ACBr.

Como os métodos mudaram de Function para Procedure te aconselho a ler esse artigo:

 

[Maurício Sareto]

1 minuto atrás, Italo Giurizzato Junior disse:

Mauricio,

Você esta com os seus fontes desatualizados.

Favor atualizar todos os fontes de todas as pastas e reinstale a suíte ACBr.

Como os métodos mudaram de Function para Procedure te aconselho a ler esse artigo:

 

Top, irei fazer isso, obrigado