Epson FBIII 6000 - corrige impressão do cheque e CancelaItemNaoFiscal

[amarildolacerda]

(Trunk2)

- Implementado o método:   CancelaItemNaoFiscal  que não estava implementado;

- Corrige impressão de cheque. A Epson requer o envio do layout de cheque antes de utilizar de iniciar a impressão do cheque.

 

 

ACBrECFEpson.pas

[Daniel Simoes]

Humm.. parece que o Delphi 7 não suporta essa estrutura abaixo...  ( Na Lazarus, tudo ok)

  TPosicaoCheque = record
    Posicao: TPosicaoChequeUnit;
  public
    function getEE18: Ansistring;
    function getEE1A: Ansistring;
  end;  

.....
C:\Pascal\Comp\ACBr\trunk2\Fontes\ACBrSerial\ACBrECFEpson.pas(78) Error: ',' or ':' expected but 'FUNCTION' found

Poderíamos inserir IFDEFs, mas nesse caso, a impressão de cheques não funcionaria no D7

 

Modifiquei o TPosicaoCheque para um "Class"...

Se possível, por favor teste com a Unit em anexo (fiz pequenas modificações da sua original)

 

ACBrECFEpson.pas

[amarildolacerda]

Fiz a leitura das alterações... não vi problema.. Não tenho como testar hoje - so vou poder faze-lo na semana que vem.  Da minha parte pode subir;

[Daniel Simoes]

Muito obrigado pela implementação Amarildo... (essa deve ter dado trabalho)...

Já está no SVN...