Erro Ao Cancelar Nfse Betha

[Cesar Balbinott]

Boa noite, estou com problema para cancelar uma NFSe.

 

estou usando este código:

 

 

       ACBrNFSe1.NotasFiscais.Clear;
       ACBrNFSe1.NotasFiscais.LoadFromFile(caminho_nfse);
       ACBrNFSe1.NotasFiscais.Items[0].NFSe.MotivoCancelamento:= 'teste de nfse cancelada';
       ACBrNFSe1.CancelarNFSe('1');

 

já tentei também com este:

 

       

 ACBrNFSe1.WebServices.CancelaNFSe('1', nume_nfse, '08584793000145', '3336', '4219705');

 

tive alguns erros no inicio por não passar o provedor, mas este problema resolvi setando direto no código o provedor que estou utilizando, agora o problema é o seguinte, quando eu envio o cancelamento, da o seguinte erro:

 

Project FusionERP.exe raised exception class ESOAPHTTPException with message 'Parâmetro incorreto. - URL: - SOAPAction:http://www.betha.com.br/e-nota-contribuinte-ws/consultarNfse'. Process stopped. Use Step or Run to continue.

 

procurei no arquivo AcbrProvedorBetha e realmente está linkando para este endereço.

 

function TProvedorBetha.GetSoapAction(Acao: TnfseAcao; NomeCidade: String): String;
begin
 case Acao of
   acRecepcionar: Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/recepcionarLoteRps';
   acConsSit:     Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/ConsultarSituacaoLoteRpsEnvio';
   acConsLote:    Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/consultarLoteRps';
   acConsNFSeRps: Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/consultarNfsePorRps';
   acConsNFSe:    Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/consultarNfse';
   acCancelar:    Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/cancelarNfse';
   acGerar:       Result := '';
 end;
end;

já alterei o link do acCancelar para 

 

https://e-gov.betha.com.br/e-nota-contribuinte-ws/cancelarNfse?wsdl

 

mas mesmo assim não funcionou.

 

Oque devo fazer?

 

Sei que o post ficou meio extenso e como é o primeiro tópico que crio aqui no fórum, se tiver algo contra as regras do fórum me avisem.

 

Qualquer ajuda será muito bem vinda.

 

 

 

        

[Italo Giurizzato Junior]

Bom dia Cesar,

 

O Cancelar executa dois passos:

 

1. Envia a solicitação de cancelamento;

2. Realiza uma consutla para obter o XML da NFS-e com o grupo que contem as TAGs sobre o cancelamento da mesma.

 

É preciso saber em qual momento esta ocorrendo o problema.

 

O que tudo indica é na hora de realizar a consulta.

 

O mais estranho é que o segundo passo se utiliza da Consulta da NFSe por RPS e a mensagem de erro se refere ao SoapAction  da Consulta da NFSe.

 

Após executar o cancelamento, você não esta executando o ConsultarNFSe ?

[Cesar Balbinott]

Bom dia Italo,

 

Não sei se ajuda, mas eu estava debugando aqui e o erro da nesta parte do código

 

na função

 

TNFSeCancelarNfse.Executar: Boolean;

 

na linha 4224

ReqResp.Execute(Acao.Text, Stream);

 

quando passa por aqui, da o erro.

 

Outro detalhe, eu tentei também realizar uma consulta da NFSe e deu o mesmo erro.

[Italo Giurizzato Junior]

Cesar,

 

Faça o seguinte teste:

 

Na function GetSoapAction altere de:

 

acCancelar:    Result := 'http://www.betha.com.br/e-nota-contribuinte-ws/cancelarNfse';

 

para:

 

acCancelar:    Result := '';

 

[Cesar Balbinott]

Alterei, agora a mensagem é esta:

 

Project FusionERP.exe raised exception class ESOAPHTTPException with message 'Parâmetro incorreto. - URL: - SOAPAction:""'. Process stopped. Use Step or Run to continue.

[Italo Giurizzato Junior]

Boa tarde Cesar,

 

Você diz que o erro ocorre na linha 4224 da function: TNFSeCancelarNfse.Executar: Boolean;

 

mais precisamente em:

 

    ReqResp.Execute(Acao.Text, Stream);
 

só que no meu fonte esta linha é a de numero 4026.

 

Você esta com os fontes atualizados?

[Cesar Balbinott]

eu baixei os fontes dia 31/01, como vejo se estão atualizados?

 

desculpe as várias perguntas, sou iniciante em nfse e acbr.

[Italo Giurizzato Junior]

Bom dia Cesar,

 

Verifique se o icone do arquivo contem uma bolinha verde.

 

Se estiver vermelha significa que você alterou ele, dai ao baixar a atualização ele não é atualizado.

 

Procure baixar atualização diariamente.

[tiagoshimizu]

Pessoal, também estou tendo problemas no cancelamento de NFS-e. Na realidade, problemas com o retorno. Estou cancelando a NFS-e da seguinte maneira:

