NFCe fast report sem qrcode

[AllyRafhiyy]

pessoal desculpe incomoda-los de novo, mas estou com uma duvida!

nao consigo entender porque a nfce no fastreport sai sem o qrcode.

segue xml em anexo!

28160508074088000106650010001111781001111780-nfe.xml

[Juliomar Marchetti]

5 minutos atrás, AllyRafhiyy disse:

pessoal desculpe incomoda-los de novo, mas estou com uma duvida!

nao consigo entender porque a nfce no fastreport sai sem o qrcode.

segue xml em anexo!

28160508074088000106650010001111781001111780-nfe.xml

Testou com o demo? vai na pasta exemplos e veja se ocorre o mesmo!

tem lá pra imprimir danfe e danfce com fast report!

[AllyRafhiyy]

la no demo nao tem Fastreport, tem o Fortesreport!

gero a imagem do qrcode, mas nao sai na nfce no fastreport, sai em branco!

verifique no sefaz e esta normal a nfce!

[Juliomar Marchetti]

Calma jovem acho que você não procurou direito!

viu na pasta "\Exemplos\ACBrDFe\ACBrNFe\Delphi DANFe FR"

[Juliomar Marchetti]

Calma jovem acho que você não procurou direito!

viu na pasta "\Exemplos\ACBrDFe\ACBrNFe\Delphi DANFe FR"

[Juliomar Marchetti]

Calma jovem acho que você não procurou direito!

viu na pasta "\Exemplos\ACBrDFe\ACBrNFe\Delphi DANFe FR"

[AllyRafhiyy]

simplismente nao abre! no delphi xe2!

[AllyRafhiyy]

essa e procedure que uso para gerar nfce com qrcode!

procedure TUFinaliza_Venda.PreparaNFCE;
begin
nfce_autorizada := false;
  //frmmodulo.LerConfiguracao;
  vAux := uPrincipal.codifica('888888',6);

  vSincrono := '1';
  vNumLote := '1';
  Sincrono := true;
  with uConfigNFCe do
  begin
    try
      ACBRNfe1.NotasFiscais.clear;
      ShowMessage('          AGUARDE...  GERANDO NFC-E');
      //grid.Repaint;
      GerarNFCe(vAux);
      sleep(1800);
      ShowMessage('          AGUARDE...  ENVIANDO NFC-E');
      //grid.Repaint;
      ACBRNFe1.Enviar(vNumLote, false, Sincrono);

      if ACBRNFe1.NotasFiscais.Items[0].Confirmada then
      begin
        If ACBRNFe1.WebServices.Enviar.cStat = 100 then
        begin
          cStatus := 100;
          ChaveNFCE := ACBRNFe1.NotasFiscais.Items[0].NFe.infNFe.Id;
          NumeroNFCe := strtoint(vAux);
        end;
      end
      else
      begin
        ShowMessage(ACBRNFe1.WebServices.Enviar.xMotivo);
      end;

      ShowMessage('          AGUARDE...  GERANDO QRCODE DA NFC-E');
      //grid.Repaint;

      GerarQrCode;
      Zint.Barcode.Data := MemoDados.text;
      bc := TBitmap.create;
      Zint.Barcode.GetBarcode(bc);
      bc.SaveToFile('C:\Protheus\xml\NFCe\qrcode' + copy(ChaveNFCE, 4, 47)
        + '.bmp');
      FreeAndNil(bc);
     ACBrNFeDANFEFR1.FastFile :=  'C:\Protheus\DANFeNFCe\DANFeNFCe.fr3';
    //  if FileExists(frmPrincipal.LerINi(sConfiguracoes, 'PDV',
    //    'CAMINHO_LOGO', '')) then
    //    ACBrNFeDANFEFR1.Logo := frmPrincipal.LerINi(sConfiguracoes, 'PDV',
    //      'CAMINHO_LOGO', '');
      ACBrNFeDANFEFR1.Detalhado := true;
      ACBrNFeDANFEFR1.vTroco := rdiferenca.Value;
      ACBRNFe1.NotasFiscais.Imprimir;
      ACBRNFe1.NotasFiscais.clear;

      if cStatus = 100 then
        nfce_autorizada := true
      else
        nfce_autorizada := false;
    except
      on e: exception do
      begin
        application.messagebox(pansichar('Erro na geração da NFCE' + #13 +
          'Erro: ' + e.Message), 'Erro', mb_ok + MB_ICONERROR);
        nfce_autorizada := false;
      end;

    end;

  end;

