Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

consultoria_sticker.png

Conteúdo para desenvolvedores
 ao vivo de terça a quinta!
Saiba mais

dev.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

Cancelamento de NFe


Go to solution Solved by BigWings,
  • Este tópico foi criado há 203 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

  • Usuários SAC

Boa tarde,

Estou fazendo o cancelamento de NFe, mas estou tendo dúvida sobre o cStat do Retorno.

A nota esta com 48 horas de emissão, então deveria retornar erro, informando que a nota está fora do prazo de cancelamento.

      ACBrNFe.EventoNFe.Evento.Clear;
      with ACBrNFe.EventoNFe.Evento.New do
      begin
        infEvento.chNFe                    := dsNotasSaidas.DataSet.FieldByName('ChaveNFe_NotaSaida_Material').AsString;
        infEvento.detEvento.nProt  := dsNotasSaidas.DataSet.FieldByName('ProtocNFe_NotaSaida_Material').AsString;
        infEvento.CNPJ                     := vCNPJCertificado;
        infEvento.dhEvento               := LerDataHoraAtual;
        infEvento.tpEvento               := teCancelamento;
        infEvento.detEvento.xJust := Justificativa;
      end;

      Retorno := ACBrNFe.EnviarEvento(1);

      vCodRetorno := ACBrNFe.WebServices.Consulta.cStat;
      vRetorno    := IntToStr(ACBrNFe.WebServices.EnvEvento.cStat);

       Retornos:
           Retorno          = true
           vCodRetorno = 100
           vRetorno        = 128   (Lote de Evento Processado: o lote foi processado), quando deveria retornar o cStat 135 (Evento registrado e vinculado a NF-e: recebido...)

Como saber se o procedimento de cancelamento foi efetivado?

Grato pela atenção

Link to post
Share on other sites
  • Solution
3 minutos atrás, Luiz Carlos de Lima disse:

Como saber se o procedimento de cancelamento foi efetivado?

 

ACBrNFe1.EnviarEvento(nLote);

cStat := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat;
nProt := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;
xMotivo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;

 

  • Like 2
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link to post
Share on other sites
  • Este tópico foi criado há 203 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui
Guest
This topic is now closed to further replies.
×
×
  • Create New...