Ajuste de Datahora na Redução Z na classe TACBrECFDaruma

[_asseinfo]

Olá pessoal, bom dia!

Ao invocar o método ReducaoZ temos a opção de enviar a data/hora para ajuste do ECF, certo? Particularmente não gosto de enviar o ajuste de hora, mas percebi que mesmo não enviando, nas impressoras Daruma o ajuste estava sendo feito. Fui então até a classe TACBrECFDaruma e vi que quando não é informado a data/hora, o algoritmo pega a data/hora do computador (é utilizada a função now). Vejam o trecho abaixo:

 

...

Procedure TACBrECFDaruma.ReducaoZ(DataHora: TDateTime) ;

begin

  if DataHora = 0 then  { Aparentemente a DataHora é obrigatória na Daruma }

     DataHora := now;

...

Gostaria de propor uma alteração. O que vocês acham de nessa situação, pegar a propria data/hora do ECF? Dessa maneira não teríamos ajuste de data/hora, conforme a vontade de quem invocou o método. Segue minha sugestão:

 

...

Procedure TACBrECFDaruma.ReducaoZ(DataHora: TDateTime) ;

begin

  if DataHora = 0 then  { Aparentemente a DataHora é obrigatória na Daruma }

     DataHora := GetDataHora;

...

Um abraço.

[Daniel Simoes]

Sua sugestão está correta... este método está se comportando de forma diferente das demais classes..

Corrigi para:

  if DataHora = 0 then  { Aparentemente a DataHora é obrigatória na Daruma }

     DataHora := TACBrECF(fpOwner).DataHora ;[/code]


pois assim a solicitação de DataHora fica registrada no LOG