end;

[AllyRafhiyy]

pasta NFCe!

segue anexo

[Juliomar Marchetti]

Então acho que você está equivocado!

basta passar o xml que o fast report já gera pra ti o qrcode e não fica gerando por fora!

[AllyRafhiyy]

ja fiz isso tbm! removir o codigo que gerava o qrcode por fora, mesmo assim sai a NFCe sem qrcode!

[Josedec Ribeiro de Oliveira]

Boa Tarde, tudo bem AllyRafhiyy, estou com o mesmo problema , vc conseguiu resolver como?

 

[Juliomar Marchetti]

E o data do qrcode tem?

[AllyRafhiyy]

Cara, eu mudei para o Fortes Report e nao tive mais problema com o qrcode!!!!

desculpem não ter colocado a solução antes!!!!

[joveci guedes de almeida]

Imprime_display('          AGUARDE...  GERANDO QRCODE DA NFC-E',
        CLWHITE, tiLivre);
      grid.Repaint;
      //GerarQrCode;
      ACBRNFCe.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
      Zint.Barcode.Data := MemoDados.text;
      bc := TBitmap.create;
      Zint.Barcode.GetBarcode(bc);
      bc.SaveToFile('C:\Sac\PDV\xml\qrcode' + copy(ChaveNFCE, 4, 47)

Pessoal alguem para ajudar gerar em contigencia nfce

[Juliomar Marchetti]

2 horas atrás, joveci guedes de almeida disse:

Imprime_display('          AGUARDE...  GERANDO QRCODE DA NFC-E',
        CLWHITE, tiLivre);
      grid.Repaint;
      //GerarQrCode;
      ACBRNFCe.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True;
      Zint.Barcode.Data := MemoDados.text;
      bc := TBitmap.create;
      Zint.Barcode.GetBarcode(bc);
      bc.SaveToFile('C:\Sac\PDV\xml\qrcode' + copy(ChaveNFCE, 4, 47)

Pessoal alguem para ajudar gerar em contigencia nfce

Boa noite

se estiver usando o ACBr basta colocar em contingência e mandar imprimir que ele já vai tratar.

[andreiluis]

Citar

 

Desculpem ressuscitar um tópico tão antigo, mas como a situação é bem parecida com a minha, achei melhor fazer isso do que criar um novo.

 

Estou tentando gerar NFCe na versão 4.00, testando em modo de homologação, e a NFCe é emitida, consultei no site do SEFAZ e está lá. Mas não estou conseguindo gerar a DANFE, criei um novo tópico no fórum e enquanto não aparece alguma solução lá, fui testar com o layout que eu usava com a versão 3.10, e a DANFE foi gerada, porém sem o qrCode. Alguém pode me dar uma dica do que fazer nesse caso?

 

Testei no BDS 2006 e no XE2, Fastreport 4.12, DANFE A4.

 

Grato

[Felipe E. Resende Mesquita]

14 horas atrás, andreiluis disse:

Desculpem ressuscitar um tópico tão antigo, mas como a situação é bem parecida com a minha, achei melhor fazer isso do que criar um novo.

 

Estou tentando gerar NFCe na versão 4.00, testando em modo de homologação, e a NFCe é emitida, consultei no site do SEFAZ e está lá. Mas não estou conseguindo gerar a DANFE, criei um novo tópico no fórum e enquanto não aparece alguma solução lá, fui testar com o layout que eu usava com a versão 3.10, e a DANFE foi gerada, porém sem o qrCode. Alguém pode me dar uma dica do que fazer nesse caso?

 

Testei no BDS 2006 e no XE2, Fastreport 4.12, DANFE A4.

 

Grato

Bom dia, andreiluis.

Tópico antigo. Sugiro que crie um novo.