Pesquisar na Comunidade

Olá Tudo Bem! Estou precisando gerar o pdf das vendas NFC-e, usando o ACBrNFeDANFCeFortes pra gerar o DANFE NFC-e consigo gerar o pdf usando o evento ImprimirPDF, mas só uso a versão do fortes no retaguarda na hora de autorizar vendas que não foram autorizadas por algum motivo. O problema é gerar nos caixas pois neles uso o ACBrNFeDANFeESCPOS pra gerar o DANFE NFC-e e imprimi-lo na impressora. Gostaria de saber se é possível gerar o pdf usando o ACBrNFeDANFeESCPOS? Pesquisei aqui no fórum do ACBr e encontrei esse tópico falando sobre isso nele em uma das respostas disseram que poderia usar NFe.ImprimirDanfePDF ou NFe.ImprimirEventoPDF. O NFe.ImprimirDanfePDF não tem usando o ACBrnfe, ae então tentei ACBrNFe.ImprimirEventoPDF, ele gerou o pdf do evento o problema foi que gerou um pdf de cancelamento, mas eu fiz uma venda normal não fiz cancelamento. O componente ACBrNFeDANFeESCPOS tem uma propriedade ArquivoPDF, tenho que carregar o xml nela? Senão for possível então vou tentar mudar em tempo de execução pra ACBrNFeDANFCeFortes pra poder gerar o pdf e depois volta pra ACBrNFeDANFeESCPOS, pra ve se consigo depois de imprimir consigo gerar o pdf. Desde já Muito Obrigado pela Ajuda e Atenção de Todos! Obrigado!

Novo tópico criado a partir de eu setei essa propriedade no acbrnfe: acbrnfe1.DANFE.ImprimirTributos:=false; e mesmo assim o tributo continua aparecendo na danfe, vide o anexo.

Boa tarde Gostaria de solicitar uma melhoria no componente ACBrNFeDANFeESCPOS o qual possui a opcao TributosSeparadamente que faz com que a impressao da NFCe sai com os tributos informados da maneira cheia ou entao separados, sendo que se for separado seria interessante apenas apresentar a mensagem caso as variaveis fossem populadas vTribEst vTribFed e vTribMun, mas caso elas continuassem com valor zerado, nada iria aparecer e ficaria livre para que o desenvolvedor incluisse as linhas da sua maneira assim como era feito antigamente. Isso me ajudaria pois ja tenho a mensagem pronta para impressao, so falta que o componente respeite essa opcao. Acredito que dessa forma nao irá prejudicar nenhum usuario do componente e ainda trara uma terceira opcao que é ao inves de poder escolher junto e separadamente, será separado mas com a maneira que o desenvolvedor colocar. Hoje o codigo no fonte ACBrNFeDANFeESCPOS .pas se encontra é o seguinte procedure TACBrNFeDANFeESCPOS.GerarTotalTributos; var MsgTributos : String; begin if (vTribFed+vTribEst+vTribMun) > 0 then begin MsgTributos:= 'Tributos Incidentes Lei Federal 12.741/12 - Total R$ %s Federal R$ %s Estadual R$ %s Municipal R$ %s'; FPosPrinter.Buffer.Add('<c>' + QuebraLinhas(Format(MsgTributos,[FormatFloatBr(vTribFed + vTribEst + vTribMun), FormatFloatBr(vTribFed), FormatFloatBr(vTribEst), FormatFloatBr(vTribMun)]),FPosPrinter.ColunasFonteCondensada)); end else begin if FpNFe.Total.ICMSTot.vTotTrib > 0 then begin MsgTributos:= 'Tributos Totais Incidentes(Lei Federal 12.741/12): R$ %s'; FPosPrinter.Buffer.Add('<c>' + QuebraLinhas(Format(MsgTributos,[FormatFloatBr(FpNFe.Total.ICMSTot.vTotTrib)]), FPosPrinter.ColunasFonteCondensada)); end; end; end; A minha sujestao é que seja incluida essa linha de teste que coloquei em vermelho para que funcione da maneira que sujeri acima procedure TACBrNFeDANFeESCPOS.GerarTotalTributos; var MsgTributos : String; begin if TributosSeparadamente = True then begin if (vTribFed+vTribEst+vTribMun) > 0 then begin MsgTributos:= 'Tributos Incidentes Lei Federal 12.741/12 - Total R$ %s Federal R$ %s Estadual R$ %s Municipal R$ %s'; FPosPrinter.Buffer.Add('<c>' + QuebraLinhas(Format(MsgTributos,[FormatFloatBr(vTribFed + vTribEst + vTribMun), FormatFloatBr(vTribFed), FormatFloatBr(vTribEst), FormatFloatBr(vTribMun)]),FPosPrinter.ColunasFonteCondensada)); end end else begin if FpNFe.Total.ICMSTot.vTotTrib > 0 then begin MsgTributos:= 'Tributos Totais Incidentes(Lei Federal 12.741/12): R$ %s'; FPosPrinter.Buffer.Add('<c>' + QuebraLinhas(Format(MsgTributos,[FormatFloatBr(FpNFe.Total.ICMSTot.vTotTrib)]), FPosPrinter.ColunasFonteCondensada)); end; end; end; Se for possivel, ficaria muito grato que essa alteracao fosse feita no componente para tornar mais flexivel o desenvolvimente e ainda mantendo o padrao do manual. Desde ja agradeço Att, Walmir Jose Ribeiro Junior [email protected]

