NFSeX - Cancelamento por Substituição

[leandro.cm]

Boa tarde!

Estou testando a emissão de nota fiscal substituta informando a nota a ser cancelada nas propriedades subst.chSubstda, subst.cMotivo e subst.xMotivo. Verifiquei que a nova nota é gerada sem problema e a nota referenciada é cancelada, porém, notei que não exibe o código da nota substituída na impressão do DANFSE. 

Não encontrei no manual nada a respeito do código da nota substituída. 

Gostaria de confirmar se há alguma forma de informar o código na impressão do DANFSE.

Desde já, grato pelo auxílio.

Leandro

[Italo Giurizzato Junior]

Boa tarde Leandro,

Você poderia anexar o XML da nota que substituiu a que foi cancelada, para que possamos analisar o problema?

[leandro.cm]

Boa tarde Ítalo!

Segue anexo o XML. Não consta nenhuma informação a respeito da nota substituída.

Att.

Leandro

43149022272120074000172000000000002423100915055912-nfse.xml

[Italo Giurizzato Junior]

Leandro,

Muito obrigado, já inclui na minha lista de tarefas para analise. TK-4637

[Italo Giurizzato Junior]

Bom dia Leandro,

Favor atualizar todos fontes de todas as pastas, reinstale o ACBr e faça novos testes.

[leandro.cm]

Bom dia Ítalo!

Realizei novo teste após reinstalar o ACBr e continua sem exibir o número da NFSe substituída.

Seguem anexos o XML e o DNFSE.

Att.
Leandro

43149022272120074000172000000000003723108443696234-nfse.xml NFS-e 37.pdf

[leandro.cm]

Olá Ítalo!

Realizando testes no ambiente de produção, ao baixar a DANFSe do portal, notei que há, nas informações complementares, referência somente à chave da NFSe substituída.

Segue anexo o DANFEs.

Att.
Leandro

43149022272120074000172000000000000523106246947852.pdf

[Italo Giurizzato Junior]

Boa tarde Leandro,

No XML que você anexou acima temos:

<subst>
	<chSubstda>43149022272120074000172000000000003623101570676550</chSubstda>
	<cMotivo>99</cMotivo>
	<xMotivo>Teste de substituicao</xMotivo>
</subst>

A chave que consta na tag chSubstda é a chave da nota que foi substituída.

Na unit PadraoNacional.LerXml temos:

procedure TNFSeR_PadraoNacional.LerSubstituicao(const ANode: TACBrXmlNode);
var
  AuxNode: TACBrXmlNode;
  Ok: Boolean;
begin
  AuxNode := ANode.Childrens.FindAnyNs('subst');

  if AuxNode <> nil then
  begin
      {
      A formação da chSubstda de 50 posições da NFS é:

      Cód.Mun. (7) +
      Amb.Ger. (1) +
      Tipo de Inscrição Federal (1) +
      Inscrição Federal (14 - CPF completar com 000 à esquerda) +
      nNFSe (13) +
      AnoMes Emis. da DPS (4) +
      Cód.Num. (9) +
      DV (1)

      Código numérico de 9 Posições numérico, aleatório,
      gerado automaticamente pelo sistema gerador da NFS-e.
      }
    NFSe.subst.chSubstda := ObterConteudo(AuxNode.Childrens.FindAnyNs('chSubstda'), tcStr);
    NFSe.subst.cMotivo := StrTocMotivo(Ok, ObterConteudo(AuxNode.Childrens.FindAnyNs('cMotivo'), tcStr));
    NFSe.subst.xMotivo := ObterConteudo(AuxNode.Childrens.FindAnyNs('xMotivo'), tcStr);

    NFSe.RpsSubstituido.Numero := Copy(NFSe.subst.chSubstda, 24, 13);
  end;
end;

Vai ser necessário debugar essa procedure para ver se ele esta lendo corretamente o grupo subst.

Você poderia fazer isso?

[leandro.cm]

Bom dia Ítalo!

Verifiquei através do debug que o grupo está lendo corretamente.

Att.
Leandro

[Italo Giurizzato Junior]

Bom dia Leandro,

Por favor atualize novamente os fontes, reinstale o ACBr e faça um novo teste.

[leandro.cm]

Olá Ítalo!

Resolvido!

Grato pela atenção.

Leandro

[Alexandre de Paula]

Obrigado por reportar.

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