Porta serial no Harbour

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Porta serial no Harbour

Mensagem por Jairo Maia »

Olá Hasse,

Há um erro nesta linha:
lWork := HB_COMINIT( n_Port, n_Baud, n_Prty, n_Size, n_StpBt )

Você está enviando o valor de n_Size (1024) ao invés de enviar n_DtBit (que pode ser 7 ou 8).

Altere assim e acho que vai iniciar a porta:
lWork := HB_COMINIT( n_Port, n_Baud, n_Prty, n_DtBit, n_StpBt )

Nota:
Hasse escreveu:Acabei de testar com o Parity := "N" e também com "0" (caracter zero )
Se for o caso de alterar a apridade de "N" para "O", veja que é "O" de Ovo, não o caracter zero.
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Porta serial no Harbour

Mensagem por Hasse »

Olá Jairo.

Com esta modificação a conexão funcionou OK.

Neste meio tempo, recebi um email do Doug Woodrow, sugerindo também , como o você o fez anteriormente, o uso da HBCT.LIB da CA_Tools, por ser de mais fácil uso, mas principalmente por ser de uso mais generalizado.

Desta forma, decidi abandonar a HBCTRL.LIB e passar para esta HBCT.LIB.

Entretanto, continua a minha necessidade preferencial de Documentação, ou então, um exemplo onde constem todas as funções com os seus respectivos parâmetros, pois como já expliquei anteriormente, o Aparelho remoto é muito exigente no seu diálogo bi-direcional.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Porta serial no Harbour

Mensagem por Hasse »

Boa noite a todos, especialmente ao Jairo.

O colega Doug me passou o link onde tem a Documentação completa das Funções do HBCT.LIB, que também estou repassando e disponibilizando abaixo:

http://www.ousob.com/ng/tools1-3/
http://www.ousob.com/ng/tools1-3/ng26a91.php

Obrigado Jairo, pela tua atenção e gentileza.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Porta serial no Harbour

Mensagem por Jairo Maia »

Olá Hasse,

Legal que está começando a funcionar. Apenas o seguinte: Acho que passou batido a minha mensagem de 08 Mai 2013 13:02 neste tópico. Veja que nela eu já havia colocado o link da documentação da HBCT: Introduction Serial Communications.

Grande abraço. Sucesso...
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Porta serial no Harbour

Mensagem por Hasse »

É verdade Jairo.

Perdão pela minha desatenção. Possivelmente coisas do DNA (Data de Nascimento muito....).
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
lggavinho
Usuário Nível 1
Usuário Nível 1
Mensagens: 9
Registrado em: 22 Jul 2013 10:45
Localização: São Paulo

Porta serial no Harbour

Mensagem por lggavinho »

Olá Jairo,

Você poderia dar uma dica sobre isto para mim. Estou usando um conversor de USB para RS485. Você acha que posso usar estas idéias? Sabe qual a porta correspondente?

Grato,

Luciano
Avatar do usuário
Jairo Maia
Moderador
Moderador
Mensagens: 2785
Registrado em: 16 Ago 2010 13:46
Localização: Campinas-SP

Porta serial no Harbour

Mensagem por Jairo Maia »

Olá Luciano,
lggavinho escreveu:Você acha que posso usar estas idéias?
Não dá Luciano. Esta lib trabalha com porta RS, no caso de USB, não conheço os procedimentos.

O que sei, é que normalmente os fabricantes dos conversores USB para RS tem suporte técnico, veja se o fabricante tem site e visite. Talvez você possa até conseguir uma forma de criar uma porta COM virtual para a USB com o conversor, e se houver como talvez seja possível se conectar com a HBCT.LIB.

Qual equipamento está usando esse conversor?
Abraços, Jairo
Harbour / Clipper 5.2e - Blinker 7
(Não respondo dúvidas por MP ou E-mail. Por favor, não encaminhe via mensagem privada ou e-mail, dúvidas que podem ser compartilhadas com todos no fórum)
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Porta serial no Harbour

Mensagem por rochinha »

Amiguinho,

Baseado nas leituras, astros e posição das estrelas, o Driver Virtual Serial Ports da Bematech prevê que comandos enviados a uma porta COM sejam transferidos para uma porta USB, ou seja, ela faz uma ponte de uma porta COM com uma USB e desta forma todos os comandos enviados por uma aplicativo que só conheço seriais possa ser enganado e ter sua saída enviada a portas diferentes.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Porta serial no Harbour

Mensagem por Hasse »

Boa tarde Jairo.

Eu tenho um Cabo Conversor serial RS-232 x USB adquirido da NovaComm que funciona muito bem, que uso no meu NB que só tem porta USB.

Na época passei por um aperto danado até encontrar este fabricante, pois não havia cabo que funcionasse corretamente.

Este cabo vem acompanhado de 1 CD, que emula uma porta serial na porta USB. No meu NB ele se configura automaticamente na porta COM 5. Para cada porta USB do NB você terá uma porta COM diferente.

Pelo que me lembro também há conversor para serial RS-485.

Veja em:
http://www.novacomm.com.br
comercial@novacomm.com.br
Fone: (11) 5631-1313
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
lggavinho
Usuário Nível 1
Usuário Nível 1
Mensagens: 9
Registrado em: 22 Jul 2013 10:45
Localização: São Paulo

Porta serial no Harbour

Mensagem por lggavinho »

