Ajuda Com Geracao Da Url Para O Qr Code Da Nfc-E

[diego ribas]

Estava pensando em criar a opção de o usuário ao invés de imprimir o DANFE da NFC-e enviar via SMS a URL para o consumidor poder visualizar as informações, porem estive consultando um mestre chinês e ele me disse que isso não é possivel devido a constar no manual que é obrigatório a impressao do danfe, consultei o manual e nao encontrei esta obrigação.

Algum de vocês pode me confirmar esta informação.

 

Obrigado.

 

[SHDW]

Citar

Poderá  ser  impresso  apenas  o  DANFE  NFC-e  resumido  ou  ecológico,  sem  o 
detalhamento dos itens da venda,  desde que a Unidade Federada permita esta 
opção  em  sua  legislação  e  o  consumidor  assim  o  solicite.  O  consumidor  que 
aceitar  receber  somente  o  DANFE  NFC-e  resumido  poderá,  posteriormente, 
solicitar ao emissor a impressão, sem custo, do correspondente DANFE  NFC-e 
completo.  O  consumidor  também  poderá  imprimir  o  DANFE  NFC-e  completo 
apresentado no portal da Secretaria da Fazenda em resposta a consulta pública 
pela  chave  de  acesso  ou  pela  leitura  do  QR  Code.  O  prazo  máximo  de  que 
dispõe  o  consumidor  para  a  solicitação  de  impressão  do  DANFE  NFC-e 
completo (com detalhe de itens)  ao emitente corresponde ao prazo de garantia 
da mercadoria, segundo o código de defesa do consumidor; 
  O  contribuinte  emitente  de  NFC-e  fica  dispensado  de  enviar  ou  disponibilizar 
download  ao  consumidor  do  arquivo  XML  da  NFC-e,  exceto  se  o  consumidor 
assim o solicitar, desde que antes de iniciada a emissão da NFC-e; 
  A  legislação  estadual  poderá  facultar  que,  por  opção  do  adquirente  da 
mercadoria, o DANFE NFC-e não seja impresso e seja enviado por mensagem 
eletrônica (email ou SMS); ou seja, impresso apenas o DANFE NFC-e resumido, 
sem a impressão do detalhe dos itens de mercadoria. 

Fonte:  Manual de Especificações Técnicas do DANFE NFC-e e QR Code - versão 3.4

Editado 26 Novembro, 2015 por shdw
Fonte

[ALA]

Senhores, desculpe a minha ignorância, mas essas dll's são referente a que, envio de e-maill, geração de QRCode ?

Editado 22 Março, 2016 por ALA

[FABRICIO CERAVOLO PENA]

Em 2013-10-25 at 14:40, Leonardo Gregianin disse:

Meu código funciona assim:

function StringToHex(S: String): String;
var i: Integer;
begin
  Result:= '';
  for i := 1 to length(S) do
    Result:= Result+IntToHex(ord(S[i]),2);
end;

function Iif(Condicao: Boolean; Verdadeiro, Falso: Variant): Variant;
begin
 if Condicao then
   Result := Verdadeiro
 else Result := Falso;
end;

if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb = taProducao then
  URL := 'http://www.sefaz.mt.gov.br/nfce/consultanfce?'
else
  URL := 'http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?';

if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb = taProducao then
  tpAmb := '1'
else
  tpAmb := '2';
cDest := Iif(Length(ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF) > 0, ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF, '');

Memo.Lines.Clear;
Memo.Text :=  URL +
              'chNFe='     + ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe +
              '&nVersao='  + '100' +
              '&tpAmb='    + tpAmb +
              Iif((Length(cDest) > 0),('&cDest=' + cDest), '') +
              '&dhEmi='    + StringToHex(DateTimeTodhUTC(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi,GetUTC(ACBrNFe1.NotasFiscais.Items[0].NFe.emit.enderEmit.UF, ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi))) +
              '&vNF='      + FormatFloat(',0.00;-,0.00', ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF) +
              '&vICMS='    + FormatFloat(',0.00;-,0.00', ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS) +
              '&digVal='   + StringToHex(ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.digVal) +
              '&cIdToken=' + '000001';

Hash_SHA1 := ACBrEAD1.CalcularHash(UTF8Encode(Memo.Text), dgstSHA1);
Memo.Text := Memo.Text + '&cHashQRCode=' + Hash_SHA1;

[DCC Error] UnitNFe2.pas(4482): E2250 There is no overloaded version of 'CalcularHash' that can be called with these arguments

na minha máquina deu este erro alguem sabe porque  ? 

Memo.Text := Memo.Text + '&cHashQRCode=' + Hash_SHA1;

erro nesta linha

Editado 4 Maio, 2017 por FABRICIO CERAVOLO PENA

[André Ferreira de Moraes]

7 horas atrás, FABRICIO CERAVOLO PENA disse:

[DCC Error] UnitNFe2.pas(4482): E2250 There is no overloaded version of 'CalcularHash' that can be called with these arguments

na minha máquina deu este erro alguem sabe porque  ? 

Memo.Text := Memo.Text + '&cHashQRCode=' + Hash_SHA1;

erro nesta linha

Use a função GetURLQRCode da unit ACBrNFe.pas