Ecf - Como Sair Do Estado "relatório"

[Rodolfo Nemer Nogueira]

Olá amigos,

estou fazendo uma rotina de pré-homologação, e estou com um problema nos passos:

 

 

Durante a impressão TEF, simular falta de papel na impressora.

Deseja imprimir novamente? - NÃO

 

Todas as transações são canceladas OK. Mas a ECF continua em modo "Relatório". O que seria preciso fazer para que ela saia deste estado e retorne ao estado LIVRE? 

 

Obrigado!!

 

[Juliomar Marchetti]

Chegou a programar o evento ComandaECF do ACBrTEFD?

procedure TForm1.ACBrTEFD1ComandaECF(Operacao : TACBrTEFDOperacaoECF;
   Resp : TACBrTEFDResp; var RetornoECF : Integer );
Var
   Est : TACBrECFEstado ;
   P   : Integer;
   Linha, CodFPG : String ;
   ValorFPG : Double ;
begin
  Memo1.Lines.Add('ComandaECF: '+GetEnumName( TypeInfo(TACBrTEFDOperacaoECF),
                                              integer(Operacao) ));

  try
    Est := ACBrECF1.Estado;

    case Operacao of
      opeAbreGerencial :
         ACBrECF1.AbreRelatorioGerencial ;

      opeCancelaCupom :
         if Est = estNaoFiscal then
            ACBrECF1.CancelaNaoFiscal
         else
            ACBrECF1.CancelaCupom;

      opeFechaCupom :
         if Est = estNaoFiscal then
            ACBrECF1.FechaNaoFiscal('Projeto ACBr|http://acbr.sf.net')
         else
            ACBrECF1.FechaCupom('Projeto ACBr|http://acbr.sf.net');

      opeSubTotalizaCupom :
         if Est = estNaoFiscal then
            ACBrECF1.SubtotalizaNaoFiscal( 0, 'Projeto ACBr|http://acbr.sf.net' )
         else
            ACBrECF1.SubtotalizaCupom( 0, 'Projeto ACBr|http://acbr.sf.net' );

      opeFechaGerencial, opeFechaVinculado :
        ACBrECF1.FechaRelatorio ;

      opePulaLinhas :
        begin
          ACBrECF1.PulaLinhas( ACBrECF1.LinhasEntreCupons );
          ACBrECF1.CortaPapel( True );
          Sleep(200);
        end;...

[Rodolfo Nemer Nogueira]

Sim, exatamente como você postou. Será que pode ser um problema do simulador da bematech?

[Rodolfo Nemer Nogueira]

Ou tem alguma relação com o fato de ela estar "Sem papel", daí não é possível gerar o cancelamento impresso e ela permanece em estado de relatório.

 

Mas como será que poderia ser resolvido isso após a troca do papel?

Editado 18 Janeiro, 2013 por Rodolfo Nemer Nogueira

[Juliomar Marchetti]

há tá é o simulador, acredito que você deva testar com uma ecf física pois senão me engando tem alguns testes que você não consegue rodar no emulador

mas mesmo assim ele teria que quando ligar a ECF e efetuar um comando por exemplo um cupom novo ele cancelar e sair do modo relatorio gerencial

[Rodolfo Nemer Nogueira]

Perfeito, muito obrigado pela ajuda Juliomar! Esse fim de semana vou testar isso em uma ecf física, e qualquer novidade posto aqui. Abraços e boa tarde!

[EMBarbosa]

Se é o relatório está aberto, é só fechar. Veja a Procedure ACBrECF.CorrigeEstadoErro.

[Rodolfo Nemer Nogueira]

Ok EMBarbosa, problema resolvido! Mesmo usando o simulador.

 

O ACBrECF.FechaRelatorio fecha o relatório OK. Mas o ACBrECF.CorrigeEstadoErro também faz isso de uma forma mais completa, pois prevê outros estados também. 

 

Muito obrigado!