Senhores, boa tarde! Configurei o modo ESC/POS na Bematech MP-4200, e estou conseguindo imprimir o DANFeNFCe pela impressora não fiscal usando o ACBrNFeDANFeESCPOS. Em um post do André observei que o componente só foi testado com Epson e DASCOM [1], e gostaria de contribuir implementando as alterações para a Bematech (MP-4200). Analisando o código em ACBrNFeDANFeESCPOS.pas vejo que não existe uma propriedade para informar que tipo de impressora está utilizando, e pelo que observo, cada impressora tem seu padrão de comandos para imprimir o QRCode (na Bematech os demais ESC's funcionaram perfeitamente, negrito, condensado, etc. exceto o QRCode, que imprimiu a "string"). Acredito que teremos que criar uma propriedade onde deve ser informado qual tipo de impressora está sendo utiilzada (Epson, Daruma, Bematech, etc., onde Epson será o default, para não quebrar o código de quem já está utilizando). O que acham? Na classe ACBrNFeDANFEClass.pas tem uma propriedade chamada "Impressora", qual a utilidade? Poderíamos utilizar essa propriedade? Por enquanto vou continuar lendo o manual e fazendo testes no Delphi para impressão do QRCode sem DLL. [1]

Olá a todos, estou com um problema com relação a geração e impressão do QRCode, sei que aqui no fórum tem muitos tópicos sobre esse assunto, mas já fazem 3 dias que venho lendo e buscando uma solução e até agora não encontrei. O problema é o seguinte, fiz um teste com de impressão com o demo ACBrNFeDANFeEscPos da pasta de exemplos para imprimir o danfe de um NFCe, o danfe imprime normal, porém ao invés do o QR Code, imprime uma série de letras e números. fiz o teste com o demo por que em minha aplicação ocorre o mesmo, a primeira vista pensei ser a ausência de algum comando para gerar o QR Code, mas no exemplo não vi nenhum comando específico, e buscando no fórum encontrei que deveria setar como true a propriedade ACBrNFe.Configuracoes.Geral.IncluirQRCodeXMLNFCe mas isso eu já tinha feito. A pergunta é a seguinte, houve alguma alteração na forma de gerar o QR Code? é necessário incluir algum outro comando além do mencionado? qual poderia ser o possível erro então, já que o xml está normal e nem mesmo o exemplo do ACBr gera o QR Code. Desde já agradeço.

Não estou conseguindo que o ACBrNFeDANFeESCPOS imprima a logo do cliente, o mesmo utiliza uma Daruma Dr800

Fiz uma alteração no procedimento "GerarCabecalho" na unit ACBrNFeDANFeESCPOS, diminui os espaços + ' ' + de 2 caracteres para o espaço de + ' ' + 1 caracter, pois na minha impressora DARUMA DR700 acaba ocorrendo uma quebra de linha vazia no meio do endereço do Emitente por conta desses espaçamentos. procedure TACBrNFeDANFeESCPOS.GerarCabecalho; begin FPosPrinter.Buffer.Add('</zera></ce></logo>'); if (Trim(FpNFe.Emit.xFant) <> '') then FPosPrinter.Buffer.Add('</ce><c><n>' + FpNFe.Emit.xFant + '</n>'); FPosPrinter.Buffer.Add('</ce><c>'+ FormatarCNPJ(FpNFe.Emit.CNPJCPF) + ' <n>' + FpNFe.Emit.xNome + '</n>'); FPosPrinter.Buffer.Add('<c>' + QuebraLinhas(Trim(FpNFe.Emit.EnderEmit.xLgr) + ', ' + Trim(FpNFe.Emit.EnderEmit.nro) + ' ' + Trim(FpNFe.Emit.EnderEmit.xCpl) + ' ' + Trim(FpNFe.Emit.EnderEmit.xBairro) + ' ' + Trim(FpNFe.Emit.EnderEmit.xMun) + '/' + Trim(FpNFe.Emit.EnderEmit.UF) , FPosPrinter.ColunasFonteCondensada) ); end; Agora eu não consegui resolver foi no procedimento "GerarTotalTributos", no meu cupom esta tendo uma quebra de linha no texto "Tributos Incidentes Lei Federal 12.741/12 - Total R$ %s Federal R$ %s Estadual R$ %s Municipal R$ %s" ficando assim no cupom: Tributos Incidentes Lei Federal 12.741/12 - Total R$ 3,65 "Linha vazia" Federal R$ 3,65 Estadual R$ 0,00 Municipal R$ 0,00 Meus Clientes estão reclamando muito do tamanho do cupom impresso, reclamam que é muito grande, mesmo pra 1 item, então estou tentando reduzir espaço tirando essas falhas no arquivo...

Fizemos recentemente a atualização do ACBR aqui na empresa, e nos deparamos com a seguinte situação: Nas impressoras bematech, MP-4200 as impressões dos recibos de venda saem normalmente, com os dados em uma linha só, em uma impressora ELGIN os recibos saem como se a configuração de colunas estivesse errada, imprimindo alguns dados com a quebra de linha. Segue exemplo conforme anexo. IMG-20170120-WA0028 E IMG-20170120-WA0029 (A impressora ELGIN, continua a impressao da linha embaixo, imagem: IMG-20170120-WA0028) . Uma outra coisa que observei é que aparentemente a impressora elgin nao está condensando as letras. Um outro detalhe que observei é que com os fontes do ACBrNFeDANFeESCPOS da data 22/12/2015 esta mesma impressão funciona para as duas impressoras corretamente. Outra coisa que gostaria de saber se é possível o retorno de algumas informações, que após a troca do ACBrNFeDANFeESCPOS não estão sendo mais exibidas na impressão da NFC-e: -A inscrição estadual no cabeçalho. -Algumas linhas que dividem cabeçalho, produtos totais e outras informações. ambas com o componente ACBrNFeDANFeESCPOS OBS: Essas informações/divisões poderiam ser configuráveis. Exemplo na imagem: DSC_282 A imagem IMG-20170120-WA0029 foi impressa com o ACBrNFeDANFeESCPOS de 22/12/2015 e a outra imagem com o ACBrNFeDANFeESCPOS atual. Alguém já passou por isso? Desde já agradeço.

Bom dia a Todos, Desculpe se estou abrindo um tópico que já existe no fórum, procurei muito, e fora procurar algo no fonte do componente. Bom vamos ao meu problema. Estou implementando a NFC-e no sistema da empresa em que trabalho e me deparei com o seguinte caso: Estou utilizando a impressora Daruma DR700, no caso dela estou utilizando o ACBrNFeDANFeESCPOS; Se faço uma NFC-e com mais de 200 Itens, ela não imprimi o DANFE por completo. Então encontrei a propriedade: LinhasBuffer. Mesmo assim após informar uma certa quantidade de linhas não imprimi por completo. Testei com LinhasBuffer: 100 , 50 , 20 , 10, 1; mesmo assim não saia o danfe por completo. Existe alguma solução para isso? Obrigado desde já pelo auxilio. Atenciosamente, Alan Leônidas da Silva.

Boa tarde senhores! mas uma vez venho pedir ajuda de vocês, pois não consegui fazer imprimir corretamente pelo escpos nem pelo danfefr1.. Os dois saem desconfigurados. já agradeço a atenção de cada um. Lembrando que uso o trunk2 comandos do escpos : frmPedido.LerConfiguracao; if not FileExists( ArquivoXML ) then raise Exception.Create('Arquivo não encontrado!'+ArquivoXML); if frmPedido.lImpressoraBobina then begin if PrintDialog.Execute then begin Try ConfigurarComponente; ACBrNFe1.DANFE := ACBrNFeDANFeESCPOS; ACBrNFeDANFeESCPOS.MostrarPreview := True; ACBrNFeDANFeESCPOS.NumCopias := PrintDialog.Copies; ACBrNFeDANFeESCPOS.Impressora := Printer.Printers[Printer.PrinterIndex]; if lDanfeResumido then begin // ACBrNFeDANFeESCPOS.ImprimirDANFEResumido(Nil) ACBrNFe1.DANFE.ImprimirItens := false; ACBrNFe1.NotasFiscais[0].Imprimir; end else ACBrNFe1.NotasFiscais[0].Imprimir; // ACBrNFeDANFeESCPOS.ImprimirDANFE(nil); // if chkAbrirGaveta.Checked then // ACBrNFeDANFeESCPOS.AbrirGaveta; finally // ACBrNFeDANFeESCPOS.Device.Desativar; end; end; ///////////////////////////////////////////////////////////////////////////////////////// ACBrNFeDANFEFR1 if DM_NFCe.cColunas = '40' then begin ACBrNFeDANFEFR1.FastFile := ExtractFileDir(application.ExeName) + '\Report\DANFeNFCe.fr3'; ACBrNFeDANFEFR1.FastFileEvento := ExtractFileDir(application.ExeName) + '\Report\EVENTOS.fr3'; ACBrNFeDANFEFR1.TipoDANFE := tiNFCe; end else begin ACBrNFeDANFEFR1.FastFile := ExtractFileDir(application.ExeName) + '\Report\DANFeNFCeA4.fr3'; ACBrNFeDANFEFR1.FastFileEvento := ExtractFileDir(application.ExeName) + '\Report\EVENTOS.fr3'; ACBrNFeDANFEFR1.TipoDANFE := tiNFCeA4; end; // ACBrNFe1.DANFE := ACBrNFeDANFEFR1; // ACBrNFe1.DANFE.imprimirItens := False; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(ArquivoXML); // ACBrNFe1.DANFE.MostrarPreview := True; // ACBrNFe1.DANFE.NumCopias := PrintDialog.Copies; // ACBrNFe1.DANFE.Impressora := Printer.Printers[Printer.PrinterIndex]; ACBrNFeDANFEFR1.MostrarPreview := True; ACBrNFeDANFEFR1.NumCopias := PrintDialog.Copies; ACBrNFeDANFEFR1.Impressora := Printer.Printers[Printer.PrinterIndex]; if lDanfeResumido then begin { ACBrNFeDANFEQR1.ImprimeItens := False; ACBrNFeDANFEQR1.ImprimirDANFE(nil); } ACBrNFeDANFEFR1.ImprimirItens := False; ACBrNFeDANFEFR1.ImprimirDANFEResumido(nil); end else begin { ACBrNFeDANFEQR1.ImprimeItens := True; ACBrNFeDANFEQR1.ImprimirDANFE(nil); } ACBrNFeDANFEFR1.ImprimirItens := True; ACBrNFeDANFEFR1.ImprimirDANFE(nil); end; end; finally end; obrigado.

Boa tarde, estou tenho problemas para imprimir a DANFE em uma impressora Bematech MP-2500 TH utilizando o componente AcbrNfeDanfeESCPOS. Os caracteres acentuados não saem impressos corretamente e o QRCODE não é impresso. Até agora testei em ambiente de homologação!

Bom dia. Estou imprimindo NFCe usando o componente DANFE SCPOS, ate entao tudo normal, mas chegou uma nova remessa de impressoras Bematech, que ao imprimir uma nova NFCe ou re-imprimir uma já autorizada, ela começou a imprimi a logo da própria Bematech! alguém já passou por algo parecido. Tenho duas Bematech que executo os testes, é a impressão da logo só acontece nas impressoras adquiridas recentemente. Desde já Obrigado a Todos. Segue em anexo uma impressão. NFCE.pdf

Boa tarde, estou com um problema na impressão de NFCe estou utilizando o Demo de impressão DANFCe esta dando o erro "COMMunication error 2: O sistema não pode encontrar o arquivo especificado". Estou imprimindo com a impressora BemaTech MP-2500TH ela esta na porta COM3, quando eu mando imprimir ela da esse erro, alguém já viu algo parecido? Será que é algum erro de configuração?

Pessoal, estou com uma duvida de como deve passar o valor do troco para o componente ACBrNFeDANFeESCPOS para que possa ser impresso. Pois pesquisei aqui no forum e não achei nada a respeito sobre isso para o componente, vi que se passarmos o pagamento como dinheiro ele mostra o valor troco zerado mas se passar o valor do dinheiro maior q o valor da nota é recusada a nota então não sei como fazer.