Gerar Qr Code

[Daniel Simoes]

Provavelmente ela não é 100% compatível com os comandos "Epson Esc/POS"

 

Você pode associar o componente ACBrSAT ao ACBrSATExtratoFortes... nesse caso toda a impressão será feita pelo "Fortes Report"

[Junior Pontual]

tiagosis, no post acima que vc comentou, disse que esta imprimindo o cupom pelo report builder.

Aqui estou tendo o seguinte problema==> tenho varios itens, imprimo a primeira pagina

quando vou para a segunda pagina eu tenho um salto de linhas, assim deixando um espaco em

branco no cupom, e continuo imprimindo os itens. Como fazer para tirar esse espaço no report builder,

para ter uma impresão continua sem que na troca de pagina não de um salto em branco,

vc sabe me dizer?

Editado 22 Setembro, 2014 por junin

[Junior Pontual]

bom dia Daniel, eu fiz a associacao dos componentes ACBrSAT ao ACBrSATExtratoFortes que vc citou no post acima e deu certo. 

A  Impressão do Cupom do sat feita com o Fortes report foi feita em 40 colunas?

Se eu quiser mudar para 48 colunas que no caso é a impressora que tenho aqui para testes e que a maioria dos nossos clientes usam, tenho que configurar o Fortes Report inteiro, ou

tem uma propriedade especifica que configuro o fortes Report de acordo com a impressora?

[Daniel Simoes]

Se não me engano existem as propriedades: Margens e Largura

[Junior Pontual]

boa tarde Daniel, deu certo  a configuração pra 48 colunas...

mas fiz um teste pelo meu sistema, fazendo uma venda com 80 itens, na impressão saiu só até o item 37 e finalizou a impressão..

eu mudei a propriedade PageSetup/PaperHeight de 400 coloquei para 800, mas não funcionou, tem alguma

configuração que tenho que fazer?

Editado 26 Setembro, 2014 por junin

[Daniel Simoes]

Preciso debugar isso... parece ser uma limitação do Fortes, já que ele não tem o modo "bobina"... não sei se dá pra fazer um "workaround"

 

Esse problema não correria em ESC/POS... talvez seja mais simples fazer o cliente adquirir uma impressora compatível (Epson, Dascom, Bematech)

[Daniel Simoes]

Apliquei uma possível correção para o problema de não imprimir corretamente quando houver muitos itens

 

Data: 30/09/2013     (por: DSA)
-- ACBrSATExtratoFortes --
[+] Adicionado a propriedade: "PrinterName", para permitir atribuir a impressora
    padrão [*] Tentativa de ajuste para correção de impressão de relatório em bobina com
    muitos itens
    (Também requer ajuste do tamanho da página da Impressora no Windows)

 

[wrmedeiros]

Daniel,

 

Tira Bematech dessa sua lista, com a versão atual do componente ESC/POS o QRCode não é impresso (o cupom em si é impresso certinho, mas a impressora precisa está configurada como "ECC/BEMA". Se ativar ESC/POS a impressora usa uma fonte maior que só suporta 42 caracteres por linha).

 

No momento estou testando o componente ESC/POS para imprimir o NFCe com a impressora em ESC/BEMA e fazendo os ajustes para imprimir o QRCode. O problema ocorre porque só consigo imprimir URL's com no máximo 255 caracteres... os caracteres excedentes são jogados como "texto" abaixo do QRCode.

 

Criei um tópico sobre isso aqui:

 

Criei um tópico no fórum "Partner" da Bematech, mas sem respostas.

 

Estou quase comprando uma Daruma, mas pelo que vi no ESC/POS, o QRCode só é impresso corretamente na Epson.

[Juliomar Marchetti]

Daniel,

 

Tira Bematech dessa sua lista, com a versão atual do componente ESC/POS o QRCode não é impresso (o cupom em si é impresso certinho, mas a impressora precisa está configurada como "ECC/BEMA". Se ativar ESC/POS a impressora usa uma fonte maior que só suporta 42 caracteres por linha).

 

