mensagem de erro ao enviar nfe

[Marcelo Tonieto II]

           ACBrNFe1.NotasFiscais.Assinar;
            ACBrNFe1.Enviar(1);

            // se houver erro na emissao ... aparece a tela em anexo ... e os comandos abaixo sao ignorados
           // como fazer para capturar o erro para poder gerencia-lo

            MemoResp.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetWS);
            memoRespWS.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetornoWS);

[Renato Rubinho]

Bom dia Marcelo,

Aparentemente isso é uma exceção, que não está tratada no seu fonte, e interrompe o processo.

Coloca um try..except no ACBrNFe1.Enviar, para controlar como preferir e seguir com o fluxo do sistema sem a exceção.

[Juliomar Marchetti]

18 horas atrás, Marcelo Tonieto II disse:

           ACBrNFe1.NotasFiscais.Assinar;
            ACBrNFe1.Enviar(1);

            // se houver erro na emissao ... aparece a tela em anexo ... e os comandos abaixo sao ignorados
           // como fazer para capturar o erro para poder gerencia-lo

            MemoResp.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetWS);
            memoRespWS.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetornoWS);

se notar o método que tu chama tem um true e false, no caso é uma função. tentou um IF?

[RicardoVoigt]

18 horas atrás, Marcelo Tonieto II disse:

           ACBrNFe1.NotasFiscais.Assinar;
            ACBrNFe1.Enviar(1);

            // se houver erro na emissao ... aparece a tela em anexo ... e os comandos abaixo sao ignorados
           // como fazer para capturar o erro para poder gerencia-lo

            MemoResp.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetWS);
            memoRespWS.Lines.Text := (ACBrNFe1.WebServices.Retorno.RetornoWS);

Bom dia,

a nota numero 3276 que vc esta tentando emitir já existe no ambiente (homologação/produção) selecionado...

OBS: O ideal é vc não alterar a chave de acesso (guardando o cNF no seu BD) a cada tentativa de envio da nota (eu fazia isso   )

Att

Ricardo

 

[Marcelo Tonieto II]

sim. Estou retificando o codigo. 

Obrigado .

 

obrigado a todos pelas orientações.