Ir para conteúdo
  • Cadastre-se

dev botao

Informações adicionais do produto (infAdProd) duplicado no DANFE


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

Recommended Posts

Bom dia,

Após atualizar o componente percebi que as informações adicionais do produto (infAdProd) não mais estavam sendo impressas no DANFE (ACBrNFeDANFeRL) juntamente com a descrição do produto.

Ao estudar o componente vi que agora existe essa propriedade "ExibeInforAdicProduto" para tal...

...mas ao ativar essa propriedade além das informações adicionais serem impressas juntamente com a descrição do produto foi aberta também uma linha logo abaixo com as mesmas informações ficando assim redundante:

Antes:

image.thumb.png.114cd4e39bbdb9ae481b431a944554a3.png

Depois:

image.thumb.png.374be1820ea5a5928a90e4bf637b8b0e.png

Existe alguma forma/parâmetro para que volte a sair somente na descrição do produto?

Link para o comentário
Compartilhar em outros sites

  • Fundadores
3 horas atrás, carlos_tedex disse:

Existe alguma forma/parâmetro para que volte a sair somente na descrição do produto?

Não seria melhor sair apenas no Quadro, abaixo da Descrição ?

  • Curtir 1
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • 2 semanas depois ...

Eu resolvi o meu caso assim:

function TACBrDFeDANFeReport.ManterXProd(aNFE: TNFe; const inItem: Integer): String;
begin
  Result := '';
  if (inItem < 0) or (inItem >= aNFE.Det.Count) then
    Exit;

  //Result := aNFE.Det.Items[inItem].Prod.XProd + ManterinfAdProd(aNFE, inItem);
  Result := aNFE.Det.Items[inItem].Prod.XProd;
end;

A questão é relacionada com o NFCe, onde sempre sai a informação adicional junto da descrição do produto. Talvez precise de uma diretiva ou verificação do modelo para determinar o caminho a seguir.

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

Deixa essa  configuração:
QuebraLinhaEmDetalhamentoEspecifico     := False

Não ira repetir os blocos;

Estou achando que misturaram as propriedades
 

No meu ver informações adicionais do itens deve ser o quadro em baixo do item;
Dados específicos, ser gerado uma linha dentro do produto; visto que para os produtos específicos como medicamento é obrigatório ser exibido junto ao nome; Mas NT nada consta sobre; na pratica o pessoal não consta quando vem o Lote dentro do quadrado; #vaiEntender 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
14 horas atrás, Renan Silva disse:

Deixa essa  configuração:
QuebraLinhaEmDetalhamentoEspecifico     := False

Não ira repetir os blocos;

Estou achando que misturaram as propriedades
 

No meu ver informações adicionais do itens deve ser o quadro em baixo do item;
Dados específicos, ser gerado uma linha dentro do produto; visto que para os produtos específicos como medicamento é obrigatório ser exibido junto ao nome; Mas NT nada consta sobre; na pratica o pessoal não consta quando vem o Lote dentro do quadrado; #vaiEntender 

Renan, testei dessa forma que você falou e continua aparecendo as informações adicionais tanto no bloco separado quanto junto ao nome do produto. 

Alguém conseguiu resolver isso?

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
12 minutos atrás, Paulo Tenório disse:

Eu resolvi alterando a unit ACBrDFeDANFeReport.pas conforme postei acima. Até que seja finalizada a análise e correção pelos commiters da comunidade, foi o único caminho que encontrei.

Obrigado pela resposta Paulo, 

já submeteu o arquivo com a correção?

Chegou a testar com Detalhamento Específico, se nessa tua alteração continua saindo?

Link para o comentário
Compartilhar em outros sites

2 minutos atrás, [email protected] disse:

Obrigado pela resposta Paulo, 

já submeteu o arquivo com a correção?

Chegou a testar com Detalhamento Específico, se nessa tua alteração continua saindo?

