Erro: Não existe NFe com a chave... carregada

[FelipeLopes]

Boa tarde senhores, estou incrementando o manifesto de destinatários.

quando envio o envento, esta retonando um erro(em anexo) informando que nao existe a chave carregada:

InfEvento.cOrgao   := StrToInt(Copy(cdsmanifestodestinatariochavedeacessp.AsString,1,2));
 infEvento.chNFe    := cdsmanifestodestinatariochavedeacessp.AsString;
 infEvento.CNPJ     := qryempresacnpj.AsString;
 infEvento.dhEvento := now;
 infEvento.tpEvento := teManifDestConfirmacao;

       try
           ACBrNFe1.EnviarEvento(cdsmanifestodestinatario.RecNo);

Podem me informar o que ocasiona esse erro?

 

Atenciosamente, 

 

Felipe Lopes

 

[FelipeLopes]

na propriedade    InfEvento.cOrgao   coloquei o valor de 91.
Esse erro so ocorre a partir do segundo envio, exemplo.

Entro no sistema e envio o evento normalmente.
Se eu for enviar novamente o evento em sequencia, ocorre o erro.

esvazio o compornente(ACBrNFe1.EventoNFe.Evento.Clear;) antes de refazer o processo novamente.

 

Se eu sair do sistema e entrar novamente, consigo enviar normalmente o documento antes com erro.

Atenciosamente,

[Italo Giurizzato Junior]

Boa tarde Felipe,

Você esta criando os componentes ACBr em tempo de execução?

Pelo seu relato também pode ser algum problema na sua rotina ao ler os dados do banco de dados, que na segunda vez que faz a leitura não esta lendo.

A minha sugestão é que você "debugue" a sua rotina.

[José M. S. Junior]

Verifique se está limpando o objeto antes do segundo envio... ex:

ACBrNFe1.EventoNFe.Evento.Clear;

[FelipeLopes]

Bom dia, descobri o erro.
é que tenho uma rotina apos o recebimeto do arquivo xml onde carrego todas as informações de impostos para o banco de dados.
Não estava limpando o componente apos essa rotina.
Obrigado turma.
 

[Italo Giurizzato Junior]

Obrigado por reportar.

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