ACBrBal, urano

[reginaldocosta]

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????.

atenciosamente.

Reginaldo.

[Régys Silveira]

Não foi feito a urano por falta de documentação, se quiser implementar e postar aqui no fórum eu analiso, seria de grande valia esse implementação.

[reginaldocosta]

ok, vou fazer e postar aqui o fonte para análise.

obrigado.

Reginaldo.

[reginaldocosta]

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

[Régys Silveira]

Muito obrigado, vou analisar e subir para o SVN, tem o link para baixar o software para que eu possa efetuar testes?

[reginaldocosta]

claro,

http://www.urano.com.br

http://www.urano.com.br/integra

vou postar tbm a documentação.

atenciosamente,

Reginaldo.

ArquivoTxtBalancaUrano.pdf

[Régys Silveira]

Fiz algumas conferência e já subi para o SVN, peço que efetue alguns testes, eu não tenho a balança Urano aqui para verificar o funcionamento.

[reginaldocosta]

ok, vou atualizar e testar.

obrigado.

Reginaldo.

[reginaldocosta]

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.

[Régys Silveira]

Feito e enviado.

[reginaldocosta]

obrigado, Regys.

ate, []´

Reginaldo.

[leosaomz]

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 4 Março, 2013 por leosaomz

[EMBarbosa]

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

[leosaomz]

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).

[EMBarbosa]

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?

[leosaomz]

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.

[EMBarbosa]

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

[leosaomz]

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

[Daniel Simoes]

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

[leosaomz]

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.

[Daniel Simoes]

Feito:

[leosaomz]

Opa cara, muito obrigado por gerar o .exe

 

mas uma coisa, nos modelos não esta aparecendo Urano, no caso com Urano nao funciona ou usa protocolo de alguma outra?

 

vlw, abraço.

[Daniel Simoes]

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

[leosaomz]

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...

[Daniel Simoes]

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