Gaveta Dinheiro Gerbo

[Eraldo]

Olá companheiros de labuta,

 

Um cliente comprou a gabeta Gerbo serial. Essa gaveta funciona sozinha e para isso utilizei apenas o componente ACBrGAV,

 

O fato interessante que gostaria de compartilhar é que ela somente funcionou quando ou alterei a unit ACBrGAVSerialGerbo, invertendo a sequencia de comandos confome abaixo:

 

 

procedure TACBrGAVSerialGerbo.Ativar;

begin

  if not fpDevice.IsSerialPort  then

     raise Exception.Create(ACBrStr('Esse modelo de Gaveta requer'+#10+

                            'Porta Serial: (COM1, COM2, COM3, ...)'));

 

  inherited Ativar ; { Abre porta serial }

 

  try

     fpDevice.Serial.DTR := true ;

     fpDevice.Serial.RTS := True ;   // < Inverti aqui, era False

     CalculaProximaAbertura ;

  except

     Desativar ;

     raise

  end ;

end;

 

procedure TACBrGAVSerialGerbo.AbreGaveta;

begin

  Inherited AbreGaveta ;

 

  fpDevice.Serial.RTS := False ;  // Inverti aqui, era True

  Sleep(250) ;

  fpDevice.Serial.DTR := true ;

  fpDevice.Serial.RTS := True ;  // Inverti aqui, era False

  

  CalculaProximaAbertura ;

end;

 

 

Gostaria de saber alguém já enfrentou essa situação e qual a solução.

 

Obrigado pelo espaço.

 

 

 

 

 

[sidnei_alves1]

voce nao usa o ACBrECF, se usa muda a propriedade Sinal Invertida do componente ACBrECF, pode ser que de certo.

[Daniel Simoes]

Por favor envie o manual desta Gaveta...

 

A modificação pode "quebrar" código de aplicações que já usam esse modelo... Os fontes atuais estão seguindo a especificação do manual.. veja:

Para a Inicialização

Para que a gaveta serial possaser operada, esta deve ser, inicialmente, inicializada.

Para inicializar a gaveta, deve-se colocar o sinal DTR em nível alto (estado lógico
1 / ON = +12V) e o sinal RTS em nível baixo (estado lógico 0 / OFF = -12V).

 

 

Para a abertura

 

O sinal RTS será utilizado para a abertura da gaveta serial.

 

Um nível alto (ON = +12V) no sinal RTS, indica ao circuito driver eletrônico que seja
efetuada uma abertura da gaveta, sendo necessários, pelo menos, 200
milissegundos de atraso para que este último, o circuito driver, identifique o
sinal.

 

Após a abertura da gaveta, o sinal RTS deve ser retornado ao nível baixo, para que o
circuito driver da gaveta inicie uma nova carga do acumulador eletrônico (carga
necessária a abertura da gaveta).

 

Manual em: http://www.gerbo.com.br/interna_produtos_detalhes.asp?id=1
 

[Eraldo]

Daniel Simoes,

 

Desculpe-me a demora. O manual é o mesmo que você indicou. Mas no meu caso só funcionou invertendo a sequencia de comandos.

 

 

Reforço que estou usando apenas o compomente ACBrGAV e este está acessando, naturalmente a unit correspondente ao modelo que é a unit ACBrGAVSerialGerbo.

 

 

A gaveta nova é serial, esta ligada diretamente na serial do windowsXP (COM1).

 

 

Bem Daniel...o meu cliente está feliz da vida... mas tive que inverter a sequencia de comandos...

 

 

O que você acha disso?

[Daniel Simoes]

Provavelmente o cabo está confeccionado de forma incorreta...

 

Mas não posso subir essas modificações para o SVN até termos um manual que diga que os fontes estão incorretos

[Eraldo]

Ok,

 

Eu, de qualquer forma, trouxe para dentro de pasta principal da minha aplicação a unit ACBrGAVSerialGerbo e continuo usando o restante do acbr normalmente.

 

Obridado pela atenção.