Homologação TEF

[edsonsimoespereira]

Bom dia Senhores.

Recebi a documentação para homologação TEF através da dll Clisitef.

Fiz as instalações e logo no no primeiro teste, "Venda com cartão de Débito" onde eu devo passar o cartão na maquina,

o sistema emite a mensagem "13-Operação cancelada? Yes/No" sem que eu tenha pressionado qualquer tecla.

Alguem pode me informar o que esta causando essa ação? Estou inicialmente usando o exemplo que usa o componente

ACBrTEFD1.

 

Obrigado.

[Daniel Simoes]

Verifique se você instalou corretamente o SiTEF Emulador... na dúvida, apague tudo e siga atentamente as instruções de instalação

[edsonsimoespereira]

Bom dia Daniel.

Fiz o que você recomendou, instalei novamente o SiTef Simulado, mas, continuo com o problema nos testes de homologação.

O sistema emite a mensagem "13-Operação cancelada? Yes/No" sem que eu tenha pressionado qualquer tecla.

Entrei em contato com o suporte da SkyTEF, eles pediram pra enviar os arquivos de log e me retornaram que pelo

log o processo esta normal.

Poderia ser  algum problema com o Pinpad que estou usando?

Obrigado.

 

[Daniel Simoes]

Não sei lhe dizer.. o problema não ocorre comigo...

o Emulador do SiTEF pode operar sem o PinPad

[edsonsimoespereira]

Olá Daniel. 

No fonte que estou usando não tinha o código do evento OnAguardaresp, então

peguei o código abaixo no forum.

Você pode verificar se esta correto o código?

---------------------------------------------------

procedure TForm1.ACBrTEFD1AguardaResp(Arquivo: string; SegundosTimeOut: Integer; var Interromper: Boolean);
var
  Msg : String ;
  fCancelado : Boolean;
begin
  Msg := '' ;
  if (ACBrTEFD1.GPAtual in [gpCliSiTef, gpVeSPague]) then   // É TEF dedicado ?
   begin
     if (Arquivo = '23') and (not bCancelarResp.Visible) then  // Está aguardando Pin-Pad ?
     begin
        if ACBrTEFD1.TecladoBloqueado then
        begin
           ACBrTEFD1.BloquearMouseTeclado(False);  // Desbloqueia o Teclado
           // TODO: nesse ponto é necessário desbloquear o Teclado, mas permitir
           //       um clique apenas no botão cancelar.... FALTA CORRIGIR NO DEMO
        end ;

        Msg := 'Tecle "ESC" para cancelar.';
        bCancelarResp.Visible := True ;
        fCancelado := False;
     end;
   end
  else
     Msg := 'Aguardando: '+Arquivo+' '+IntToStr(SegundosTimeOut) ;

  if Msg <> '' then
     StatusBar1.Panels[2].Text := Msg;
  Application.ProcessMessages;

  if fCancelado then
     Interromper := True ;
end;
 

 

Obrigado.

[Daniel Simoes]

O evento você programa de acordo com a sua necessidade...

 

[edsonsimoespereira]

Obrigado.

[edsonsimoespereira]

bom dia Senhores(as).]

Qual configuração necessária para imprimir os comprovantes TEF na impressora não fiscal ?

Nas minhas simulações de venda com cartão, mostra as mensagens:

Imprimindo NFCe
Imprimindo Transações/Comprovante TEF,
 

mais a impressão na sai na impressora.

 

Obrigado.

[Daniel Simoes]

Você tem eventos no componente, que são chamados no momento da Impressão... basta pegar o conteúdo dos parâmetros enviados, para a sua aplicação, e imprimi-los usando o componente ACBrPosPrinter

[edsonsimoespereira]

Ola! Daniel.

Você se refere aos eventos do componente "ACBrTEFD1" ?

Obrigado.

[edsonsimoespereira]

Boa tarde.

Resolvi a questão do print da imagem com o comando abaixo.

ACBrPosPrinter1.Imprimir('VINCULADO:' + ImagemComprovante.Text);

 

[edsonsimoespereira]

Boa tarde.

No primeiro teste do roteiro de homologação, é solicitado para:

 Realizar uma venda de um item qualquer

- Verificar o menu de transações retornado

- Printar a tela com o menu para enviar como evidência da pré-homologação.

- Em seguida cancelar o cupom e Printar a tela com o menu de transações gerenciais.

Como posso realizar esse cancelamento usando ACBRTEFD?

 

Obrigado.

[Daniel Simoes]

Por favor crie um novo tópico para um novo questionamento...