Aplicativo Para Ler Qrcode Do Sat Na Google Play

[kidrahs]

Pessoal,

 

Publicaram um aplicativo para ler QRCode do SAT na Google Play:

 

https://play.google.com/store/apps/details?id=br.gov.sp.sefaz.cfe.comsatprod&hl=en

 

[_paulinho]

O QRcode gerado no ACBr está funcional?

[Marcelo A. Rodrigues]

Boa Tarde Pessoal,

 

Eu testei o QRcode gerado pelo ACBr e ele retorna o seguinte erro: "O formato dos dados do QRCode é inválido";

Analisei os fontes e precisei fazer a seguinte mudança para corrigir:

 

-- ACBrSAT/ACBrSATExtratoClass.pas

[*] Ajuste no método: CalcularConteudoQRCode alterar a máscara do valor de "," para ".";

    No meu projeto o DecimalSeparator é "," portanto ao usar a função FormatFloat ele retorna o valor com a vírgula;

    function TACBrSATExtratoClass.CalcularConteudoQRCode(ID: String; dEmi_hEmi:TDateTime; Valor: Double; CNPJCPF: String;
       assinaturaQRCODE: String): String;
    var
        OldDecSep: Char;
    begin
        OldDecSep := DecimalSeparator;
        try
           DecimalSeparator := '.'; 
           Result := ID + '|' +
              FormatDateTime('yyyymmddhhmmss',dEmi_hEmi) + '|' +
              FormatFloat('0.00', Valor) + '|' +
              Trim(CNPJCPF) + '|' +
              assinaturaQRCODE;
        finally
           DecimalSeparator := OldDecSep;
        end;
    end;

Se alguém puder verificar se é isso mesmo e subir as alterações, eu não sei fazer isso.

Obrigado!

[Daniel Simoes]

Obrigado pelo Bug Report... Estou preparando algumas alterações na ACBrUtil que devem agilizar essa transformação de valor...

 

Veja:

{-----------------------------------------------------------------------------
  Converte um Double para string, semelhante a FloatToStr(), porém
  garante que não haverá sepeador de Milhar e o Separador Decimal será igual a
  "SeparadorDecimal" ( o default é .(ponto))
 ---------------------------------------------------------------------------- }
function FloatToString(const AValue: Double; SeparadorDecimal: Char;
  AFormat: String): String;
var
  DS, TS: Char;
begin
  if EstaVazio(AFormat) then
    Result := FloatToStr(AValue)
  else
    Result := FormatFloat(AFormat, AValue);

  DS := {$IFDEF DELPHI15_UP}FormatSettings.{$ENDIF}DecimalSeparator;
  TS := {$IFDEF DELPHI15_UP}FormatSettings.{$ENDIF}ThousandSeparator;

  // Removendo Separador de milhar //
  Result := StringReplace(Result, TS, '', [rfReplaceAll]);

  // Verificando se precisa mudar Separador decimal //
  if DS <> SeparadorDecimal then
    Result := StringReplace(Result, DS, SeparadorDecimal, [rfReplaceAll]);
end;

Com ela, poderíamos chamar: FloatToString( Valor, '.', '0.00')

[netstart]

Alguém teve sucesso na consulta do QRCode, eu não estou conseguindo validar nem o QRCode gerado pelo próprio aplicativo de teste da receita (v2.2.5) que instala junto com o emulador.

Analisando o manual novamente ER 2.12.17 pagina 102, verifiquei que também será necessário tirar o pipe quando não for identificado o cpf ou cnpj do consumidor, então fiz a alteração colocando um Ifthen:

 DecimalSeparator := '.';

       Result :=  ID + '|' +

          FormatDateTime('yyyymmddhhmmss',dEmi_hEmi) + '|' +

          FormatFloat('0.00', Valor) + '|' +

           Trim(CNPJCPF) + IfThen(Trim(CNPJCPF)<>'', '|','') +

          assinaturaQRCODE;

Mesmo assim não consegui validar no aplicativo disponibilizado pelo fisco.

Lendo mais uma vez esse trecho do manual fiquei na duvida se não temos que codificar a concatenação do da string antes de juntar com a assinatura do SAT, que também fiz teste e não deu certo.

Ai me levou a mais uma duvida na interpretação, quando fala que deve codificar o concatenação em base 64 e depois assinar usando o certificado do SAT, no caso no código estamos apenas pegando a assinatura e vinculando junto e não assinando a string, fiquei na duvida.

 

Após gerar a string de dados, deve-se assiná-la utilizando o Certificado Digital do SAT-CF-e de forma que o resultado da operação seja uma string de dados codificada em base64 seguindo o padrão PKCS #1 versão 1.5.

[Daniel Simoes]

Acredito que isso não se refere a aplicação... Pois não há como a aplicação ter acesso ao certificado interno do SAT

[netstart]

Daniel você conseguiu validar algum pelo aplicativo?

[Marcelo A. Rodrigues]

Netstart Boa Tarde,

 

Eu consegui validar os meus com o aplicativo, após a trocar a mascara do valor de virgula para ponto.

[netstart]

Marcelo poderia tentar validar esse aqui com a versão do seu aplicativo.

[Marcelo A. Rodrigues]

netstart está retornando o erro "O formato dos dados do QRCode é inválido";

 

Você alterou a máscara do valor do cupom antes de gerar a string do QRCode ?

[netstart]

Sim, coloquei para salvar o QRCode em txt para ver se esta correto, me parece tudo certo, vou colocar em anexo.

QRCodeCFe.txt

QRCodeCFe.txt

[Marcelo A. Rodrigues]

NetStart, essa segunda imagem deu certo

 

