Jump to content

botao.pngbotao.png

PARA DEVS E SW. HOUSES
Novos Palestrantes e Patrocinadores confirmados!

dia-do-acbr-online.png  

Saiba Mais

botao.pngbotao.png

botao.pngbotao.png

Ofertas Embarcadero
Descontos de até 35%

Saiba Mais

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

Quebra de linha na impressão do DANFSE


Go to solution Solved by Italo Jurisato Junior,
  • Este tópico foi criado há 1036 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

Boa noite a todos.

Notei que nas compilações do ACBr a partir de out/17 passou a apresentar a seguinte situação:

- utilizando o componente TACBrNFSeDANFSeRL para impressão do DANFSE

- configurando o ACBrNFSe para quebra de linha com pipe:" | "

- se, logo após enviar o RPS (gerando a NFS-e), chamar a impressão do DANFSE, a quebra de linha com "PIPE" não é tratada na discriminação do serviço (o mesmo ocorre se o email é enviado na sequência com o DANFSE em anexo)

- caso seja feita uma re-impressão do DANFSE o problema passa a não ocorrer mais, ou seja, apenas a primeira impressão do DANFSE se feita logo após enviar/gerar a NFS-e é que o problema ocorre.

 

Agradeço desde já pela atenção.

André Luis.

Link to post
Share on other sites

Boa tarde a todos.

 

Para ajudar a identificar o problema de quebra de linha na Impressão do DANFSE, segue abaixo os passos para simular o problema no "Demo ACBrNFSe":

- configurar o componente TACBrNFSe na propriedade WebServices->QuebradeLinha com o caractere pipe "|"

- na procedure AlimentaComponente utilizar o "|" como separador da discriminação do serviço, por ex.: Servico.Discriminacao := 'discriminacao 1|discriminacao 2';

- Gerar e Enviar um lote RPS

- Imprimir DANFSe

Dessa forma é possível verificar que na impressão do DANFSe o campo discriminação é montado sem a quebra de linha.

 

Agradeço desde já pela atenção

André Luis.

Link to post
Share on other sites

Boa noite a todos.

O problema ocorre no seguinte caminho - após chamar o método ACBrNFSe.Enviar ocorre o seguinte:

- na unit ACBrNFSeWebServices -> procedure TNFSeEnviarLoteRPS.DefinirDadosMsg -> comando:

InicializarDadosMsg(FPConfiguracoesNFSe.Geral.ConfigEnvelope.Recepcionar_IncluiEncodingCab);

- na procedure TNFSeWebService.InicializarDadosMsg(AIncluiEncodingCab: Boolean) -> comando:

FPConfiguracoesNFSe.WebServices.QuebradeLinha := FPConfiguracoesNFSe.Geral.ConfigGeral.QuebradeLinha;

... essa atribuição sobrepõe o caractere de quebra de linha configurado no componente ACBrNFSe (ACBrNFSe.WebServices.QuebradeLinha) pelo caractere ";"

Caso esteja utilizando outro caractere diferente de ";" (meu caso, que uso o Pipe), o DANFSe acaba sendo impresso/enviado sem as quebras de linha na discriminação. Isso não acontecia até as compilações perto do final de outubro

Por favor, seria possível alguém verificar o motivo dessa atribuição que sobrepõe o caractere configurado no componente conforme apresentado acima.

Qq dúvida sobre o problema estou a disposição. Obrigado,

André Luis.

Link to post
Share on other sites
  • Solution

Bom dia André,

Por favor abra o arquivo INI do respectivo provedor.

Nesse arquivo existe uma linha que contem o carácter de quebra de linha.

Altere para o desejado e refaça os testes.

  • Thanks 1
Consultor SAC ACBr Italo Jurisato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to post
Share on other sites
  • Este tópico foi criado há 1036 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...