Ir para conteúdo
  • Cadastre-se

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

Recommended Posts

  • Moderadores
Postado

Pessoal, aqui esta o comando que imprime o danfe, depois de gerado o arquivo xml e transmitido, também sou novato, logo, se meu código for analisado por um expert, talvez ache alguma coisa fora do lugar, mas aqui ta imprimindo o DANFE-NFCE:

 

attachicon.gifdanfce.pas

Boa noite

Fiz uma pequena alteração em seus posts anexando os arquivos, ficou visualmente melhor para se entender os posts

sempre que postar código favor anexar assim irá ficar posts menores

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado (editado)

Teria alguma chance de aproveitarmos as alterações feitas nos fontes da NFC-e pra Fast Report e gerar o componente para o Danfe da NFC-e!

 

By any chance fellas. Já estou utilizando sem nenhum problema, enviando, cancelando, testei com o celular usando o aplicativo da TecnoSPEED para Android, tudo funcionando. o maior passo acho que foi dados, agora acho que só precisaria incluir as alterações em definitivo no ABCr, sei que isso já foi até sugerido aqui no fórum, sei que não estão ignorando o pedido dos usuários mas acho que quanto mais gente pedir, acho que maior será a chance de isso acontecer, obrigado a todos.

 

God bless y'all.

 

Att. Solivan

Editado por Solivan

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

  • Moderadores
Postado

Boa noite

Não está sendo ignorado, está se tendo bastante trabalhos, veja tem que a cada gerenciador de relatório sair fazendo alterações e temos vários conforme pode ser visto!

 

Você efetuou as alterações necessárias para a versão em Fast? e também já tem o fr3 pronto para os modelos da NFC-e?

sem sim favor anexar aqui que irei providenciar os testes e verificações para subir ao svn!

Obrigado

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Consultores
Postado

Bom dia a todos,

 

Ontem a tarde o André disponibilizou o DANFE NFC-e feito em Fortes Report e eu a noite disponibilizei o DANFE feito em Quick Report.

 

Na versão Quick Report a sua utilização é bem simples:

 

Os componentes a serem instalados são: ACBrNFe e ACBrNFeDANFeQR (os mesmos usados para a NF-e).

 

O componente ACBrNFeDANFeQR tem que ser configurado da seguinte forma:

 

ACBrNFe.ACBrNFeDANFeQR.TipoDANFE := tiNFCe;

ACBrNFe.ACBrNFeDANFeQR.ImprimeItens := True; // se atribuir o valor False teremos uma impressão resumida ou seja sem a relação dos itens.

ACBrNFe.ACBrNFeDANFeQR.vTroco := vtroco; // vtroco é uma variável do tipo Currency que contem o valor do troco a ser impresso no DANFE

 

ACBrNFe.NotasFiscais.Imprimir; // Imprime o DANFE, o ImprimirPDF também esta disponivel e gera o DANFE NFC-e em PDF.
 

Observação: se o tipo do DANFE for diferente de tiNFCe o componente assume que o DANFE a ser impresso é o tipo usado para a NF-e

 

O ponta pé inicial foi dado.

  • Curtir 3
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

  • Fundadores
Postado

Teria alguma chance de aproveitarmos as alterações feitas nos fontes da NFC-e pra Fast Report e gerar o componente para o Danfe da NFC-e!

 

By any chance fellas. Já estou utilizando sem nenhum problema, enviando, cancelando, testei com o celular usando o aplicativo da TecnoSPEED para Android, tudo funcionando. o maior passo acho que foi dados, agora acho que só precisaria incluir as alterações em definitivo no ABCr, sei que isso já foi até sugerido aqui no fórum, sei que não estão ignorando o pedido dos usuários mas acho que quanto mais gente pedir, acho que maior será a chance de isso acontecer, obrigado a todos.

 

God bless y'all.

 

Att. Solivan

 

Você diz a respeito http://www.projetoacbr.com.br/forum/index.php?/topic/10018-nfc-e-nota-fiscal-do-consumidor-eletr%C3%B4nica/?p=91542  ?

 

