Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

logo_acbr_paygo.png

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


Saiba mais

beneficios.png

click.png

click.png

click.png

Lista de Rejeições NFS-e (Envio Sincrono)


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

Recommended Posts

  • Consultores
  • Solution

Boa tarde,

Segue um exemplo:

            if ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Count > 0 then
            begin

                   // as linhas abaixo é interessante colocar em um loop, pois pode ser retornado mais de uma rejeição
                   sStat   := ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Items[0].Codigo;
                   sMotivo := ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Items[0].Mensagem;
            end
            else
            begin
                   sStat   := '';
                   sMotivo := '';
            end;
 

  • Like 3
Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

  • 2 months later...
Em 21/01/2019 at 16:15, Italo Jurisato Junior disse:

Boa tarde,

Segue um exemplo:

            if ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Count > 0 then
            begin

                   // as linhas abaixo é interessante colocar em um loop, pois pode ser retornado mais de uma rejeição
                   sStat   := ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Items[0].Codigo;
                   sMotivo := ACBrNFSe.WebServices.EnviarSincrono.RetornoNFSe.ListaNfse.MsgRetorno.Items[0].Mensagem;
            end
            else
            begin
                   sStat   := '';
                   sMotivo := '';
            end;
 

Bom dia, Italo

simulei um erro (tentei enviar um rps com um número de lote que já havia sido transformado em nota), o componente AcbrNFSe gerou um exceção e quando foi tentar verificar se a propriedade MsgRetorno era maior que zero, deu erro de access violation.

Neste caso, como proceder?

 

Obrigado.

 

 

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.