No momento estou testando o componente ESC/POS para imprimir o NFCe com a impressora em ESC/BEMA e fazendo os ajustes para imprimir o QRCode. O problema ocorre porque só consigo imprimir URL's com no máximo 255 caracteres... os caracteres excedentes são jogados como "texto" abaixo do QRCode.

 

Criei um tópico sobre isso aqui:

 

Criei um tópico no fórum "Partner" da Bematech, mas sem respostas.

 

Estou quase comprando uma Daruma, mas pelo que vi no ESC/POS, o QRCode só é impresso corretamente na Epson.

Boa tarde

Isso se deve ao fato que somente a epson disponibilizou equipamento para os devidos testes!

para as outras marcas e modelos ainda no aguardo!

[isaque.ribeiro]

Senhores, quanto a impressão do QRDE na Bematech MP 2500 TH é possível sim.

Em meu projeto eu desenvolvi uma função que gerar um arquivo .BMP correspondente ao QRCODE. Após isso enviou para a impressão e funciona.

Eu outras palavras, eu gero a imagem do QRCODE com as informações que desejo, salvo em um arquivo BMP e envio para a impressão.... funciona sem nenhum problema.

 

Estudei o artigo abaixo para desenvolver a ideia apresentada acima:

http://www.devmedia.com.br/qrcode-codigo-de-barras-bidimensional-delphi/24122

Editado 19 Dezembro, 2014 por isaque.ribeiro

[José Nilton Pace]

Olá Isaque, existe parte disso tudo pronto, veja em:

procedure TdmACBrNFeFR.PintarQRCode(QRCodeData: String; APict: TPicture);

 

uso:

 

var
  qrcode: String;
begin
  qrCode := '';
 

      qrcode := NotaUtil.GetURLQRCode( NFe.ide.cUF,
                                      NFe.ide.tpAmb,
                                      OnlyNumber(NFe.InfNFe.ID),
                                      DFeUtil.SeSenao(NFe.Dest.idEstrangeiro <> '',NFe.Dest.idEstrangeiro, NFe.Dest.CNPJCPF),
                                      NFe.ide.dEmi,
                                      NFe.Total.ICMSTot.vNF,
                                      NFe.Total.ICMSTot.vICMS,
                                      NFe.signature.DigestValue,
                                      TACBrNFe( FDANFEClassOwner.ACBrNFe ).Configuracoes.Geral.IdToken,
                                      TACBrNFe( FDANFEClassOwner.ACBrNFe ).Configuracoes.Geral.Token );

      PintarQRCode( qrcode, TfrxPictureView(frxReport.FindObject('ImgQrCode')).Picture );
end;

[João Carlos Almeida Prado]

Pessoal, boa tarde

 

Estou usando o ForteReportes, e o componente respectivo do ACBr.

 

Está tudo funcionando, mas quando envio NFC-e para empresa do AMAZONAS, valida o cupom, aceita, tudo certo, O link que vem no cupom também está certo, se eu digito no navegador ele localiza o cupom, mas quando leio o QRCODE com o aplicativo, dá a mensagem de PÁGINA NÃO ENCONTRADA...

 

tem algum macete ou detalhe que estou esquecendo? se o link que é fornecido na impressao do cupom funciona, o QRCODE não deveria estar certo?

 

Obrigado

[Juliomar Marchetti]

Tente ler somente o Qrcode e ver o que ele trás! não deixe ele abrir sozinho a URL!

[Buruthagas Oliveira]

Boa tarde Juliomar, quando leio o Qr Code a URL que ele mostra é a seguinte:

 

http://homnfce.sefaz.am.gov.br/nfceweb/consultarNFCe.jsp?chNFe=13141210476469000236650010000000921000000923&nVersao=100&tpAmb=2&dhEmi=323031342D31322D31385431323A31373A30352D30343A3030&vNF=13.68&vICMS=1.56&digVal=6E3753344B4A646B4A5A5568702B4F52334A4E772B516E54466D6B3D&cIdToken=&cHashQRCode=5BB534EC0D8395A05013FA45A464CD37D1F581E1

 

Tirei uma foto da Danfe, segue o link:

 

https://drive.google.com/file/d/0BxvhgEgPbcGqakt6b3hMUDdWclU/view?usp=sharing

 