Se SIM, notei alguns problemas...

- Não está no formato de Componente...

- Não usa a classe: DelphiZXingQRCode.pas

 

Se o autor desejar ajustar para ficar compatível como os demais DANFEs, podemos auxilia-lo...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Postado

Você diz a respeito http://www.projetoacbr.com.br/forum/index.php?/topic/10018-nfc-e-nota-fiscal-do-consumidor-eletr%C3%B4nica/?p=91542  ?

 

Se SIM, notei alguns problemas...

- Não está no formato de Componente...

- Não usa a classe: DelphiZXingQRCode.pas

 

Se o autor desejar ajustar para ficar compatível como os demais DANFEs, podemos auxilia-lo...

 

Os fontes são e

  • Fundadores
Postado

Ambos são iguais ?  Posso considerar apenas o "Danfe NFC-e com fonte ACBr atualizado.rar" ?

 

Notei que a geração de QRCode está externa... precisariamos modificar isso para usar a classe: DelphiZXingQRCode.pas...

 

Um bom exemplo seria usar o código já existente no DANFE em Fortes...

procedure TACBrNFeDANFCeFortesFr.PintarQRCode(QRCodeData: String; APict: TPicture);
var
  QRCode: TDelphiZXingQRCode;
  QRCodeBitmap: TBitmap;
  Row, Column: Integer;
begin
  QRCode       := TDelphiZXingQRCode.Create;
  QRCodeBitmap := TBitmap.Create;
  try
    QRCode.Data      := QRCodeData;
    QRCode.Encoding  := qrUTF8NoBOM;
    QRCode.QuietZone := 1;

    //QRCodeBitmap.SetSize(QRCode.Rows, QRCode.Columns);
    QRCodeBitmap.Width  := QRCode.Columns;
    QRCodeBitmap.Height := QRCode.Rows;

    for Row := 0 to QRCode.Rows - 1 do
    begin
      for Column := 0 to QRCode.Columns - 1 do
      begin
        if (QRCode.IsBlack[Row, Column]) then
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clBlack
        else
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clWhite;
      end;
    end;

    APict.Assign(QRCodeBitmap);
  finally
    QRCode.Free;
    QRCodeBitmap.Free;
  end;
end;

A pintura é feita em RunTime, geralmente em um evento OnBeforePrint da Banda

    // QRCode  //

    qrcode := NotaUtil.GetURLQRCode( ide.cUF, ide.tpAmb,
                                     infNFe.ID,
                                     DFeUtil.SeSenao(Dest.idEstrangeiro <> '',Dest.idEstrangeiro, Dest.CNPJCPF),
                                     ide.dEmi,
                                     Total.ICMSTot.vNF, Total.ICMSTot.vICMS,
                                     signature.DigestValue );
    PintarQRCode( qrcode, imgQRCode.Picture );
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

  • Moderadores
Postado

Obrigado Juliomar, notei mesmo que estava estranho, mas no momento que postei, isso não me ocorreu, pois estava interessado mesmo em distribuir o meu humilde conhecimento. Abraços

A equipe e os demais colegas agradecem a sua humilde contribuição! ;)

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado

 

Ambos são iguais ?  Posso considerar apenas o "Danfe NFC-e com fonte ACBr atualizado.rar" ?

 

Notei que a geração de QRCode está externa... precisariamos modificar isso para usar a classe: DelphiZXingQRCode.pas...

 

Um bom exemplo seria usar o código já existente no DANFE em Fortes...

procedure TACBrNFeDANFCeFortesFr.PintarQRCode(QRCodeData: String; APict: TPicture);
var
  QRCode: TDelphiZXingQRCode;
  QRCodeBitmap: TBitmap;
  Row, Column: Integer;
