Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

  • Moderadores

Como diz o nome é um exemplo, não vai lhe ensinar completamente como fazer!

Mas se teve um pouco de tempo abriu os exemplos pesquisou acharia aqui que hoje tem a impressão em QuickReport , Fortes Report e Fast Report para NFC-e

além de um componente para utilizar com uma mini impressora!

 

Então quer dizer que o componente pode usar um deles, através do modelo e tipo você terá a impressão!

mas veja não efetuou a pesquisa, mas conseguiu postar em mais de um lugar!

 

então coloque um dos componentes mencionados e dai vai no object inspector do seu delphi e olhe que possui propriedades!

 

ainda assim mesmo tendo dúvidas, e não achando no exemplo o suficiente existe o projeto do ACBrNFeMonitor que emite já o DANFCe e tem o código lá, e está no svn para todos!

veja tem diversas opções para se orientar 

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

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

 

Link para o comentário
Compartilhar em outros sites

Boa tarde Daniel,

 

Sim, ele foi feito por mim.

 

Mas toda melhoria é bem vinda, vou analisar o que você fez e semana que vem disponibilizo.

 

Boa tarde Italo!

Puxei os fontes e vi que teve uma atualização no pas do DANFCe da NFC-e, mas não foram as modificações que eu realizei.

 

Poderia me informar se conseguiu verificar e se as modificações são válidas?

 

desde já agradeço!

Att.:

Daniel

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa noite Daniel,

 

Desculpa, com certeza esqueci de avaliar.

 

Vou tentar realizar um merge do que você fez com o que esta disponível.

 

Caso eu não consiga, sem abusar da sua boa vontade, se puder aplicar as alterações que você fez no que esta disponível ficarei grato.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia Daniel,

 

Por favor atualize os fontes e teste a impressão do DANFE.

  • Curtir 1
Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Gente, eu procurei em vários locais, mas são multiplas informações sobre um mesmo tema. Alguem poderia me responder :

