Jump to content

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

DSilva

Membros
  • Posts

    174
  • Joined

  • Last visited

2 Followers

Contact Methods

  • Website URL
    http://www.focosistema.com.br

Profile Information

  • Sexo
    Masculino
  • Location
    Passo Fundo - RS

Recent Profile Visitors

1,310 profile views

DSilva's Achievements

Community Regular

Community Regular (8/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

15

Reputation

2

Community Answers

  1. Opa, tudo bem!! Thiago.Ropd eu nao consegui ainda, vou fazer uns testes amanha novamente ai posto aqui. abraço ao amigo.
  2. Andre, tudo bem! descobriu alguma coisa referente a esse problema de interromper ?
  3. Opa, ok, ja estava fazendo teste, nao tinha implementado para mostrar na tela, mas fiz no proprio Demo, o log e imagem anexo.. Obs: Com Qrcode na tela ao Teclar ESC ele entra no evento do componente. LogTEF.txt
  4. Boa tare, pessoal, os teste que estou fazendo é pelo PINPAD, quando aparece o Qrcpde nele e o cliente resolve desistir o operador tecla o ESC para interromper o processo e isso nao ocorre, so lembrando os amigos estou fazendo teste em produção com SitefDemo. eu ainda nao concegui resolver peço se tem alguem com este mesmo proplema por favor uma ajudinha seria bem vindo.. abraço.
  5. Bom dia, Andre sim estou com os fontes atualizado, sempre faço isso antes de postar. alguma outra ideia??
  6. Andre, coloquei um showmessage, e descobri que ele nem entra, nao passa por la.... quando é Carteira Digital, pois fazendo com cartao normal ai sim ele passsa pelo evento. '' ACBrTEFD1AguardaResp(Arquivo: String; SegundosTimeOut: Integer; var Interromper: Boolean); ''
  7. Nao consigo debugar da este erro ma hora de abrir o gerTEF, nao deixa que coisa loco hoje... alguma ideia do porque disso?
  8. Andre, coloquei a alteração no TefDemo e fiz os teste, e nao deu certo, continua do mesmo jeito nao interrompe. Ele fica ate aparecer a mensagem '' 90- NAO AUTORIZADA ''. so depois que ele volta.
  9. Blz, Andre, vou fazer os teste aqui posto o resultado, obrigado abraço..
  10. Opa André, pode me dar uma dica : procedure TFormPrincipal.ACBrTEFD1AguardaResp(Arquivo: String; SegundosTimeOut: Integer; var Interromper: Boolean); var Msg : String ; begin if FCanceladoPeloOperador then begin FCanceladoPeloOperador := False; Interromper := True ; Exit; end; Msg := '' ; if (ACBrTEFD1.GPAtual in [gpCliSiTef, gpVeSPague, gpPayGoWeb]) then // É TEF dedicado ? begin if (Arquivo = '23') and ACBrTEFD1.TecladoBloqueado then // Está aguardando Pin-Pad ? begin // Desbloqueia o Teclado ACBrTEFD1.BloquearMouseTeclado(False); // Ajusta Interface para Espera do TEF, com opçao de cancelamento pelo Operador StatusVenda := stsAguardandoTEF; Msg := 'Aguardando Resposta do Pinpad. Pressione <ESC> para Cancelar'; FCanceladoPeloOperador := False; end; end else if FTempoDeEspera <> SegundosTimeOut then begin Msg := 'Aguardando: '+Arquivo+' '+IntToStr(SegundosTimeOut) ; FTempoDeEspera := SegundosTimeOut; end; if Msg <> '' then AdicionarLinhaLog(Msg); Application.ProcessMessages; end; Onde posso fazer o teste aqui ???
  11. Bom dia, sim vou por anexo, fiz esse teste usando o Demo em produçao com PPC930. Teclei ESC umas 3 ou 4 vez mas nao interrompe o processo. so depois de alguns minutos estoura a msg que esta na foto em anexo tmb.
  12. Ola amigos, estou com um problema usando em produção com PIX e sitef pelo PINPAD. Depois que é mostrado o Qrcode no pinpad, caso o cliente desista, e queira pagar com um cartao DEB/CRED o processo que o operador precisa fazer é interromper com a tecla ESC essa operação, e continuar com outra modalidade, o problema é que quando é carteira digital (PIX) a tecla ESC para abortar(interromper) nao esta funcionando, fica uns 2 minutos a contagem e só depois disso que para o processo. Fazendo o mesmo processo pelo TEFDemo em producao acontece a mesma coisa. Lembrando isso só esta acontecendo com carteira digital no caso aqui o PIX. fora isso o fluxo esta normal com outras modalidade pelo TEF. Alguem ja passou por este problema?
  13. Opa, agora veio count 1, blz, agora como que faço para imprimir esse evento e pegar o xml?
  14. Bom dia BigWings, fiz o teste com o exemplo seu, e talvez no que eu estou fazendo nao esta funcionando. olha só o que as vezes esta acontecendo no cliente, mando cancelar o cupom, por algum motivo nao recebo de volta a resposta do cancelamento e nem os dados da sefaz (instabilidade algo assim). bom o cliente tenta fazer novamente o cancelamento, ai eu faço a consulta pela chave ex. ANFc.WebServices.Consulta.NFeChave := chNFe'; ANFc.WebServices.Consulta.Executar; depois faço if ANFc.WebServices.Consulta.cStat = 100 procedimento para cancelar... else e nesse ponto que quero chegar. o cupom na sefaz esta cancelado eu preciso entao pegar os dados (evento de cancelamento) para entao fazer a impressao do cancelamento o protocolo etc.. usando a rotina que vc me passou for var I := 0 to ANFc.EventoNFe.Evento.Count - 1 do '' aqui esta zero nao tem nada de evento. e é exatamente o que eu precisava. acretito que estou fazendo alguma coisa errda mas nao sei o que. acho que ficou claro a minha explicacao agora kkkk.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.