Jump to content

click.png

click.png

click.png

click.png click.png click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

NFC-e - Imprimindo DANFE na Bematech MP-4200 TH


  • Este tópico foi criado há 1592 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia!

Após fazer a atualização do ACBR a partir do Trunk2, não consigo mais imprimir na impressora Bematech MP-4200 TH utilizando o ACBRDanfeEscPos.

Nos fontes anteriores do ACBR estava conseguindo.

Fiz conforme o exemplo ACBRDanfeEscPos, mas imprime somente o Razao social, endereço do emitente. Procurei se já tivesse algum tópico que já tenha tratado disso mas não localizei.

O que pode estar ocorrendo?

Abaixo como estou setando os componentes:

   ACBrNFe1.NotasFiscais.Clear;
   ACBrNFe1.Configuracoes.WebServices.UF := 'RS';
   ACBrNFe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(Ok,'1');
   ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True;
   ACBrNFe1.Configuracoes.Geral.FormatoAlerta := 'Campo:%DESCRICAO% - %MSG%';
   ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
   ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
   ACBrNFe1.Configuracoes.Geral.IdCSC  := 1;
   ACBrNFe1.Configuracoes.Geral.CSC    := 9999999999999999999999999999999999999999;
   ACBrNFe.NotasFiscais.LoadFromFile('C:\TesteNFCE\43160389553564000165650010003692891003692890-nfe.xml');
   ACBrNFeDANFeESCPOS.TipoDANFE := tiNFCe;
   ACBrNFeDANFeESCPOS.ViaConsumidor := True;
   ACBrNFeDANFeESCPOS.ImprimirItens := True;

   ACBrNFe1.DANFE  := ACBrNFeDANFeESCPOS;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta  := COM14;
   ACBrPosPrinter1.Device.Baud   := 9600;
   ACBrPosPrinter1.IgnorarTags   := True;
   ACBrPosPrinter1.Device.Ativar;
   ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
   ACBrNFe1.NotasFiscais[0].Imprimir;

  • Like 1
Link to comment
Share on other sites

  • 2 weeks later...
Em 06/04/2016 at 11:05, mkonat disse:

Bom dia!

Após fazer a atualização do ACBR a partir do Trunk2, não consigo mais imprimir na impressora Bematech MP-4200 TH utilizando o ACBRDanfeEscPos.

Nos fontes anteriores do ACBR estava conseguindo.

Fiz conforme o exemplo ACBRDanfeEscPos, mas imprime somente o Razao social, endereço do emitente. Procurei se já tivesse algum tópico que já tenha tratado disso mas não localizei.

O que pode estar ocorrendo?

Abaixo como estou setando os componentes:

   ACBrNFe1.NotasFiscais.Clear;
   ACBrNFe1.Configuracoes.WebServices.UF := 'RS';
   ACBrNFe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(Ok,'1');
   ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True;
   ACBrNFe1.Configuracoes.Geral.FormatoAlerta := 'Campo:%DESCRICAO% - %MSG%';
   ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
   ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
   ACBrNFe1.Configuracoes.Geral.IdCSC  := 1;
   ACBrNFe1.Configuracoes.Geral.CSC    := 9999999999999999999999999999999999999999;
   ACBrNFe.NotasFiscais.LoadFromFile('C:\TesteNFCE\43160389553564000165650010003692891003692890-nfe.xml');
   ACBrNFeDANFeESCPOS.TipoDANFE := tiNFCe;
   ACBrNFeDANFeESCPOS.ViaConsumidor := True;
   ACBrNFeDANFeESCPOS.ImprimirItens := True;

   ACBrNFe1.DANFE  := ACBrNFeDANFeESCPOS;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta  := COM14;
   ACBrPosPrinter1.Device.Baud   := 9600;
   ACBrPosPrinter1.IgnorarTags   := True;
   ACBrPosPrinter1.Device.Ativar;
   ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
   ACBrNFe1.NotasFiscais[0].Imprimir;

Amigo, onde eu acho esse fonte, já procurei no forúm e já estudei o fonte mais que tudo e não acho... consegui até fazer este funcionar em outro botão mas sem o QRcode, que no botão do exemplo funciona normal... poderia me ajudar?

Link to comment
Share on other sites

Em ‎15‎/‎04‎/‎2016 at 15:35, sdysv disse:
Em ‎06‎/‎04‎/‎2016 at 11:05, mkonat disse:

 

   ACBrNFe1.DANFE  := ACBrNFeDANFeESCPOS;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta  := COM14;
   ACBrPosPrinter1.Device.Baud   := 9600;
   ACBrPosPrinter1.IgnorarTags   := True;
   ACBrPosPrinter1.Device.Ativar;
   ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
   ACBrNFe1.NotasFiscais[0].Imprimir;