begin
  QRCode       := TDelphiZXingQRCode.Create;
  QRCodeBitmap := TBitmap.Create;
  try
    QRCode.Data      := QRCodeData;
    QRCode.Encoding  := qrUTF8NoBOM;
    QRCode.QuietZone := 1;

    //QRCodeBitmap.SetSize(QRCode.Rows, QRCode.Columns);
    QRCodeBitmap.Width  := QRCode.Columns;
    QRCodeBitmap.Height := QRCode.Rows;

    for Row := 0 to QRCode.Rows - 1 do
    begin
      for Column := 0 to QRCode.Columns - 1 do
      begin
        if (QRCode.IsBlack[Row, Column]) then
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clBlack
        else
          QRCodeBitmap.Canvas.Pixels[Column, Row] := clWhite;
      end;
    end;

    APict.Assign(QRCodeBitmap);
  finally
    QRCode.Free;
    QRCodeBitmap.Free;
  end;
end;

A pintura é feita em RunTime, geralmente em um evento OnBeforePrint da Banda

    // QRCode  //

    qrcode := NotaUtil.GetURLQRCode( ide.cUF, ide.tpAmb,
                                     infNFe.ID,
                                     DFeUtil.SeSenao(Dest.idEstrangeiro <> '',Dest.idEstrangeiro, Dest.CNPJCPF),
                                     ide.dEmi,
                                     Total.ICMSTot.vNF, Total.ICMSTot.vICMS,
                                     signature.DigestValue );
    PintarQRCode( qrcode, imgQRCode.Picture );

 

Os dois são iguais, mas um deles tem os arquivos .fr3 do FastReport.

 

Quando construímos o Danfce por aqui no final de 2013 criamos um propriedade para passar a imagem externa, o que fizeram com o Fortes Report em runtime é muito melhor.

Postado

Segue comandos pra se gerar um nfce usando os componentes acbr. Pessoal, se faltar alguma rotina aí, pede que eu posto aqui no fórum. Notem que eu fiz a geração do nfc-e aproveitando o código da geração da NFE, sendo assim, pode conter informação desnecessária, mas o que importa é que funciona.

 

attachicon.gifGerarxml.pas

 

Apos vc enviar como vc faz pra saver se foi autorizado ou teve rejeição.

Nao estou conseguindo carregar o retorno do webservice.

Poderia postar a rotina do envio e da validação da autorização?

 

Obrigado

  • Fundadores
Postado

Os dois são iguais, mas um deles tem os arquivos .fr3 do FastReport.

 

Quando construímos o Danfce por aqui no final de 2013 criamos um propriedade para passar a imagem externa, o que fizeram com o Fortes Report em runtime é muito melhor.

 

Leonardo,

 

Você consegue modificar os fontes do arquivo original para incluir a geração do QRCode, e criar um  novo pacote com todos os arquivos ?

 

Estou baixando e instalando um Delphi XE5, assim eu poderei fazer uma revisão nos fontes...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Postado

Leonardo,

 

Você consegue modificar os fontes do arquivo original para incluir a geração do QRCode, e criar um  novo pacote com todos os arquivos ?

 

Estou baixando e instalando um Delphi XE5, assim eu poderei fazer uma revisão nos fontes...

 

Daniel,

 

Não vou conseguir fazer isso em menos de 3 dias, por isso faço um pedido especial para o Roberto Godinho, Solivan e outros que já o utilizam para fazer.

 

Vou postar aqui os fontes do Danfce em Fast com o repositório do ACBr atualizado e quem conseguir fazer a geração do QRCode primeiro melhor.

Postado

Bom dia a todos,

 

Ontem a tarde o André disponibilizou o DANFE NFC-e feito em Fortes Report e eu a noite disponibilizei o DANFE feito em Quick Report.

...

Boa tarde Italo,

 

O DANFE Fortes Report desenvolvido pelo André já está no SVN ? Ou pode me passar o link do post, e também me explicar a forma que deve ser configurado ?

 

Obrigado.

 

Sérgio

Equipe ACBr Sérgio Assunção
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

[email protected]

  • Moderadores
Postado

Atualizou o svn e viu os arquivos?

 