Esse meu recurso não é a correção adequada para o componente, é só um um paleativo para o meu tipo de uso e, talvez o seu. A correção adequada tem que ser pensando em todos os outros usuários, que podem fazer outros usos e serem prejudicados. 

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
1 minuto atrás, Paulo Tenório disse:

Esse meu recurso não é a correção adequada para o componente, é só um um paleativo para o meu tipo de uso e, talvez o seu. A correção adequada tem que ser pensando em todos os outros usuários, que podem fazer outros usos e serem prejudicados. 

Certo, obrigado.

Link para o comentário
Compartilhar em outros sites

47 minutos atrás, [email protected] disse:

Renan, testei dessa forma que você falou e continua aparecendo as informações adicionais tanto no bloco separado quanto junto ao nome do produto. 

Alguém conseguiu resolver isso?

Atualizei agora de pouco; só funciona assim:
  ACBrNFeDANFeRL1.ExibeInforAdicProduto                   := True;
  ACBrNFeDANFeRL1.QuebraLinhaEmDetalhamentoEspecifico     := False; ///Se não sai duas vezes a InfAdicional do Produto

Verifique no DEMO da NF-e;

Link para o comentário
Compartilhar em outros sites

  • Administradores

Boa tarde.

Esta sim sendo analisado, em breve devemos ter a solução.

Att.

  • Curtir 2
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Acabo de enviar para o SVN...

Citar

 

-- ACBrDFeDANFeReport, ACBrNFeDANFEClass --
[*] Propriedade "TACBrNFeDANFEClass.QuebraLinhaEmDetalhamentoEspecifico" movida
    para classe ancestral, em: "TACBrDFeDANFeReport.QuebraLinhaEmDetalhamentos"
[*] Propriedade "TACBrNFeDANFEClass.ExibeInforAdicProduto: Boolean" movida para
    classe ancestral, em: "TACBrDFeDANFeReport.ExibeInforAdicProduto: TinfAdcProd",
    sendo que: "TinfAdcProd = (infNenhum, infDescricao, infSeparadamente)"
[*] Método "TACBrNFeDANFEClass.QuebrarLinha: String; virtual" movido para classe
     ancestral "TACBrDFeDANFeReport.SeparadorDetalhamentos: String; virtual"
[*] Propriedade "TACBrDFeDANFeReport.ImprimeValor: TImprimirUnidQtdeValor" movida
    para classe específica "TACBrNFeDANFEClass.ImprimeValor: TImprimirUnidQtdeValor"
[+] Implementado código genérico em: "TACBrDFeDANFeReport.ManterinfAdProd", fazendo
    uso da propriedade "ExibeInforAdicProduto", e que deve servir para a maioria
    das classes filhas
    (por Rafael Dias e DSA)

-- ACBrNFeDANFEFRDM --
[*] Ajuste para considerar a propriedade "ImprimeDescAcrescItem"
   https://www.projetoacbr.com.br/forum/topic/48577-imprimir-descontos-fast-report
    
-- ACBrDANFCeFortesFr, ACBrNFeDANFeESCPOS, ACBrNFeDANFeRLPaisagem, ACBrNFeDANFeRLRetrato --
[*] Ajuste para considerar a propriedade "ExibeInforAdicProduto"
    (por Rafael Dias e DSA)

 

 

  • Curtir 2
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

15 horas atrás, Daniel Simoes disse:

Acabo de enviar para o SVN...

 

@Daniel Simoes , algo deu errado; a propriedade EspacoEntreProdutos para o Fortes Report no Delphi, parou de funcionar apos a atualização, apos essa alteração;
EspacoEntreProdutos = 30
Com produtos com Informação Adicional, imprimindo em banda abaixo do produto

infAdic.thumb.PNG.abeaf063d44a77119125955265beccb4.PNG

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

Daniel, Bom Dia!

Somente para ajudar nos testes do campo infAdProd do item. Fizemos a atualização e obtivemos os seguintes resultados:

FortesReport:

