Sitef Pre Homologacao Seq. 68

[Hetosoft Sistemas]

Estou usando o demo ACBrTEFD.

 

no teste 68,

 

 

- Realizar uma transação de
Crédito magnético com uma parte do valor da venda
 

- Selecionar a opção á vista

 

- Chamar o 2º cartão com o valor
restante da venda, ao aparecer a mensagem de “Insira ou passe o cartão”,
desligar o computador (reset) e em seguida desligar a impressora

 

- Ligar novamente o computador e não ligar a impressora

 

- Cancelar a transação TEF mesmo com a impressora desligada e caso
não tenha lançado a forma de pagamento é permitido aproveitar o cupom fiscal,
caso contrário, cancelar o cupom fiscal.

 

 

Resultado Esperado

 

“Última transação TEF não foi efetuada. Favor reter o
Cupom.”

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

 

 

Mais quanto eu abro o TEFDDemo e ativo o gpCliSitTef

ele mostra esta messagem e confirma o TEF

o que devo Fazer ?

 

 

Transação TEF efetuada.

Favor reimprimir ultimo Cupom.

NSU: 000200005

 

(Para Cielo utilizar os 6 últimos digitos)

 

 

O que devo fazr ?

 

 

--------------------- 2 etapa -----------------------------

 

fis o mesmo teste com a impressora LIGADA e deu certo !

Messagem:

Transacao nao efetuada.

Favor reter o Cupom.

 

 

 

 

 

Editado 20 Março, 2013 por hetoandrade

[Daniel Simoes]

Você precisa sinalizar corretamente retornando "O" para o ACBrTEFD no evento OnInfoECF...

 

Veja o que está escrito no conteúdo da aplicação Demo nesse evento:

 

 

procedure TForm1.ACBrTEFD1InfoECF(Operacao : TACBrTEFDInfoECF;
   var RetornoECF : String );
var
   ASubTotal: Double;
begin
   try
      if not ACBrECF1.Ativo then
         ACBrECF1.Ativar ;
   except
      { Para CliSiTEF ou V&SPague aplique o IF abaixo em sua aplicação, que
        permite saber se o Cupom foi concluido mesmo com o ECF desligado }

      if (not ACBrTEFD1.TEF.Inicializado) and   { Está na inicialização ? }
         (Operacao = ineEstadoECF) and          { Quer Saber o estado do ECF ? (mas se chegou aqui é pq o ECF já está com problemas) }
         (ACBrTEFD1.GPAtual in [gpCliSiTef,gpVeSPague]) then
      begin
         { Leia o último Documento Gravado no seu Banco de Dados, e verifique
           se o Cupom já foi finalizado,ou se já foi aberto um CCD ou Gerencial...
           Exemplo:

           Documento.Le(0);

           if (Documento.Finalizado) or (pos(Documento.Denominacao,'CC|RG') > 0) then
              RetornoECF := 'R'
           else
              RetornoECF := 'O' ;
         }

         //RetornoECF := 'O';    // Executará CancelarTransacoesPendentes;
         RetornoECF := 'R';    // Executará ConfirmarESolicitarImpressaoTransacoesPendentes;
         exit ;
      end ;

      raise ;
   end;
 

 

 

[Hetosoft Sistemas]

Cara vc é direto, mais se foce para escolher o melhor suporte acbrsaq seria vc.