Boa tarde Italo,

 

O DANFE Fortes Report desenvolvido pelo André já está no SVN ? Ou pode me passar o link do post, e também me explicar a forma que deve ser configurado ?

 

Obrigado.

 

Sérgio

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado

Atualizou o svn e viu os arquivos?

Acabei de fazer Juliomar e percebi os novos arquivos.

Agora você pode exemplificar como seria os parâmetros a serem passados para a chamada do DANFE NFC-e Fortes Report ?

Reparei no demo e a "chamada" do DANFE ainda só está destinada à NF-e.

 

Obrigado.

 

Sérgio

 

Equipe ACBr Sérgio Assunção
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

[email protected]

  • Consultores
Postado

Boa noite Sérgio,

 

No caso do Fortes, não sei se há necessidade de "setar" algumas propriedades, mas em conversa com o André o que sei é:

 

O comando Imprimir, imprimi o DANFE com a lista de itens, já o comando ImprimirResumido (novo), imprimi o DANFE ocultando a lista de itens.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado (editado)

Outra pergunta, com estas novas alterações feitas no fortes, seria possível imprimir em impressoras não fiscais, levando em conta que as mesmas tem seus próprios métodos de impressão, e que algumas também usam o spooler do windows através do driver instalado no windows?

Editado por Solivan

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

  • Moderadores
Postado

Outra pergunta, com estas novas alterações feitas no fortes, seria possível imprimir em impressoras não fiscais, levando em conta que as mesmas tem seus próprios métodos de impressão, e que algumas também usam o spooler do windows através do driver instalado no windows?

Boa noite 

Chegou a olhar o componente TACBrNFeDANFeESCPOS?

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado (editado)

Daniel,

 

Não vou conseguir fazer isso em menos de 3 dias, por isso faço um pedido especial para o Roberto Godinho, Solivan e outros que já o utilizam para fazer.

 

Vou postar aqui os fontes do Danfce em Fast com o repositório do ACBr atualizado e quem conseguir fazer a geração do QRCode primeiro melhor.

 

Ok Rapazes, atualizei o ACBr para a ultima revisão, como sendo hoje (3/4/2014 às 23:00), e coloquei as alterações feitas pelo nosso colega aqui do fórum, e tb implementei a geração do QrCode dentro do codigo, gerei um novo Package como sugeriu o Daniel. então fica ai o anexo, caso algum dos Administradores queiram analisar, acredito que todos ficariamos contentes por mais este recurso no ACBr.

 

Att. Solivan

 

Anexo removido, anexado novamente na próxima página com melhorias.

Editado por Solivan

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

Postado

Boa noite 

Chegou a olhar o componente TACBrNFeDANFeESCPOS?

 

Vou analisar Juliomar, obrigado pela dica.

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

  • Moderadores
Postado

Ok Rapazes, atualizei o ACBr para a ultima revisão, como sendo hoje (3/4/2014 às 23:00), e coloquei as alterações feitas pelo nosso colega aqui do fórum, e tb implementei a geração do QrCode dentro do codigo, gerei um novo Package como sugeriu o Daniel. então fica ai o anexo, caso algum dos Administradores queiram analisar, acredito que todos ficariamos contentes por mais este recurso no ACBr.

 

Att. Solivan

O pacote compilou e instalou em sua máquina? pois estive olhando aqui e não faz referencia a ACBrNFe2 dentro dele e não tem os pacotes necessários do Fast!

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado

eu uso delphi XE, e não instalei aqui, não tive tempo de testar pq conclui a alteração bem tarde da noite. Mas quais são os outros arquivos do fast, porque pelo que pude ver alterei o ACBrNFeDANFEFR.pas e o ACBrNFeDANFEFRDM.pas, inclui o arquivo DANFeNFCe.fr3 e o arquivo de registro do componente ACBrNFeDANFEFRReg.pas.

 

Quais são os demais Juliomar.

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

  • Este tópico foi criado há 3757 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.