Danfe NFCe Fortes

[sidnei_alves1]

Fiz um ajuste no Danfe NFCe do fortes ele tava aceitando o tamanho real da imagem, o usuário adiciona uma imagem muito grande, tirei a propriedade autosize e também adicionei a linha

imgLogo.Height:=70;

 

não sei se é a melhor forma de controlar, caso alguém tenha uma sugestão melhor, segue em anexo o unit alterada.

 

ACBrDANFCeFortesFr.dfm

ACBrDANFCeFortesFr.pas

[Zoobre]

Aproveito o tópico para postar as minhas alterações na DANFE da NFC-e do FortesReport com diversas melhorias na diagramação e layout.

Funcionado 100%, compatível com a última versão do ACBR de 23/09/15..

Gostaria que fossem aproveitadas as alterações e incorporadas ao SVN.

 

ACBrDANFCeFortesFr.dfm

ACBrDANFCeFortesFr.pas

ACBrNFeDANFEClass.pas

[Juliomar Marchetti]

subi a alteração do pas do sidnei mas a do zoobre não consegui

tem diferenças grandes e grandes mesmo que podem causar problemas !

favor atualizar o svn aplicar os fontes atuais do trunk2 e depois revalidar e disponibilizar aqui

[Daniel Caus]

Boa tarde!

Estou testando a NFC-e com o FortesReport CE em uma impressora Bematech MP 2500.

Os fontes estão atualizados e utilizo o trunk2.

Em um cliente nosso as 2 primeiras impressões ocorreram sem problemas (conforme a imagem em anexo),

mas ao imprimir a 3º NFC-e com somente 1 produto o danfce ficou deste jeito (com vários espaços em branco).

Agora todos estão saindo desta maneira. Alguma opinião do que pode estar ocorrendo?

Desde já agradeço!

[Régys Silveira]

Aparentemente é a forma que o Fortes trabalha a impressão, estamos verificando o porque disso estar ocorrendo.

Tente utilizar o ACBrDANFCeEscPos.

[Zoobre]

Em ‎22‎/‎09‎/‎2015 at 16:19, Juliomar Marchetti disse:

subi a alteração do pas do sidnei mas a do zoobre não consegui

tem diferenças grandes e grandes mesmo que podem causar problemas !

favor atualizar o svn aplicar os fontes atuais do trunk2 e depois revalidar e disponibilizar aqui

Boa tarde!

Fiz algumas melhorias no DANFE da NFC-e em Fortes na última versão do trunk2 (08/12/15) e caso aprovem, gostaria que fossem aproveitadas e incorporadas ao SVN.

1) Melhorias na diagramação e Layout da NFC-e.
2) Aumento na velocidade de impressão alterando as fontes;
3) Adequação da Lei da Transparência (12741) para as boas práticas recomendadas no manual de integração da AFRAC (De Olho no Imposto);
http://www.afrac.org.br/wp-content/uploads/2014/11/MANUAL-DE-OLHO-NO-IMPOSTO-0-0-8-2.pdf

PS: Falta fazer a alteração do Form para Lazarus.

Não consegui anexar os fontes a essa mensagem, então deixo o link para download:
https://www.dropbox.com/s/cwz0112chzyrsvl/ACBrDANFCeFortesFr.zip?dl=0

Att,

Fabiano
zoobre

Editado 8 Dezembro, 2015 por Zoobre
Agregando os fontes em anexo

[Juliomar Marchetti]

Anexe aqui no fórum!

dá um lida rápida na caixa que você escreve o post que tem ali como anexa

[Zoobre]

Deu certo! Aqui estão os fontes.

 

Att,

Fabiano

ACBrDANFCeFortesFr.dfm

ACBrDANFCeFortesFr.pas

Editado 8 Dezembro, 2015 por Zoobre

[Daniel Simoes]

Notei algumas coisas...

No calculo da altura do Formulário, foi corretamente adicionado um código para considerar a banda de Descontos e Detalhamentos... porém esse ajuste somente ocorrerá, se no primeiro Item, houver descontos e detalhamento (IFTHEN)...

ifthen((ACBrNFeDANFCeFortes.ImprimirDescPorc)and(ACBrNFeDANFCeFortes.FpNFe.Det.Items[0].Prod.vDesc>0),Trunc(rlbDescItem.Height * ACBrNFeDANFCeFortes.FpNFe.Det.Count),0)+
ifthen((ACBrNFeDANFCeFortes.ImprimirDetalhamentoEspecifico)and(ACBrNFeDANFCeFortes.FpNFe.Det.Items[0].Prod.vOutro>0),Trunc(rlbOutroItem.Height * ACBrNFeDANFCeFortes.FpNFe.Det.Count),0);

Talvez o mais seguro seja sempre somar o tamanho das bandas...

 

Em "rlbDetItemBeforePrint", você modificou completamente a montagem da banda... mas o código está confuso e desalinhado... e portanto não dá pra compreender porque você precisou modifica-la... Como ficará a banda após a modificações ? consegue prover uma imagem com o "antes e depois" ?

 

 

[Zoobre]

Em 08/12/2015 at 18:05, Daniel Simoes disse:

Notei algumas coisas...

No calculo da altura do Formulário, foi corretamente adicionado um código para considerar a banda de Descontos e Detalhamentos... porém esse ajuste somente ocorrerá, se no primeiro Item, houver descontos e detalhamento (IFTHEN)...

ifthen((ACBrNFeDANFCeFortes.ImprimirDescPorc)and(ACBrNFeDANFCeFortes.FpNFe.Det.Items[0].Prod.vDesc>0),Trunc(rlbDescItem.Height * ACBrNFeDANFCeFortes.FpNFe.Det.Count),0)+
ifthen((ACBrNFeDANFCeFortes.ImprimirDetalhamentoEspecifico)and(ACBrNFeDANFCeFortes.FpNFe.Det.Items[0].Prod.vOutro>0),Trunc(rlbOutroItem.Height * ACBrNFeDANFCeFortes.FpNFe.Det.Count),0);

Talvez o mais seguro seja sempre somar o tamanho das bandas...

 

Em "rlbDetItemBeforePrint", você modificou completamente a montagem da banda... mas o código está confuso e desalinhado... e portanto não dá pra compreender porque você precisou modifica-la... Como ficará a banda após a modificações ? consegue prover uma imagem com o "antes e depois" ?

 

 

Boa tarde Daniel! 

Considerei o valor de desconto/outros para quando for feito para o valor total da NFC-e. Este é rateado entre os itens. Nesse caso, se o primeiro item tem desconto/outros, o restante dos itens também tem. É claro que para quando os descontos for apenas itens específicos o ideal seria testar banda por banda para ver qual irá ser somada ou não (sujestão para implementação).

Alterei o evento "rlbDetItemBeforePrint" justamente para otimizar a velocidade de impressão. Usando desta forma é impresso mais rápido. Testado!

Anexei o resultado o qual já estou utilizando em produção (removi o cabeçalho e os itens de identificação por motivo de privacidade) .
Não tenho mais o impresso anterior para comparar.

Att,

Fabiano
zoobre

[Daniel Simoes]

Solicitei a ajuda do nosso mais novo "commiter", o @hleorj... Ele já vem promovendo diversas melhorias nos DANFEs... e  acho que ele é a pessoa mais indicada para analisar as sugestões...

Obrigado

[hleorj]

@Zoobre, poderia fornecer em inbox , alguns xml's. para efetuar alguns testes com o seu código.