Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1475 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Boa tarde Ítalo.

Obrigado pelo envio!

Me deparei com um outro problema na assinatura do XML para o método de substituição de NFS-e (TNFSeSubstituirNFSe).

Para deixar conforme o exemplo disponibilizado pelo suporte da prefeitura (em anexo) é necessário ter uma terceira assinatura entre os elementos SubstituirNfseEnvio e SubstituicaoNfse.

Fiz uma alteração na unit ACBrNFSeWebServices (TNFSeSubstituirNFSe.DefinirDadosMsg) incluindo o provedor conforme segue:

  if Provedor in [proWebISSv2, proDeISS] then
    AssinarXML(FPDadosMsg, 'SubstituirNfseEnvio', 'SubstituicaoNfse', 'Falha ao Assinar - SubstituirNfseEnvio: ');

Porém a assinatura entra em um local não esperado (dentro do InfPedidoCancelamento) e estou tendo dificuldade para encontrar o problema.

Será que poderiam me ajudar com alguma dica?

Obrigado!

SubstituirNFSe.xml

  • Consultores
Postado

Bom dia Danny,

Fiz a mesma alteração que você fez um seja:

  if Provedor in [proWebISSv2, proDeISS] then
    AssinarXML(FPDadosMsg, 'SubstituirNfseEnvio', 'SubstituicaoNfse', 'Falha ao Assinar - SubstituirNfseEnvio: ');

Inclui o enumerador "proDeISS" na condição para realizar a terceira assinatura.

Veja o resultado:

1-ped-sub.xml

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado (editado)

Ítalo, boa tarde!

Aqui não deu certo.

Exclui a pasta ACBr, apaguei os arquivos (apagarAcbr.bat) e reinstalei tudo novamente.

Inclusive deu problema no meu Delphi 10.3 (somente nos pacotes NFS-e e Danfe da NFS-e - "Não foi possível localizar o ponto de entrada no procedimento...") me obrigando a utilizar o Delphi 10.4.

No Delphi 10.4 continuou gravando a terceira assinatura em outro local do XML entre as tags InfPedidoCancelamento e Pedido (veja em anexo).

Muito curioso ter funcionado aí e aqui não.

Lembrando que o envio para o DeISS de Indaiatuba é Sincrono.

Seu pacote deve estar atualizado, né?

012247-ped-sub.xml

Editado por danny
  • Consultores
Postado

Boa tarde Danny,

Sai do Delphi e delete a pasta Lib que fica entre as pastas Fontes e Pacotes.

Depois execute novamente o ACBrInstall_Trunk2 para reinstalar os componentes, acredito que desta forma vai reinstalar corretamente.

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado

Ítalo, descobri o problema.

Estava utilizando o Capicom para fazer envio de RPS e de Cancelamento, mas tive que mudar para fazer a Substituição.

Antes estava assim:

image.png.3837e61a9a34a1d7136740c240dbfeaf.png

E agora funcionando corretamente com envio de RPS, Cancelamento e Substituição:

image.png.ed91d98a7888684289c0442014eb61ac.png

Em anexo segue a unit alterada.

Muito obrigado!

ACBrNFSeWebServices.pas

Postado

Bom dia Ítalo.

Sim, essa foi uma segunda alteração que fiz na unit além daquelas primeiras que você já havia subido pro repositório.

Nesta segunda tem somente esta alteração:

if Provedor in [proWebISSv2, proDeISS] then
    AssinarXML(FPDadosMsg, 'SubstituirNfseEnvio', 'SubstituicaoNfse', 'Falha ao Assinar - SubstituirNfseEnvio: ');

Muito obrigado!

 

  • Este tópico foi criado há 1475 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.