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

[carlos_tedex]

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:

Depois:

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

[Daniel Simoes]

Obrigado pelo Bug Report... já estamos verificando 

[Daniel Simoes]

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 ?

[carlos_tedex]

1 hora atrás, Daniel Simoes disse:

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

Pode sim Daniel, sem problemas!

O importante é a informação não sair duas vezes.

Editado 20 Dezembro, 2018 por carlos_tedex

[Paulo Tenório]

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.

[Renan S]

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 

[Luis A. Ben]

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?

[Paulo Tenório]

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.

[Luis A. Ben]

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?

[Paulo Tenório]

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. 

[Luis A. Ben]

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.

[Renan S]

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;

[Luis A. Ben]

Em 20/12/2018 at 11:21, Daniel Simoes disse:

Obrigado pelo Bug Report... já estamos verificando 

Olá Daniel, 

 

sabe me informar se foi encontrada alguma solução? Se ninguém está analisando ainda, posso ajudar.

[Juliana Tamizou]

Boa tarde.

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

Att.

[Daniel Simoes]

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)

 

 

[Renan S]

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

[Daniel Simoes]

Pode por favor postar imagens de como era antes e como está agora ?

[DelfinoManfredini]

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

 

 

 

[Luis A. Ben]

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.

[ornei]

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
 

[Daniel Simoes]

Você deve ter fontes não atualizados... Sempre atualize a partir da pasta raiz...

[ornei]

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

[EMBarbosa]

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.

[ornei]

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.

[Juliomar Marchetti]

marque a opção limpar tudo antes de instalar lá no instalador