Ir para conteúdo
  • Cadastre-se

dev botao

ACBrBal, urano


reginaldocosta
  • Este tópico foi criado há 4246 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia, Regys.

ja uso em meu sistema o componente de atualização das balanças, para toledo e filizola.

total sucesso, exelente, parabens.

vi que a rotina urano ainda nao está implementada. continua assim ????

pois gostaria de colaborar e faze-la, pois por morar no RS, tenho contato direto com eles (urano).

tenho toda a documentação da balança.

como está esta parte????. :D;)

atenciosamente.

Reginaldo.

Link para o comentário
Compartilhar em outros sites

Boa tarde, Regys.

estou postando o fonte do ACBrBal da Urano implementado.

espero a cooperação do pessoal para testar e consertar alguma gafe minha.

esta imprementação é somente para as novas balanças urano, não serve para as antigas

que segundo eles, estão a anos fora de linha.

este arquivo txt implementado é para uso em conjunto com o software da balança.

conforme as outras implmentações.

atenciosamente.

Reginaldo.

ACBrCargaBal.pas

Link para o comentário
Compartilhar em outros sites

ops, uma pequena correção de ultima hora

ao revisar e testar, alterar o numero total do rfill do nutricional:

if Produtos.Nutricional <> '' then

begin

//linha da informação nutricional

//0x11+0x02+codigo[5]+pesagem[35]+informacoes nutricionais[209]+chksum[4]+0x03+0x13+0x10

//informacoes nutricionais[258]=1 linha de 41 caracteres para porção

// e 8 linhas de 21 caracteres para [calorias,carboidratos,proteínas,gorduras totais,

// gorduras saturadas,gordura trans,fibra alimentar,

// sódio].

Arquivo.Add(#11#02 +

LFIll(Produtos.Codigo, 5) +

GetTipoProdutoUrano(Produtos.Tipo) +

RFIll(Produtos.Descricao, 20) +

FormatCurr('000000.00', Produtos.ValorVenda) +

LFIll(Produtos.Validade, 4) +

'D' +

>>>>>>>>>>>>>>>>>>>>>>>>> RFIll(Produtos.Nutricional, 209) //, 258) <<<<<<<<<<<<<<<<

valor correto é 209.

);

xtam := CalcularSoma(Arquivo[Arquivo.Count-1]);

Arquivo[Arquivo.Count-1] := Arquivo[Arquivo.Count-1] + IntToHex(xtam, 4) + #03;

end;

ate []´

Reginaldo.

Link para o comentário
Compartilhar em outros sites

  • 1 ano depois...

Ola, antes achei que tivesse postado no topico errado, mas é esse mesmo, que fala do ACBrBal com modelo Urano...

 

fazendo alguns testes com o Emulador de Balança e o ACBrBal não funciona a comunicação com a Urano.

Até mesmo o exemplo disponivel no ACBrFrameWork não funciona a comunicação do modelo Urano com o Emulador.

 

Alguem sabe se alem da velocidade, há alguma outra configuração pra comunicar com o modelo Urano?

 

ps: estou usando o Com0com para emular duas portas seriais (COM3 e COM4)

 

Obrigado.

Editado por leosaomz
Link para o comentário
Compartilhar em outros sites

  • Consultores

Você está usando qual emulador de balança? Você tentou com o DEMO do ACBrFrameWork ou tentou com o DEMO em Delphi/Lazarus?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

Você está usando qual emulador de balança? Você tentou com o DEMO do ACBrFrameWork ou tentou com o DEMO em Delphi/Lazarus?

 

estou usando o emulador em Delphi, disponivel na pasta: "ACBr\trunk\Projetos\EmuladorBalanca\Delphi". Executo o emulador na porta COM3 e habilito o "Monitorar Porta...".

e com o demo do ACBrFrameWork, escolho modelo Urano, porta COM4 na velocidade 9600, habilito o "Monitorar balança" e ativo.