Qual o componente que é usado para imprimir Danfe do NFce ? Alguem poderia me mostrar um coidgo simples aqui para tal impressao/visualizacao ?? Pelo que vi a Nfce é um tipo de Nfe... estou conseguindo gerar normal, mas o exemplo que tem no diretorio do Acbr nao funciona, sai como se fosse uma nfse...Alguem poderia me ajudar ?

 abaixo o codigo que uso

 

  vAux := dm.IBGERACODIGOGEN_ID.asstring;
  vnumlote := vAux;
 
  ACBrNFe1.NotasFiscais.Clear;
  Sincrono := True;
  ACBRNFEDANFEFR1.fastfile := 'C:\Softart\NFCe\Report\DANFeNFCeDiebold.fr3';
  ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
  ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
 
  GerarNFCe(vAux);
  ACBrNFe1.Enviar(vNumLote,True,Sincrono);
 
 
  MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS);
  memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetornoWS);
  LoadXML(MemoResp, WBResposta);
 
  MemoDados.Lines.Add('');
  MemoDados.Lines.Add('Envio NFe');
  MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Retorno.TpAmb));
  MemoDados.Lines.Add('verAplic: '+ ACBrNFe1.WebServices.Retorno.verAplic);
  MemoDados.Lines.Add('cStat: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cStat));
  MemoDados.Lines.Add('cUF: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cUF));
  MemoDados.Lines.Add('xMotivo: '+ ACBrNFe1.WebServices.Retorno.xMotivo);
  MemoDados.Lines.Add('cMsg: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cMsg));
  MemoDados.Lines.Add('xMsg: '+ ACBrNFe1.WebServices.Retorno.xMsg);
  MemoDados.Lines.Add('Recibo: '+ ACBrNFe1.WebServices.Retorno.Recibo);
  MemoDados.Lines.Add('Protocolo: '+ ACBrNFe1.WebServices.Retorno.Protocolo);
 
  ACBrNFe1.NotasFiscais.Clear;
  
  ACBrNFE1.NotasFiscais.imprimir;
Link para o comentário
Compartilhar em outros sites

Quem estiver precisando imprimir a NFC-e em A4 com FastReport 5 em Rondônia aqui está o código:

procedure TForm1.btnImprimirNFCeClick(Sender: TObject);
begin
  OpenDialog1.Title := 'Selecione a NFC-e';
  OpenDialog1.DefaultExt := '*.XML';
  OpenDialog1.Filter := 'Arquivos NFE (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*';
  OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Geral.PathSalvar;

  if OpenDialog1.Execute then
  begin
    ACBrNFe1.NotasFiscais.Clear;
    ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName, False);

    ACBrNFeDANFEFR.FastFile :=  'C:\ACBr\Exemplos\ACBrNFe2\Delphi\Report\DANFeNFCeA4.fr3';
    ACBrNFeDANFEFR.Sistema := 'http://www.projetoacbr.com.br/';
    ACBrNFeDANFEFR.Usuario := 'Usuário do sistema';

    ACBrNFe1.DANFE := ACBrNFeDANFEFR;

    ACBrNFeDANFEFR.ExibirResumoCanhoto := True;

    ACBrNFe1.NotasFiscais.Imprimir;
  end;
end;
Link para o comentário
Compartilhar em outros sites

  • 4 semanas depois ...

Bom dia...

Como ficará o Danfe da NFC-e em relação ao Valor Aproximado dos Tributos (Municipal, Estadual e Nacional)?

 

Hoje ele gera no procedimento abaixo na unit DANFeQRNFCe.

 

Pelo que li não foi criada novas tags no componente e na NF-e é mostrada esta informação nas informações Complementares, tornando fácil a alteração, mas na NFC-e está sendo gerada desta forma.

 

Deverá ser alterado novamente o danfe para QuickReport?

procedure TfqrDANFeQRNFCe.qrb05_TributosBeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
var
 Perc: Double;
begin
  inherited;
//  PrintBand := QRNFe.PageNumber = 1;

  Perc := (FNFE.Total.ICMSTot.vTotTrib / FNFE.Total.ICMSTot.vNF) * 100;
  qrlTributos.Caption := 'Val Aprox. dos Tributos: ' +
                         DFeUtil.FormatFloat(FNFE.Total.ICMSTot.vTotTrib) +
                         '(' + DFeUtil.FormatFloat(Perc) + '%)(Fonte: IBPT)';
end;
Editado por Daniel Caus

Att.:

Daniel

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Daniel,

 

O problema que no XML temos apenas uma TAG para informar o valor aproximado dos tributos, com essa alteração de separar cada um deles, primeiro precisamos saber como os resultados dos cálculos serão informados no XML, novas TAGs serão criadas, ou simplesmente serão colocados no campo de observação?

 

Para que depois possamos realizar as alterações nos DANFEs.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Boa tarde Italo..

Sim.. perguntei justamente por isso, pois com a NF-e a orientação dada aqui pelo forum era que até serem criadas as novas tag´s no XML, se enviasse o total da tributação média na única tag existente e fizesse a  separação somente visual, no campo de informações adicionais.

 

Como com o danfe da NFCe em quick report não está dando pra fazer isso, pois gera automaticamente, imaginei que deveria ser alterado.

 

Meu medo era de quando entrará ou se já entrou em vigor isto, pois não estou ainda por dentro do assunto...

 

desde já agradeço!

Editado por Daniel Caus

Att.:

Daniel

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Daniel,

 

O DANFE NFC-e feito em Quick Report possui duas Bandas, uma que imprime o conteúdo da TAG vTotTrib e a outra que imprime o conteúdo da TAG infCpl (informações complementares).

 

O que você pode fazer em vTotTrib informar o total (federal + estadual + municipal) e em infCpl informar os 3 tributos separadamente, por exemplo:

 

Tributos Federais: R$ .....

Tributos Estaduais: R$ .....

Tributos Municipais: R$ ....

 

Por favor teste deste forma e se possível post o DANFE em PDF para sabermos como ficou.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia a todos,

 

Até o momento nenhuma NT a respeito desse assunto.

 

Inclusive tenho 4 modelos de DANFE NFC-e em formato A4 emitidos em 29/10/2014 e todos apresentam somente um valor, ou seja, o valor aproximado total dos tributos.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Bom dia..

Italo, segue abaixo as informações da tributação segmentada nas informações complementares.

Não tem como desabilitar a banda das tributações sem necessitar a alteração da unit do Danfe?

 

Em relação a NT acredito que saiu somente o decreto 8264.

http://www.receita.fazenda.gov.br/legislacao/Decretos/2014/dec8264.htm

post-15026-0-75912300-1416921635.png

Editado por Daniel Caus

Att.:

Daniel

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Daniel,

 

É possível fazer uma alteração no DANFE NFC-e para que se o vTotTrib for zero a banda não seja gerada.

 

Neste caso você deixaria o vTotTrib com o valor zero e os tributos segmentados colocaria nas informações complementares.

 

Atualize os fontes e teste, alimentando vTotTrib com o valor zero para todos os itens e consequentemente para o total também.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Boa tarde Italo...

 

Poderei testar somente amanhã, mas já tenho uma dúvida...

O XML não irá ficar com o valor zero para esta tag?

 

O ideal é manter a tag no XML recebendo o valor Total e segmentar nas informações complementares...

 

Mas eu testo amanhã na primeira hora..

 

obrigado!

Att.:

Daniel

Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia Daniel,

 

A SEFAZ não faz uso dessa informação para nada, é apenas uma informação para o consumidor final, para que este fique com mais raiva do governo sabendo o quando o mesmo embolsa quando compramos um produto.

 

O importante é a informação aparecer no papel.

 

Me parece que vai sair uma nova versão do Manual de especificação do DANFE NFC-e e nessa nova versão não vai mais constar a seção V do DANFE, seção esta onde é impresso o valor aproximado dos tributos.

 

Os tributos segmentados deverão ser informados na área de informações complementares, isso deverá constar também na nova versão do manual.

 

Vamos aguardar.

  • Curtir 1
Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde,

 

Foi utilizado a versão 5.02 em todos os DA - Documentos Auxiliares, feitos em Quick Report.

 

Caso você tenha uma versão diferente pode ocorrer erros acusando que uma determinada propriedade não existe, sendo assim junto com os fontes do respectivo componente existe um passo a passo chamado: Property_Does Not Exist.txt 

 

Esse arquivo visa resolver esse problema para: DANFE, DACTE, DANFSE e DAMDFE para os demais DA basta seguir o passo a passo mas selecionando as Units correspondentes.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.

The popup will be closed in 10 segundos...