acbrbal Validar se balança esta livre para uma nova pesagem com a opção 'Monitorar Balanca' Ativa.

[Smaili Amorim]

Em um cenário que eu tenho uma balança com a opção de 'monitorar balança' ativado.

Quando a balança estabilizar o peso eu quero imprimir uma etiqueta, e somente quando a balança voltar para o peso zero(sem objeto na balança) eu habilito o usuario a colocar um novo objeto na balança para tirar uma nova etiqueta.  

Vamos pegar o exemplo o arquivo da ACBrBALDigitron.pas que na linha 80 e 115 da  function InterpretarRepostaPeso tem um 'Result := 0;' a minha sugestão é que retorne  'Result := -9; { Peso não foi recebido }'. 

Motivo: Se no momento da leitura do peso, o componete receber uma resposta pela metade ou por algum motivo o componete nao conseguir interpretar a resposta o componente retorna a resposta 'Result := 0;'  

ACBrBALDigitron.pas

[EMBarbosa]

8 horas atrás, Smaili Amorim disse:

Em um cenário que eu tenho uma balança com a opção de 'monitorar balança' ativado.

Quando a balança estabilizar o peso eu quero imprimir uma etiqueta, e somente quando a balança voltar para o peso zero(sem objeto na balança) eu habilito o usuario a colocar um novo objeto na balança para tirar uma nova etiqueta.  

Vamos pegar o exemplo o arquivo da ACBrBALDigitron.pas que na linha 80 e 115 da  function InterpretarRepostaPeso tem um 'Result := 0;' a minha sugestão é que retorne  'Result := -9; { Peso não foi recebido }'. 

Motivo: Se no momento da leitura do peso, o componete receber uma resposta pela metade ou por algum motivo o componete nao conseguir interpretar a resposta o componente retorna a resposta 'Result := 0;'   

ACBrBALDigitron.pas 4 kB · 0 downloads

Estou verificando.

[EMBarbosa]

16 horas atrás, Smaili Amorim disse:

Em um cenário que eu tenho uma balança com a opção de 'monitorar balança' ativado.

Quando a balança estabilizar o peso eu quero imprimir uma etiqueta, e somente quando a balança voltar para o peso zero(sem objeto na balança) eu habilito o usuario a colocar um novo objeto na balança para tirar uma nova etiqueta.  

Vamos pegar o exemplo o arquivo da ACBrBALDigitron.pas que na linha 80 e 115 da  function InterpretarRepostaPeso tem um 'Result := 0;' a minha sugestão é que retorne  'Result := -9; { Peso não foi recebido }'. 

Motivo: Se no momento da leitura do peso, o componete receber uma resposta pela metade ou por algum motivo o componete nao conseguir interpretar a resposta o componente retorna a resposta 'Result := 0;'  

ACBrBALDigitron.pas 4 kB · 1 download

Muito obrigado pela contribuição. Me parece que você tem razão.
Então, subi as alterações para o SVN na Revisão  17381.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Mais uma vez obrigado.

[Smaili Amorim]

@EMBarbosa Eu mandei o exemplo da Digitron

Mas praticamente todas as balanças estão com este problema do retorno zero.

No meu repositório eu também alterei a Toledo 2090 e a 9091. 

 

[EMBarbosa]

3 horas atrás, Smaili Amorim disse:

@EMBarbosa Eu mandei o exemplo da Digitron

Mas praticamente todas as balanças estão com este problema do retorno zero. 

No meu repositório eu também alterei a Toledo 2090 e a 9091. 

 

Se puder anexar todos os arquivos alterados, podemos analisar as sugestões.

[Smaili Amorim]

Arquivos...

ACBrBALToledo2090.pas ACBrBALToledo9091_8530_8540.pas

[Daniel Simoes]

Em 30/07/2019 at 12:27, Smaili Amorim disse:

@EMBarbosa Eu mandei o exemplo da Digitron

Mas praticamente todas as balanças estão com este problema do retorno zero.

No meu repositório eu também alterei a Toledo 2090 e a 9091. 

 

Creio que você esteja correto, e essas Units precisem de correção e revisão nas demais... Pode me ajudar com isso, @EMBarbosa?

As Units do ACBrBAL são bastante antigas... e teve muito Copy & Paste...

[EMBarbosa]

Em 30/07/2019 at 16:44, Smaili Amorim disse:

Arquivos...

ACBrBALToledo2090.pas 5 kB · 0 downloads ACBrBALToledo9091_8530_8540.pas 5 kB · 0 downloads

Muito obrigado pela contribuição.
Fiz a implementação baseada nela.
Subi as alterações para o SVN na Revisão  17431.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Mais uma vez obrigado.