Com o Demo ativado, pelo emulador clico em enviar peso, no Demo retorna (-9,000) e se clico no Ler Peso também retorna (-9,000).

Link para o comentário
Compartilhar em outros sites

  • Consultores

Você acha que o problema é com o ACBrFrameWork? Se for, queira por favor postar um novo tópico no fórum específico ACBrFrameWork.

 

Se você acredita que o problema não é no ACBrFrameWork, você consegue testar com o Demo do ACBrBal feito em Lazarus ou Delphi?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

Então, não entendo nada de Delphi, mas consegui aos trancos e barrancos fazer o teste que você recomendou, com o Demo do ACBrBal em Delphi, e a comunicação com a Urano gera um exception, da qual não entendo, porque não sei nada de Delphi :(, e no peso retorna (-9).

 

No mesmo Demo testei com Filizola e Toledo e funcionou normal, acredito então que deva ser tanto no Delphi e no FrameWork esse problema na comunicação dom a Urano.

 

Usei e uso o emulador de balança em Delphi para os testes.

Link para o comentário
Compartilhar em outros sites

  • Consultores

Você pode postar aí qual a mensagem de erro?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

Boa tarde, desculpa a demora pra postar o erro, estava/estou ocupado com testes na balança Toledo, mas tirei um tempo hoje e montei uma sequencia de imagens especificando o erro, como disse antes, nao sei nada nada nada de Delphi, por isso fiz com imagem, deve fica melhor do que eu tentar explicar o erro...

 

As imagens estão em ordem de execução, primeiro tem as imagens quando clico no check "Monitorar a Balança" e dispara os seguintes erros:

 

1_checkMonitorar

2_checkMonitorar

3_checkMonitorar

4_checkMonitorar

 

depois volta pra aplicação e clico em Ativar, e segue:

5_clickAtivar.png

6_clickAtivar.png

7_clickAtivar.png

 

depois abre tela, e clico no sair ou tento fechar a aplicação e da o erro:

8_ClickSair.png

9_ClickSair.png

 

 

Espero que ajude, obrigado.

 

Imgs_erros.rar

Link para o comentário
Compartilhar em outros sites

  • Fundadores

As imagens mostram vários erros de Access Violation... isso não é nada normal...

 

Talvez a maneira como os componentes foram instalados ou compilados seja a fonte do problema...

 

Se desejar, compilo o Demo "BalancaTeste" e subo para a área de Downloads

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

As imagens mostram vários erros de Access Violation... isso não é nada normal...

 

Talvez a maneira como os componentes foram instalados ou compilados seja a fonte do problema...

 

Se desejar, compilo o Demo "BalancaTeste" e subo para a área de Downloads

 

Opa cara, então, se puder compilar e subir o .exe para que eu possa testar com o Emulador no modelo Urano, seria perfeito.

 

essa area de Downloads seria direto na pasta do "ACBr/Trunk/Exemplos/ACBrBal/Delphi" ?

 

ps: uso windows 7, 32bits...

 

vlw, obrigado.

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Bobeira minha... modifiquei os fontes para gerar a lista de modelos dinamicamente...  Já subi uma nova versão... por favor baixe novamente

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

Perfeito, mas depois que rodei e abri o emulador, repadei somente agora um detalhe no EMULADOR: é apenas para Toledo / Filizola

 

puts...mancada minha, pois tentava conectar pelo Demo na modelo Urano, mas o Emulador apenas comunica com modelos Toledo e Filizola.

 

tentei mesmo assim, e retorna (-9), tem algum emulador de Urano?

 

vlw pelo .exe, com ele da pra testa comunição nas balanças antes de instalar minha aplicação, e nele tem todos detalhes de configuração, que no Framework não tem...

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Este emulador é algo simples... ele simplesmente envia a mesma resposta que observamos que a Balança enviaria... porém ele não foi ajustado para o protocolo da Urano

  • Curtir 1
Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 4246 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...