try        
  ACBrNFSe.NotasFiscais.LoadFromFile(Arquivo);
  ACBrNFSe.NotasFiscais.Items[0].NFSe.MotivoCancelamento :=
        cds_notas.Fields[2].AsString;
  if ACBrNFSe.CancelarNFSe('1') then
    ShowMessage('Cancelada') 
  else
    ShowMessage('Não Cancelada');
except
  on e:exception do
  ShowMessage('Erro: ' + e.message)
end;

Quando executado, gera erro na linha 3682 do arquivo ACBrNFSeWebServices.

        FConfiguracoes.Geral.Save(NFSeRetorno.ListaNfse.CompNfse.Items[i].Nfse.Numero + '-nfse.xml',
                                  FRetNfse, PathSalvar);

Quando consulto a nota pelo site do estado, ela tá cancelada. Alguem poderia me ajudar?

Estou utilizando o servidor de homologação ISSCuritiba.

 

Obrigado desde já pela ajuda.

 

Obs: Atualizei a pasta dos componentes ACBr com a última versão.

Editado 6 Março, 2014 por tiagoshimizu

[wilker]

Esse método Save salva o arquivo XML no sistema de arquivo.

 

Os parâmetros estão corretos ?

 

Sua aplicação possui permissões de escrita nesta pasta ? 

 

A pasta existe ?

 

Qual é exatamente o Exception levantado ?

 

espero ter ajudado

 

Wilker

[tiagoshimizu]

Bom dia Wilker.

 

Obrigado pela ajuda.

 

Respondendo as suas perguntas, os parâmetros que estou passando possivelmente estejam corretos sim pois, criar e enviar ele faz normal. Até mesmo o cancelamento ele realiza na base da receita.

 

Executo a aplicação como administrador e ele tem uma pasta específica que salva todos os arquivos gerados, até mesmo os de retorno desse cancelamento.

 

A exception ocorre exatamente em NFSeRetorno.ListaNfse.CompNfse.Items[i].Nfse.Numero. Debugando o fonte, ele dá que NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.Numero = nil.

 

Agradeço a disposição de ajudar.

[tiagoshimizu]

Pessoal, achei melhor criar um tópico com o meu problema para separar, pois são erros parecidos porem de servidores diferente.

 

Obrigado.

[Leandro Araújo]

Também estou com problema para cancelar uma NFS-e em ambiente de homologação com o provedor Coplan, no MT.

O erro que me é retornado é o seguinte:

E9999

Mensagem: Erro desconhecido

O erro ocorre ao tentar cancelar uma NFS-e com os códigos de cancelamento (1 - Erro de emissão) e (2 - Serviço não concluído).

 

Não tenho idéia do que possa ser.

Obrigado.

Editado 17 Maio, 2014 por Leandro Araújo

[Leandro Araújo]

Result := ACBrNFSe1.WebServices.CancelaNFSe('2', '215', '00000000000000', '0000', '5102678'); 

Agora estou fazendo dessa forma, porém me retorna o erro:

E9999

Zero length BigInteger.

[marcoanjos]

Bom dia, estou com um problema para cancelar uma NFS-e.

 

O provedor é a Betha.

 

Atualizei o componente dia 10/06/2014.

 

Estou usando o seguinte método:

 

Result := ACBrNFSe1.WebServices.CancelaNFSe('1', '215', '59214522000139', '5178', '4108502');

 

Quando executo o método retorna a mensagem: " " is not a valid interger value.

 

O erro ocorre na linha 3741 do arquivo ACBrNFSeWebServices na ultima linha desse trecho de código:

 

// Alterado por Rosemir Zeferino em 24/05/2013

  if (FProvedor = proIssDsf )then

    Result := NFSeRetorno.LerXml_provedorIssDsf //falta homologar

  else if (FProvedor = proEquiplano) then

    Result := NFSeRetorno.LerXML_provedorEquiplano

  else

    Result := NFSeRetorno.LerXml;   <<<<<<< ====== aqui

 

a função é a TNFSeConsultarNfseRPS.

 

Pelo que vi o erro está relacionado a segunda etapa do cancelamento, quando o rps é consultado, pois se tento cancelar novamente o WS retorna que a NFS-e já foi cancelada. 

[Italo Giurizzato Junior]

Boa tarde Marco,

 

Você tentou carregar o XML da NFS-e antes de solicitar o seu cancelamento?

[Schinobli]

Não sei se ajuda... mas para cancelar eu faço assim e esta cancelando nos provedores Lexson(Foz do iguaçu-PR) e no Pronim(Pato Branco-PR):

 

[..]

//Carrego o XML

ACBrNFSe1.NotasFiscais.LoadFromStream(vStream);

[..]

//Passo como parametro valor '0'
ACBrNFSe1.CancelarNFSe('0');