Amigo, onde eu acho esse fonte, já procurei no forúm e já estudei o fonte mais que tudo e não acho... consegui até fazer este funcionar em outro botão mas sem o QRcode, que no botão do exemplo funciona normal... poderia me ajudar?

Opa

Procura na pasta C:\"pasta ACBR"\Fontes\ACBrDFe\ACBrNFe\DANFE\NFCe

Link to comment
Share on other sites

  • 1 year later...
Em 2016-4-6 at 10:05, mkonat disse:

Bom dia!

Após fazer a atualização do ACBR a partir do Trunk2, não consigo mais imprimir na impressora Bematech MP-4200 TH utilizando o ACBRDanfeEscPos.

Nos fontes anteriores do ACBR estava conseguindo.

Fiz conforme o exemplo ACBRDanfeEscPos, mas imprime somente o Razao social, endereço do emitente. Procurei se já tivesse algum tópico que já tenha tratado disso mas não localizei.

O que pode estar ocorrendo?

Abaixo como estou setando os componentes:

   ACBrNFe1.NotasFiscais.Clear;
   ACBrNFe1.Configuracoes.WebServices.UF := 'RS';
   ACBrNFe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(Ok,'1');
   ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True;
   ACBrNFe1.Configuracoes.Geral.FormatoAlerta := 'Campo:%DESCRICAO% - %MSG%';
   ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
   ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
   ACBrNFe1.Configuracoes.Geral.IdCSC  := 1;
   ACBrNFe1.Configuracoes.Geral.CSC    := 9999999999999999999999999999999999999999;
   ACBrNFe.NotasFiscais.LoadFromFile('C:\TesteNFCE\43160389553564000165650010003692891003692890-nfe.xml');
   ACBrNFeDANFeESCPOS.TipoDANFE := tiNFCe;
   ACBrNFeDANFeESCPOS.ViaConsumidor := True;
   ACBrNFeDANFeESCPOS.ImprimirItens := True;

   ACBrNFe1.DANFE  := ACBrNFeDANFeESCPOS;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta  := COM14;
   ACBrPosPrinter1.Device.Baud   := 9600;
   ACBrPosPrinter1.IgnorarTags   := True;
   ACBrPosPrinter1.Device.Ativar;
   ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
   ACBrNFe1.NotasFiscais[0].Imprimir;

Você conseguiu resolver este problema? Estou com o mesmo problema.

Em 2016-4-6 at 10:05, mkonat disse:

Bom dia!

Após fazer a atualização do ACBR a partir do Trunk2, não consigo mais imprimir na impressora Bematech MP-4200 TH utilizando o ACBRDanfeEscPos.

Nos fontes anteriores do ACBR estava conseguindo.

Fiz conforme o exemplo ACBRDanfeEscPos, mas imprime somente o Razao social, endereço do emitente. Procurei se já tivesse algum tópico que já tenha tratado disso mas não localizei.

O que pode estar ocorrendo?

Abaixo como estou setando os componentes:

   ACBrNFe1.NotasFiscais.Clear;
   ACBrNFe1.Configuracoes.WebServices.UF := 'RS';
   ACBrNFe1.Configuracoes.WebServices.Ambiente := StrToTpAmb(Ok,'1');
   ACBrNFe1.Configuracoes.Geral.ExibirErroSchema := True;
   ACBrNFe1.Configuracoes.Geral.FormatoAlerta := 'Campo:%DESCRICAO% - %MSG%';
   ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
   ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
   ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
   ACBrNFe1.Configuracoes.Geral.IdCSC  := 1;
   ACBrNFe1.Configuracoes.Geral.CSC    := 9999999999999999999999999999999999999999;
   ACBrNFe.NotasFiscais.LoadFromFile('C:\TesteNFCE\43160389553564000165650010003692891003692890-nfe.xml');
   ACBrNFeDANFeESCPOS.TipoDANFE := tiNFCe;
   ACBrNFeDANFeESCPOS.ViaConsumidor := True;
   ACBrNFeDANFeESCPOS.ImprimirItens := True;

   ACBrNFe1.DANFE  := ACBrNFeDANFeESCPOS;
   ACBrPosPrinter1.Modelo := ppEscBematech;
   ACBrPosPrinter1.Device.Porta  := COM14;
   ACBrPosPrinter1.Device.Baud   := 9600;
   ACBrPosPrinter1.IgnorarTags   := True;
   ACBrPosPrinter1.Device.Ativar;
   ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
   ACBrNFe1.NotasFiscais[0].Imprimir;

Conseguiu resolver? Estou com o mesmo problema.

Edited by josival.alecrim
Link to comment
Share on other sites

  • Este tópico foi criado há 1592 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.