Pesquisar na Comunidade

Gostaria de compartilhar, um problema que estou tendo na hora de imprimir uma NFC-e(DANFE NFC-e) com muitos itens(Mais de 400).Estou usando a impressora MP 4200 da Bematech e o FastReport como gerenciador de relatório, ao imprimir uma nota com 400 ou mais itens, a impressora imprime apenas uns 50 itens(30 cm) e para, a principio imaginei que fosse problemas com drive, spooler travando mas depois de pesquisar aqui no fórum, vi que era a propriedade frxReport.PrintOptions.PrintMode := pmSplit; Postagem de referência: Só que o código abaixo que foi adicionado, na UNIT ACBrNFeDANFEFR, no método TACBrNFeDANFEFR.PrepareReport conforme a postagem acima para corrigir esse problema if Assigned(ACBrNFe) then if(TACBrNFe(ACBrNFe).Configuracoes.Geral.ModeloDF = moNFCe)then FdmDanfe.frxReport.PrintOptions.PrintMode := pmSplit; E eu não encontrei mais no fonte. Tentei acessar até a propriedade por fora, logo depois de criar o componente em tempo de execução: MeuACBrNFeDANFEFR.dmDanfe.frxReport.PrintOptions.PrintMode := pmSplit; Mas dentro da UNIT ACBrNFeDANFEFR, no método TACBrNFeDANFEFR.PrepareReport é feito um LoadFromStream das classes do Fast, e internamente acba chamando um método clear limpa essas propriedades. Aí gostaria de saber se é possível fazer este ajuste de forma permanente no ACBr para que em atualizações futuras não seja perdido este ajuste ou vocês conhecem a propriedade que substitui esse código, ou se te outra forma de resolver esse problema?

Bom dia. Mais um ajuste na impressão do DANFE da NF-e. Conforme está sinalizado na imagem em anexo precisa de uma pequena correção no cabeçalho da coluna.

Pessoal Estou com um problema e não estou achando meu erro. Estou tentando direcionar a impressao da DANFE para uma determinada impressora, através do comando NFE.ImprimirDANFE Acontece que sai sempre na mesma impressora O manual diz NFE.ImprimirDanfe(cArqXML,[cImpressora],[nNumCopias],[cProtocolo],[bMostrarPreview],[cMarcaDagua],[bViaConsumidor],[bSimplificado]) O meu programa comanda NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","NPIB0A3E1 (HP LaserJet Professional M1212nf MFP)","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet M1005","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet Professional M1212nf MFP","1") OK: Danfe Impresso com sucesso NFE.ImprimirDANFE("N:\rasn\pedidos\NFE\201704\NFE\31170404631337000158550010000262001284613415-nfe.xml","HP LaserJet Professional M1212nf MFP","1") OK: Danfe Impresso com sucesso São varios comandos ImprimirDANFE, e sai sempre na mesma impressora. na HP LaserJet M1005 que é a impressora padrao do computador. Onde pode estar meu erro?? Já antecipado agradeço a ajuda. Em tempo, As impressoras estão corretamente instaladas e imprimindo também corretamente de outros aplicativos. Excel por exemplo Obrigado

Amigos na impressão da DANFE no fortes reporte contem a seguinte linha: procedure TfrlDANFeRLRetrato.ISSQN; begin with FNFe.Total.ISSQNtot do begin if FNFe.Emit.IM > '' then begin rlbISSQN.Visible := True; rllISSQNInscricao.Caption := FNFe.Emit.IM; rllISSQNValorServicos.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vServ,'###,###,##0.00'); rllISSQNBaseCalculo.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vBC,'###,###,##0.00'); rllISSQNValorISSQN.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vISS,'###,###,##0.00'); end else rlbISSQN.Visible := False; end; end; Visto que exite um parâmetro para esta finalidade: MostraDadosISSQN, Pois bem, quando o parametro esta false e o Cliente possui IM ele esta imprimindo os campos da mesma forma.. minha sugestão seria que fique assim: procedure TfrlDANFeRLRetrato.ISSQN; begin with FNFe.Total.ISSQNtot do begin if (FNFe.Emit.IM > '') and (MostraDadosISSQN = True) then begin rlbISSQN.Visible := True; rllISSQNInscricao.Caption := FNFe.Emit.IM; rllISSQNValorServicos.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vServ,'###,###,##0.00'); rllISSQNBaseCalculo.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vBC,'###,###,##0.00'); rllISSQNValorISSQN.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vISS,'###,###,##0.00'); end else rlbISSQN.Visible := False; end; end; Pois tenho vários clientes que tem IM porém não fazem NF conjugada e estão reclamando dos campos desnecessários. ACBR, Desatualizado. ignorar por favor! Agora esta assim: with FNFe.Total.ISSQNtot do begin rlbISSQN.Visible := ( FNFe.Total.ISSQNtot.vISS > 0 ) and ( fMostraDadosISSQN = True ); if rlbISSQN.Visible then begin rllISSQNInscricao.Caption := FNFe.Emit.IM; rllISSQNValorServicos.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vServ,'###,###,##0.00'); rllISSQNBaseCalculo.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vBC,'###,###,##0.00'); rllISSQNValorISSQN.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vISS,'###,###,##0.00'); end; end; Porém existem empresas que são isentas de ISS, ficando o valor como zero. acho que o IF deveria ser com o valor do serviço ficando assim: with FNFe.Total.ISSQNtot do begin rlbISSQN.Visible := ( FNFe.Total.ISSQNtot.vServ > 0 ) and ( fMostraDadosISSQN = True ); if rlbISSQN.Visible then begin rllISSQNInscricao.Caption := FNFe.Emit.IM; rllISSQNValorServicos.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vServ,'###,###,##0.00'); rllISSQNBaseCalculo.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vBC,'###,###,##0.00'); rllISSQNValorISSQN.Caption := FormatFloatBr(FNFe.Total.ISSQNtot.vISS,'###,###,##0.00'); end; end;

Pessoal, alguem pode me ajudar, estou mandando imprimir o DANFE pelo Exemplo do Acbr e esta imprimindo assim como na foto a baixo, quebrando linhas, Impressora Epson TM88IV

Boa tarde a todos, Estou usando o componente pra fazer a integração do nosso sistema de ponto de venda com o SAT, mas estou com um pouco de dificuldades pra usar o extrato pelo relatório do Fortes Reports. Desculpem se parecer leigo é que eu não tenho muito conhecimento nesse gerador de relatórios então eu posso estar fazendo alguma bobagem, o único que eu conheço é o Quick Report. Eu até tentei fazer alterações no fonte mas não consegui. Quando eu tento imprimir uma venda ele está abrindo um preview de mais de 20 páginas mesmo pra uma venda bem simples, parece que ele inclui uma nova página pra cada linha que ele vai imprimir, sabem me dizer se estou fazendo algo de errado? Existe alguma opção que eu possa alterar para o componente imprimir somente em uma? Obrigado