Funcionou com  ExibeInforAdicProduto=infSeparadamente e ImpimirDetalhamentoEspecifico=true ou false. (imprime abaixo da descrição em destaque)

Não funcionou com ExibeInforAdicProduto=infDescricao com ImpimirDetalhamentoEspecifico=true ou false. (imprime apenas a descrição do produto sem os dados adicionais do item, não imprime junto da descrição nem abaixo em destaque)

FastRepost: não conseguimos com nenhuma combinação (imprime apenas a descrição do produto)

Delfino

 

 

 

  • Obrigado 1
Link para o comentário
Compartilhar em outros sites

  • Membros Pro
1 hora atrás, DelfinoManfredini disse:

Daniel, Bom Dia!

Somente para ajudar nos testes do campo infAdProd do item. Fizemos a atualização e obtivemos os seguintes resultados:

FortesReport:

Funcionou com  ExibeInforAdicProduto=infSeparadamente e ImpimirDetalhamentoEspecifico=true ou false. (imprime abaixo da descrição em destaque)

Não funcionou com ExibeInforAdicProduto=infDescricao com ImpimirDetalhamentoEspecifico=true ou false. (imprime apenas a descrição do produto sem os dados adicionais do item, não imprime junto da descrição nem abaixo em destaque)

FastRepost: não conseguimos com nenhuma combinação (imprime apenas a descrição do produto)

Delfino

 

 

 

Fiz os mesmos testes com o Fortes Report e funcionou corretamente todos os cenários.

  • Curtir 2
Link para o comentário
Compartilhar em outros sites

Bom dia atualizei o acbr e na hora de instalar usando o acbrinstall esta ocorrendo o seguinte erro:

Pacote "ACBrDFeReportRL.dpk" compilado com sucesso.
Compiling package C:\TEAMSOURCE\ACBr2\Pacotes\Delphi\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBr_NFeDanfeRL.dpk
"C:\Program Files\Borland\Delphi7\bin\dcc32.exe" "C:\TEAMSOURCE\ACBr2\Pacotes\Delphi\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBr_NFeDanfeRL.dpk"
Borland Delphi Version 15.0
Copyright (c) 1983,2002 Borland Software Corporation
C:\TEAMSOURCE\ACBr2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLRetrato.pas(2026) Error: Undeclared identifier: 'infSeparadamente'
C:\TEAMSOURCE\ACBr2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLRetrato.pas(2026) Error: Incompatible types
C:\TEAMSOURCE\ACBr2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLClass.pas(141) Fatal: Could not compile used unit '..\..\..\..\..\..\..\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fortes\ACBrNFeDANFeRLRetrato.pas'
Compilation failure
Erro ao compilar o pacote "ACBr_NFeDanfeRL.dpk".

att

Ornei
 

Link para o comentário
Compartilhar em outros sites

  • Consultores
6 minutos atrás, ornei disse:

sempre faço o update da pasta raiz, vou fazer o update do zero e posto se deu certo, obrigado

Não esqueça de atualizar o Fortes também.

  • Curtir 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

Boa tarde, apaguei a pasta e baixei tudo de novo e agora esta acusando este erro:

Compiling package C:\TEAMSOURCE\ACBr2\Pacotes\Delphi\ACBrDFe\ACBr_DFeComum.dpk
"C:\Program Files\Borland\Delphi7\bin\dcc32.exe" "C:\TEAMSOURCE\ACBr2\Pacotes\Delphi\ACBrDFe\ACBr_DFeComum.dpk"
Borland Delphi Version 15.0
Copyright (c) 1983,2002 Borland Software Corporation
C:\TEAMSOURCE\ACBr2\Fontes\ACBrDFe\ACBrDFeCapicom.pas(45) Fatal: File not found: 'ACBrCAPICOM_TLB.dcu'
Compilation failure
Erro ao compilar o pacote "ACBr_DFeComum.dpk".
Abortando... Ocorreram erros na compilação dos pacotes.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1901 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.