USAR LEITOR OTICA DE CODIGO DE BARRA NA CAIXA DE TEXTO, COMO FAÇO NO VPF5.0 ?

[LUIZ E.M.R]

ainda não usei ate agora um fomulario no visual foxpro 5.0 , onde a caixa de texto que recebe o codigo do produto de 12 digitos digitado no teclado possa ser lido agora por um leitor de codigo de barra , como faço para receber esse codigo via leitor? se possivel bem detalhado..grato (OS DOIS LEITORES VIA TECLADO OU USB).

[m@r<3|o]

vo colar uma resposta que dei em outro forum
leve em consideracao que os EAN13 ..... seja o digito de 12 Doze digitos
ve se te ajuda

aquestao seria,
1- precisa de 1 tela, de pedido de compra, antecipando a chegada dos itens
2 - outra tela de recepcao do pedido de compra, a qual informa a quantidade e atrabiu e gravas as barras

as barras quando voce gera
o primeiro digito tem que ser 2 cod int livre pra comercio + codigo produto 00005 + valor mercadoria 002900 dando 12 digitos a soma
apartir dai precisara uma rotina para digito verificador ele vai fazer calculo e dar 1 ultimo numero

o padrao mais universal pro comercio chama EAN13 procure sobre ean13 primeiramente e calculo digitor verificador ean 13
essa rotina a qual gera o ultimo numero chama digito verificador
se for gerar a barra

Código:

SELECT cadcomprap
n_barra =  GERA_EAN13('2'+ cadcomprap.cprp_prod + fox_zera(transform(cadcomprap.cprp_ttpro,'9999') + ALLTRIM(right(STR(cadcomprap.cprp_ttpro,11,02),2)),6))

voce iria ter um numero asssim 2000050029007

a partir dai , voce precisa da fonte adequada , vai na pasta system 32 e cola ela na pasta fonts . onde tem arial times new romam etc.
exemplo "FFfFFff" a partir desses f voce colocando a fonte la e colocando no relatorio ele virara barra , tem que reconhece no campo do reporter a partir dai vc gera sua barra ..... com dig 2 free universal + codigo prod + valor compra + dig que verifica pela rotina

quando voce bipa uma barra , e coloca ela pra aparecer num text ela vai aparecer 2922956265656 numeros

simplesmente a barra sao numero claro que tem mais coisas a saber , se for uma empresa boa ... geralmente eles se credenciam ai os numeros mudam . ai entra outra teoria ..... mais de inicio isso da pra vc testar

Abs
Marcelo Fazan

[m@r<3|o]

voce ja tem as 2 funcoes ??? Não me lembro ao certo se 12 digitos tambem tem verificacao tem ?

que faz o digito verificador de 12
e a outra que reconhece FfFfffF com numeros ???

na venda nada mais seria que , bipar é = a digitar o codigo e dar enter

[lardecristo]

Olá Chara.....rsrsrs....é bem simples use o do teclado e mantenha sempre o foco no TextBox, se assim for a sua necessidade, eu fiz um sistema para banca de jornal e usei o leitor acoplado ao teclado, não precise fazer nada, porque o mesmo já envia o código em número, porque o leitor acoplado ao teclado envia os números como se fosse digitado pelo teclado, ele faz todo o tratamento para a leitura do código, se houver erro ele nem envia.
Sobre o da USB eu não tenho como te informar porque nunca usei, se este for junto com o teclado USB, bem provavel que tenha a mesma funcionalidade do de cima.

No sistema que fiz utilizei da seguinte forma:

Criei uma tela de entrada de estoque e outra de venda, ambas usavam o leitor.

Entrada de Estoque:

Objetos utilizados:
MSHFLexGrid com um MaskEdit (dois objetos externos do VFP)
Na primeira célula eu aguardava a digitação ou captação via leitor do código do produto e depois ia direto para o campo de quantidade, neste o usuário digitava, e depois o valor de compra, neste também o usuário digitava e depois adicionava mais uma linha, e voltava ao inicio.

Venda:

TextBox (padrão do VFP), quando o mesmo recebia o código já fazia a pesquisa no produto e já incluia com a quantidade de um item e mantinha no próprio TextBox, caso o usuário deseja-se mudar a quantidade ele tinha que teclar Fx (x não lembro o número...rsrs) e assim que dava "Enter" o sistema já voltava para o TextBox.