Se reparar no danfe o link que ele mostra para consulta é o correto, mas o lido pelo Qr Code está diferente.

 

Alguém tem alguma idéia do que podemos mudar para corrigir isso?

[João Carlos Almeida Prado]

Juliomar,

 

O Buruthagas é meu gerente de implantação e tem testado as soluções de NFC-e e NF-e que desenvolvemos na empresa.

 

Será que preciso passar algum parametro específico para gerar o QR-CODE correto?

[André Ferreira de Moraes]

Boa tarde Juliomar, quando leio o Qr Code a URL que ele mostra é a seguinte:

 

http://homnfce.sefaz.am.gov.br/nfceweb/consultarNFCe.jsp?chNFe=13141210476469000236650010000000921000000923&nVersao=100&tpAmb=2&dhEmi=323031342D31322D31385431323A31373A30352D30343A3030&vNF=13.68&vICMS=1.56&digVal=6E3753344B4A646B4A5A5568702B4F52334A4E772B516E54466D6B3D&cIdToken=&cHashQRCode=5BB534EC0D8395A05013FA45A464CD37D1F581E1

 

Tirei uma foto da Danfe, segue o link:

 

https://drive.google.com/file/d/0BxvhgEgPbcGqakt6b3hMUDdWclU/view?usp=sharing

 

Se reparar no danfe o link que ele mostra para consulta é o correto, mas o lido pelo Qr Code está diferente.

 

Alguém tem alguma idéia do que podemos mudar para corrigir isso?

Aparentemente o IdToken não foi informado corretamente.

[DelhpiJunior]

Bom dia, pessoal!!

Estou com um problema, estou com um projeto em Delphi 9 para imprimir vários QrCode aleatórios utilizando uma URL como parâmetro, relatório montado no FastReport.

Eu preciso limitar o qr code em um tamanho x, alguém sabe como eu posso fazer isso sem limitar o tamanho do campo parâmetro??????

 

[Aldy]

Em 22/01/2016 at 15:45, Sérgio Assunção disse:

Você está usando o Trunk 2 ?

Sim etou usando mas dá o erro acima citado, com o ACBrSATExtratoESCPOS não sei mandar direto para a impressora.

[Fernando Andrade]

Pessoal alguém pode me ajudar? Como pego os dados do sat pra gerar o qrcode?

Alguem tem algum exemplo em Delphi que possa me passar?

 

Grato

Fernando

[Daniel Simoes]

Como assim ??

O ACBrSAT é todo OpenSource... basta baixar e estudar... (ou usar)

[Albrecht]

Aproveitando as dúvidas anteriores, a impressora GP 58L imprime o QRcode?

 

[Juliomar Marchetti]

Em 22/04/2016 at 14:00, Albrecht disse:

Aproveitando as dúvidas anteriores, a impressora GP 58L imprime o QRcode?

 

Acredito que isso você consegue com o fabricante!

ps: lembre-se das regras de não aproveitar gancho em tópicos

[FABRICIO CERAVOLO PENA]

Fiz o citado acima e o programa não grava o bitmap.

Onde estou errando ? Alguém sabe ?

 

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
function eGerarQrCodeArquivo_DUAL_DarumaFramework(stPath: String; stCodigo: String): Integer; StdCall; External 'DarumaFrameWork.dll';

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  eGerarQrCodeArquivo_DUAL_DarumaFramework('c:\teste.bmp', '<qrcode>aaz</qrcode>');
end;

end.

[Juliomar Marchetti]

1 hora atrás, FABRICIO CERAVOLO PENA disse:

Fiz o citado acima e o programa não grava o bitmap.

Onde estou errando ? Alguém sabe ?

 

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
function eGerarQrCodeArquivo_DUAL_DarumaFramework(stPath: String; stCodigo: String): Integer; StdCall; External 'DarumaFrameWork.dll';

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  eGerarQrCodeArquivo_DUAL_DarumaFramework('c:\teste.bmp', '<qrcode>aaz</qrcode>');
end;

end.

No caso deve de entrar em contato com o suporte da daruma pois está usando a framework deles correto?