CCe com Rejeição de Chave de Acesso Inexistente

[BrunoConsyst]

Boa tarde pessoal,

Estou tendo problemas pra emitir uma CC-e em produção.

Fiz todo procedimento de envio conforme o exemplo porém persiste em rejeição 494: Chave de Acesso inexistente!

- <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

  <idLote>1917041520</idLote>

  <tpAmb>2</tpAmb>

  <verAplic>NFEPE_H_22.01.07.185</verAplic>

  <cOrgao>26</cOrgao>

  <cStat>128</cStat>

  <xMotivo>Lote de Evento Processado</xMotivo>

- <retEvento versao="1.00">

- <infEvento>

  <tpAmb>2</tpAmb>

  <verAplic>NFEPE_H_22.01.07.185</verAplic>

  <cOrgao>26</cOrgao>

  <cStat>494</cStat>

  <xMotivo>Rejeição: Chave de Acesso inexistente</xMotivo>

  <chNFe>26190307097998000133550010000001981000001985</chNFe>

  <tpEvento>110110</tpEvento>

  <dhRegEvento>2019-04-17T15:22:00-03:00</dhRegEvento>

  </infEvento>

  </retEvento>

  </retEnvEvento>

 

 

1917041520-eve.xml 1917041520-eve-soap.xml 1917041520-ped-eve.xml 1917041520-ped-eve-soap.xml

[BrunoConsyst]

Alguém pra me ajudar?

[Juliana Tamizou]

Bom dia.

Sugiro analisar a assinatura do serviço SAC ACBr já que você parece ter urgência na resposta...aproveite e considere a assinatura anual que também lhe dará direto de acesso ao chat  ACBR.

Att.

[BigWings]

21 horas atrás, BrunoConsyst disse:

Estou tendo problemas pra emitir uma CC-e em produção.

Fiz todo procedimento de envio conforme o exemplo porém persiste em rejeição 494: Chave de Acesso inexistente! 

- <retEnvEvento versao="1.00" xmlns="http://www.portalfiscal.inf.br/nfe">

  <idLote>1917041520</idLote>

  <tpAmb>2</tpAmb>

Veja que está enviando em homologação e não produção.

[BrunoConsyst]

3 horas atrás, BigWings disse:

Veja que está enviando em homologação e não produção.

Estou setando pra produção diretamente na linha de código:

 

procedure TFrmNFe.BitBtn2Click(Sender: TObject);
var Chave, idLote, CNPJ, nSeqEvento, Correcao : string;
    NumeroLote : Integer;
begin
  if Application.MessageBox('Deseja Enivar uma Carta de Correção?','ATENÇÃO - CONSYST Sistemas Empresariais',MB_ICONQUESTION + MB_YESNO)=mryes then
  begin
    idLote                                :=  FormatDateTime('yyddmmhhmm', Now);
    nSeqEvento                            :=  '1';
    NumeroLote                            :=  1;

    ACBrNFe1.EventoNFe.Evento.Clear;
    with ACBrNFe1.EventoNFe.Evento.Add do
     begin
      InfEvento.tpAmb                     :=  taProducao;
      infEvento.chNFe                     :=  ed_chave.Text;
      InfEvento.CNPJ                      :=  dm1.TB_EMPRESACNPJ.Value;
      infEvento.dhEvento                  :=  now;
      infEvento.tpEvento                  :=  teCCe;
      infEvento.nSeqEvento                :=  StrToInt(ed_cceSqc.Text);
      infEvento.detEvento.descEvento      :=  'Carta de Correção';
      infEvento.detEvento.xCorrecao       :=  ed_jusficativa.Text;
     end;

    ACBrNFe1.EnviarEvento(StrToInt(idLote));

    MemoResp.Lines.Text                   := ACBrNFe1.WebServices.EnvEvento.RetWS;
    LoadXML(MemoResp, WBResposta);

    ShowMessage('Carta de Correção Registrada com Sucesso!');
  end;
end;

 

Eu percebi que a opção taProdução (0) e Homologação é taHomologação (1), pq mp XML aparece 2?

[BigWings]

33 minutos atrás, BrunoConsyst disse:

Estou setando pra produção diretamente na linha de código:

Veja pelo debug como está a propriedade ACBrNFe1.Configuracoes.WebServices.Ambiente no momento do envio do evento.

[BrunoConsyst]

7 minutos atrás, BigWings disse:

Veja pelo debug como está a propriedade ACBrNFe1.Configuracoes.WebServices.Ambiente no momento do envio do evento.

Realmente o problema era o ambiente no momento do envio.

Mais uma vez BigWings solucionando meus problemas, obrigado amigo de asas grandes!!!

[Juliana Tamizou]

Obrigado por reportar.

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