gss200610 Posted December 2, 2011 Report Share Posted December 2, 2011 alguem aqui ja conseguiu capturar o peso da balanca filizola da serie MF com o five, ja testei todas as rotinas postadas aqui no forum, tanto com hbcomm, five nativa e nada. so retorna o peso zerado, e preciso disso pra hoje, o cliente tem 2 balancas dessas e nao captura o peso de forma alguma. se alguem tiver alguma dica que seja pra outros modelos filizola agradeço. Gilmar Silva Santos Programador - Goiânia Go Não Recuarei, Nada Temerei, Comigo Está o Senhor. Email : gilmarss2010@gmail.com FWH 10.8, DBF, MED EDITOR, UESTUDIO, XHB 1.2, BCC 5.82 Quote Link to comment Share on other sites More sharing options...
gss200610 Posted December 2, 2011 Author Report Share Posted December 2, 2011 alguem aqui ja conseguiu capturar o peso da balanca filizola da serie MF com o five, ja testei todas as rotinas postadas aqui no forum, tanto com hbcomm, five nativa e nada. so retorna o peso zerado, e preciso disso pra hoje, o cliente tem 2 balancas dessas e nao captura o peso de forma alguma. se alguem tiver alguma dica que seja pra outros modelos filizola agradeço. Gilmar Silva Santos Programador - Goiânia Go Não Recuarei, Nada Temerei, Comigo Está o Senhor. Email : gilmarss2010@gmail.com FWH 10.8, DBF, MED EDITOR, UESTUDIO, XHB 1.2, BCC 5.82 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 2, 2011 Report Share Posted December 2, 2011 poste como voce está fazendo João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 - TIM FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
gss200610 Posted December 2, 2011 Author Report Share Posted December 2, 2011 Function PegaPesoBal() LOCAL nHandle, Bytes, DADOS, Buffer, Q, vlu, pu, osd1 nHandle:=Init_Port(cPorta,2400,8,0,1,4000) ? "HANDLE ", nHandle IF nHandle <= 0 MsgStop("Erro ao abrir a porta: " + cPorta + CRLF+"Verifique se a mesma não está sendo usada por outro programa.",cVersao) RETURN(.F.) ENDIF ? "OUT ", OutBufClr(NHANDLE) // Limpa o Buffer de Saida ? "CHR ", OUTCHR(NHANDLE,CHR(5)) SysWait(.3) SysRefresh() Bytes := InbufSize(NHANDLE) IF Bytes==0 Bytes := 20 ENDIF ? "bytes lidos filizola ", Bytes DADOS=SPACE(20) Buffer := InChr( NHANDLE, Bytes, @DADOS) //LER BUFFER DE ENTRADA DA BALANCA ? "BUFFER ", Buffer UnInt_Port(nHandle) dados=alltrim(dados) Q=val(substr(dados,2,5))/1000 IF Q=0 PU=1 VLU:=TRANSFORM(PU,"@E 9999.99") //OSD1:REFRESH() ENDIF RETURN Q Gilmar Silva Santos Programador - Goiânia Go Não Recuarei, Nada Temerei, Comigo Está o Senhor. Email : gilmarss2010@gmail.com FWH 10.8, DBF, MED EDITOR, UESTUDIO, XHB 1.2, BCC 5.82 Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 2, 2011 Report Share Posted December 2, 2011 Esta balança não tem uma DLL com as declarações tipo a BALANÇA TOLEDO?? João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 - TIM FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
oziel Posted December 2, 2011 Report Share Posted December 2, 2011 Ao que me parece existe uma dll(PCSCALE.DLL) Aqui para o sistema capturar utilizava um prog chamado PRLERBAL da filizola que fazemos teste para verificação se o sist esta capturando o peso ok. A modelo que utilizamos na empresa é MF. OZIEL LOPES FW 22c - Clipper 5.3b - Workshop 4.0 FWH 6.12 Free - xHarbour 0.99.71 Simplex - BCC55 - Pelles C - xDev. Quote Link to comment Share on other sites More sharing options...
tiaoFW Posted December 2, 2011 Report Share Posted December 2, 2011 Boa tarde! Pela minha experiência com essa balanças o problema esta relacionado a algum parametro exigido pela balança, seria necessário olhar o manual da balança para verificar quais são esses parametros. t+ FWXH 11.09, PELLESC, MYMAKE 1.9J, DBF Belzonte - Minas Gerais A mente do fundamentalista é como a pupila do olho: quanto mais luz você joga, mais ela se fecha. — Stephen Hawking msn: tiaopessoa@hotmail.com Quote Link to comment Share on other sites More sharing options...
gss200610 Posted December 2, 2011 Author Report Share Posted December 2, 2011 com os exemplos fiscais em delphi deles vai que é uma blz, agora em five, quando nao para o exe de funcionar, simplesmente nao ler. e olha q ja testei hbcomm, pscale.dll, lepeso, e nada. Gilmar Silva Santos Programador - Goiânia Go Não Recuarei, Nada Temerei, Comigo Está o Senhor. Email : gilmarss2010@gmail.com FWH 10.8, DBF, MED EDITOR, UESTUDIO, XHB 1.2, BCC 5.82 Quote Link to comment Share on other sites More sharing options...
CleitonSH Posted December 2, 2011 Report Share Posted December 2, 2011 Se não me engano tem o arquivo FILIZOLA.EXE que gera o txt com o peso. Esse aplicativo você baixa no site deles, ou procure no google. Eu não estou no meu escritório só devo estar lá na segunda-feira. Se quiser lhe passo o que tiver sobre balança filizola. Cleiton FWH906+xHarbour, MySql, WorkShop, PellesC, FW20d+Clipper5.2+Clip53b Quote Link to comment Share on other sites More sharing options...
gss200610 Posted December 3, 2011 Author Report Share Posted December 3, 2011 na urano vem a dll lepeso, que quando chamado qualquer funcao dela, o exe para de funcionar, na filizola tem a pcscale que nao retorna o peso. e mais estranho que as duas no exemplo em delphi funcionam de primeira. Gilmar Silva Santos Programador - Goiânia Go Não Recuarei, Nada Temerei, Comigo Está o Senhor. Email : gilmarss2010@gmail.com FWH 10.8, DBF, MED EDITOR, UESTUDIO, XHB 1.2, BCC 5.82 Quote Link to comment Share on other sites More sharing options...
tiaoFW Posted December 3, 2011 Report Share Posted December 3, 2011 Bom dia! Teste com essa hbcomm que o Vailton adaptou para a versão mais recente do fivewin/xharbour. Aqui comigo funciona perfeitamente para balanças FILIZOLA, TOLEDO, URANO e compativeis. Espero que ajude. t+ Segue o link: http://www.salc.com.br/atual/hbcomm.lib FWXH 11.09, PELLESC, MYMAKE 1.9J, DBF Belzonte - Minas Gerais A mente do fundamentalista é como a pupila do olho: quanto mais luz você joga, mais ela se fecha. — Stephen Hawking msn: tiaopessoa@hotmail.com Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.