Cancelamento NFSeX Simpliss CodMunicipio

[Valmor Reblin.]

Boa tarde, temos um problema referente ao Cancelamento da NFSe da Simpliss, é necessário a TAG, com o codigoIBGE do Prestador,  <CodigoMunicipio>0</CodigoMunicipio>, ao ver o fonte , não possiu , mesmo na ultima atualização,

alguem mais teve este problema?

 

procedure TACBrNFSeX.CancelarNFSe(aInfCancelamento: TInfCancelamento);
begin
  if not Assigned(FProvider) then
    raise EACBrNFSeException.Create(ERR_SEM_PROVEDOR);

  FWebService.CancelaNFSe.Clear;

  with FWebService.CancelaNFSe.InfCancelamento do
  begin
    NumeroNFSe := aInfCancelamento.NumeroNFSe;
    SerieNFSe := aInfCancelamento.SerieNFSe;
    ChaveNFSe := aInfCancelamento.ChaveNFSe;
    DataEmissaoNFSe := aInfCancelamento.DataEmissaoNFSe;
    CodCancelamento := aInfCancelamento.CodCancelamento;
    MotCancelamento := TiraAcentos(ChangeLineBreak(aInfCancelamento.MotCancelamento));
    NumeroLote := aInfCancelamento.NumeroLote;
    NumeroRps := aInfCancelamento.NumeroRps;
    SerieRps := aInfCancelamento.SerieRps;
    ValorNFSe := aInfCancelamento.ValorNFSe;
    CodVerificacao := aInfCancelamento.CodVerificacao;
    email := aInfCancelamento.email;
    NumeroNFSeSubst := aInfCancelamento.NumeroNFSeSubst;
    SerieNFSeSubst := aInfCancelamento.SerieNFSeSubst;
    CodServ := aInfCancelamento.CodServ; 

    if (ChaveNFSe <> '') and (NumeroNFSe = '') then
      NumeroNFSe := Copy(ChaveNFSe, 22, 9);
  end;

[Juliomar Marchetti]

Boa tarde

não , mas ao efetuar a alteração e adição da informação ele funcionou?

se sim anexe o fonte

[Valmor Reblin.]

Funcionou para o provedor Simpliss (Acredito que o campo sem conteudo para outros provedores, nao apresente problema)

ACBrNFSeX.pas

[Italo Giurizzato Junior]

Bom dia @Valmor Reblin.,

Comparando a unit que você anexou com o que esta no SVN notei que você removeu a linha que checa o código do município, caso não tenha sido informado se utiliza do código do município configurado.

Porque dessa alteração?

[Valmor Reblin.]

Opa Italo, no SIMPLISS no cancelamento não tinha esta linha   CodMunicipio := aInfCancelamento.CodMunicipio;

precisei incluir para poder cancelar neste metodo ==> procedure TACBrNFSeX.CancelarNFSe(aInfCancelamento: TInfCancelamento);

[Italo Giurizzato Junior]

Bom dia @Valmor Reblin.,

Então os seus fontes estão desatualizados.

Você tem fontes do ACBr com alterações locais?
Verifica se não tem nenhuma unit do ACBr com uma bolinha vermelha em seu ícone, caso afirmativo delete a unit.
Atualize todos os fontes de todas as pastas.
Reinstale o ACBr com a opção de apagar arquivos antigos marcada.
Compile a aplicação com a opção Build.
Por fim repita os testes.
 

[Valmor Reblin.]

Tudo certo, consegui Enviar e Cancelar a NFSe, obrigado  equipe ACBR, so tive que fazer no ambiente de Podução, o de Homologação estava com bugs

[Alexandre de Paula]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.