Caros Jairo, Rochinha e Hasse,

obrigado pela atenção.. vou testar pelo caminho de cada um e depois reporto. Pensei que mandando a printer para USB e depois "jogasse" os dados como se fosse para printer funcionaria!!!

Jairo, a máquina é um scanner industrial para receber o valor da área de um pedaço de tecido. Com este valor eu devo imprimir etiquetas com codigo de barras. Se puderem indicar o método mais simples de emitir os códigos de barras, seria bom. Posso usar qualquer tipo de código de barras porque é para uso interno.

grato e abraços,

Luciano
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Porta serial no Harbour

Mensagem por rochinha »

Amiguinho,

Nos primórdios da automatização têxtil eu havia conseguido um dos primeiros aplicativos para Windows com as caracteristicas de scanner longo e corte em mesa automatizado. Hoje com certeza estes programas estão melhores. Mas não conheço os processos.

Quanto a código de barras pense primeiro como você vai montar o código e depois decida qual usar pois dependendo do tipo elas adquirem larguras diferentes.

Exemplo, Você esta processando camisetas e em se tratando da àrea textil, leva-se em consideração não só o tamanho mas também cor, coleção, etc, então:

999999.XX.999.20XX

Onde:

999999 - código do produto: camiseta regata.
XX - numero na grade de cores, 01-branco, 02, preto, ...
99 - codigo de tamanho, já que não usamos mais P/M/G/blablabla
20XX - coleção

Pode parecer complicado, mas clientes meus queria saber onde estavam as camisetas regatas brancas da coleção de 2010 e muitas vezes estavam misturadas com 2011.

Analisando o codigo acima voce poderá usar somente numeros e neste caso levando-se em consideração que temos 15 digitos o padrão 3of9 ou 2of8 caem bem pois todas telão o mesmo tamanho. Se voce usar numeros e letras somente a 2of8 poderá ser usada.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
lggavinho
Usuário Nível 1
Usuário Nível 1
Mensagens: 9
Registrado em: 22 Jul 2013 10:45
Localização: São Paulo

Porta serial no Harbour

Mensagem por lggavinho »

Rochinha obrigado.

Bem, estou usando um estoque como suporte (um arquivo com a descrição). Só existe uma descrição do tipo de produto. O código será numérico e sequencial.. simples.. 1,2,3.... 99999. Qdo o usuário quiser, passa o leitor ligado ao sistema e, este, informa a descrição.

O que eu preciso é um código exemplo que como emitir a etiqueta com código de barras o mais simples possível.

grato,
lggavinho
Usuário Nível 1
Usuário Nível 1
Mensagens: 9
Registrado em: 22 Jul 2013 10:45
Localização: São Paulo

Porta serial no Harbour

Mensagem por lggavinho »

Caro Hasse,

Coloquei o conversor e ele o NB baixou automaticamente o driver da internet. Mas.. esta pergunta deve ser meio imbecil..... como vc sabe qual porta ele se auto-configurou?
Hasse
Usuário Nível 4
Usuário Nível 4
Mensagens: 820
Registrado em: 19 Out 2004 10:30
Localização: Jaraguá do Sul - SC

Porta serial no Harbour

Mensagem por Hasse »

Caro lggavinho.

Em Sistema \ Hardware \ Gerenciador de Dispositivos \ Portas(COM & LPT) você encontra estas informações.

No caso da impressão de etiquetas, tanto com Código de Barras quanto informações textuais eu uso os recursos internos das impressoras de Códigos de Barras, que possuem muitas fontes internas. Abaixo segue uma pequena cópia do texto que envio para estas impressoras (Zebra e Rabbit):

Código: Selecionar todos

C0020          && Margem esquerda.
R0005          && Margem superior.
Q0001          && Formata a quantidade de etiquetas.
f000           && Recuo inicial da fita de etiquetas.
D11            && Dot size.
PA             && Velocidade de impressão.    ( A até S )
SD             && Velocidade SEM impressão.
H13            && Nível de aquecimento do cabeçote. ( 01 até 20 )
1d9305000180010#CODBARR#    <= esta linha imprime o código de barras.  O número é inserido por substituição de #CODBARR#
1911#TAMFONT#00430000#NOMEPAC#    <= texto com fonte em tamanho diferente do padrão do setup geral.
191100400150080#DATNASC#
191100200150000Nascimento:
191100400050000
Este texto está gravado em arquivo TXT. Este arquivo eu leio, faço o tratamento, finalizo e envio para a impressora via porta paralela. Também poder usada a porta serial.

No arquivo do Anexo seguem alguns recursos que eu uso, com o significado de cada coluna na linha, mas elas (as impressoras) possuem muito recursos, mas muito mais mesmo, inclusive outras fonte de Código de Barras. Também é possível fazer upload de outras Fontes (nunca fiz. O manual delas informa isto).

Tenho um manual em PDF de uma impressora Zebra, em inglês, e que posso disponibilizar se houver interesse. É só informar.
Anexos
R99.txt
(1.85 KiB) Baixado 274 vezes
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
lggavinho
Usuário Nível 1
Usuário Nível 1
Mensagens: 9
Registrado em: 22 Jul 2013 10:45
Localização: São Paulo

Porta serial no Harbour

Mensagem por lggavinho »

Puxa Hasse, que mão na roda... muito obrigado mesmo!!!!!!

Luciano
Responder