Consegui consultar seu Cupom, foi emitido em 13/01/2015 15:53:36 no valor de 170,00.

Já foram realizadas 3 consultas a esse mesmo cupom.

[Daniel Simoes]

Apliquei uma correção para o problema acima nos fontes do SVN

[evandromira]

Estou usando o SAT Sweda SS-1000 para testes e pelo aplicativo acusa qrcode inválido...

 

Por estar em modo de homologação o qrcode é invalido?

 

Por ser um SAT de testes a assinatura da combinação de CNPJs é "SGR-SAT SISTEMA DE GESTAO E RETAGUARDA DO SAT" e não tem nada haver com uma assinatura gerada pela combinação de CNPJs, seria por isso?

 

Além dos parametros de configuração normais do ACBrSat e assinatura de 344 caracteres o que devo fazer para garantir que o qrcode em produção será gerado corretamente?

 

Obrigado

[Daniel Simoes]

Você tem certeza que já baixou as correções descritas nesse tópico ? (atualizou pelo SVN)

[evandromira]

Sim Daniel...

 

E para garantir, fiz o apagarAcbr.bat e reinstalei tudo com o ACBrInstall.exe (Delphi 7)

 

Mesmo assim acusa qrcode inválido para qualquer cf-e que emito, lembrando que estou usando o SAT da SWEDA de testes, como descrevi no post anterior...

[kidrahs]

Pessoal,

 

Esse leitor de QRCode só funciona com os equipamentos em produção.  Uma parte das validações que são feitas, no entanto, servem para verificar se a construção do QRCode está correta, mesmo se o equipamento é do ambiente de testes.  

 

Não sei se vocês viram o guia que a SEFAZ disponibilizou, mas acho que pode ajudar.

 

Lembrei também que eles tinham disponibilizado um guia para montar QRCode . 

 

Espero que as informações ajudem

Editado 1 Abril, 2015 por kidrahs

[kidrahs]

Acabei de receber notícia de que o aplicativo está disponível para o iPhone.

[evandromira]

Ainda estou com o problema do QR code inválido...

 

Ao ler um qrcode de um cupom em produção me retorna a segunte string:

35150501058055000204590000026580000363333153|20150509083058|1.00||Fz+jtH9ZQH7ka0DqaDMVC0oPS9lwHW2xVpBCsCgVnj/bS33KRnvqAtdRk4pc20y6UU8iBHvhoN0XKNujSPCq+EgvRwHgBFrvLce0B3a60aO6C04hl21b5e/tNkNvlIHuQnI0RfnEMnbYQcn4EwuFvtAOi6ulA63bVoXnesEwozg3kGVTGnQ75N4qkSTwtH0TS6RDTC1B9R1jzhwFIZI4DBSfsIzJczpZBk0SEoJYVCmES3DDTs2+Cu1X9bor89waxoWJKA5bGXfoZUqFX+S/mjPH/Qv+b4Wg+Psuy3Qt6sGN85PWM/PeddjGFIppI1dUYD+DhVzC2AXbhMS8wpLAfQ==

 

Consultando o cupom pela chave no site mostra normal, mas pelo qrcode nao vai pelo aplicativo no android só acusa qrcode inválido

[evandromira]

Desculpa pessoal...

 

Após dezenas de tentativas com o app do sefaz, ele leu corretamente o codigo e mostrou o cupom...

 

Percebi que ele é muito sensível, tem que mirar bem antes de clicar para ler senão ele acusa codigo inválido

[Daniel Simoes]

O Sefaz lançou uma versão do aplicativo para IOS (IPhone)... Basta procurar na Apple Store por "SAT CFe"

[Ademir Domingues]

Pessoal, estou, como brasileiro que sou,rsrsr, estou iniciando a mudança do meu programa para atender ao SAT@CFE, pois pensei que teria uma nova prorrogação.
Estou vendo o Pessoal falar de emulador. Fiz algumas pesquisas e fui informado que tenho que adquirir um dispositivo para desenvolvimento, a Tanca e a Bematech vendem a preço subsidiado para desenvolvedor.
Eu utilizo VB6 e estou ainda convertendo alguns desses programa para VB.NET, preciso gerar o danfe do CFE tanto em V6 como em VB,NET, alguem tem um exemplo ou sabe onde eu consigo. Terei mesmo que reescrever toda a minha rotina que enviava ao ECF? Eu li aquele manual do Sefaz, mas ele tem tanta informação que acvaba gerando mais duvidas na nossa cabeça.rs. Se vocês que estão mais adiantados puderem me orientar no caminho a seguir para desenrolar esse embaraço.  Agradeço qualquer ajuda e peço desculpas por solicitar ajuda de última hora. 

[Daniel Simoes]

Você encontra tudo que precisa para o desenvolvimento, inclusive o Emulador de SAT... na página do SEFAZ

 

http://www.fazenda.sp.gov.br/sat/downloads/vigentes.asp

[Luciano César Gimenez]

Ola Daniel bom dia, estou tendo problemas para ler o QRCode impresso na Impressora Bematech MP-2500TH, estou com duas impressoras aqui, uma Daruma DR700 e essa Bematech, o mesmo CFe impresso nas duas impressoras, a que é impresso na Daruma, o aplicativo da Sefaz le normal, ja na Bematech me da a mensagem Erro: Assinatura do QRCode não é valida. Você poderia me dar uma luz, o que poderia ser. 

O QRCode que é impresso na Bematech é um pouco menor, não sei se isso afeta alguma coisa.

Desde ja agradeço a atenção.

Luciano

[Daniel Simoes]

Tente variar os parâmetros do PosPrinter.ConfigQRCode