brunohk

mas ele nem chega a retnorar pois o retorno ta dentro do if da função ACBrNFe.EnviarEventoNFe(NumeroLote) como é retnornada um falso ele não pega o retorno e a função EventoRetorno.retEvento.Items[X].RetInfEvento.cStat não e reconhecida fora do if mesmo dando erro na ACBrNFe.EnviarEventoNFe(NumeroLote) ele traz um retorno?

Bom dia, Estou criando o evento de cancelamento da nota da seguinte forma: NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW)); //carregar o xml da nota ACBrNFe.NotasFiscais.Clear; ACBrNFe.NotasFiscais.LoadFromFile(CaminhoXML); //cria evento cancelamento ACBrNFe.EventoNFe.Evento.Clear; ACBrNFe.EventoNFe.idLote := NumeroLote; try with ACBrNFe.EventoNFe.Evento.Add do begin InfEvento.chNFe := ChaveNF; InfEvento.CNPJ := aCNPJ; InfEvento.dhEvento:= now; InfEvento.tpEvento:= teCancelamento; InfEvento.detEvento.nProt := ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.nProt; InfEvento.detEvento.xJust := xMotivo; end; //enviar o evento de cancelamento if ACBrNFe.EnviarEventoNFe(NumeroLote) then begin with ACBrNFe.WebServices.EnvEvento do begin if EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 135 then begin raise Exception.CreateFmt( 'Ocorreu o seguinte erro ao cancelar a nota fiscal eletrônica:' + sLineBreak + 'Código:%d' + sLineBreak + 'Motivo: %s', [ EventoRetorno.retEvento.Items[0].RetInfEvento.cStat, EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo]); end; // retornos DataHoraEvento := EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento; NumeroProtocolo := EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; XMLCancelamento := EventoRetorno.retEvento.Items[0].RetInfEvento.XML; sl.Text := EventoRetorno.retEvento.Items[0].RetInfEvento.XML; CodigoStatus := EventoRetorno.retEvento.Items[0].RetInfEvento.cStat; MotivoStatus := EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo; No ambiente de homologaçao e nos cliente em produção funcionou em quase todos mas teve um caso espcial em que na chamada do metodo ACBrNFe.EnviarEventoNFe(NumeroLote) ele simplesmente não executou o cancelamento retornando falso mas tambem não acusa nenhum erro, tentei desativar o firewall e ate mesmo desativei o anti-virus com medo que estivesse bloquando algo mas ele passa verifiquei todos parametros do evento e estão todos correto tambem, alguem passou por algo semelhante ou tem alguma sugestão do que pode estar ocasionando isso?

deu certo Regys valeu pela ajuda

bom dia, estou usando um gerenciador da auttar e ele está fazendo todas as transações corretamente, no entanto eu precisaria de no momento da transação ou logo após saber qual o codigo NSU da transação, existe alguma forma de pega-lo através do ACBrTEFD1 ou ACBrECF1?? Att. Bruno