Como criar Codigo de Barras

[supgaroto]

Quando o cliente chegar no caixa ele apresente um cartão. o caixa passe o leitor no verso do cartão. Nesse verso tem q ser impresso o codigo do cliente, em codigo de barra para q o caixa não precise digitalo. Como faço pra criar esse codigo de barras pelo meu sistema?

[support sistemas]

usa o libbar50

[helio]

Support Sistemas onde posso encontra esta biblioteca LIBBAR50 e documentacao com usar.

Se poder ajudar muito Obrigado. Valeu

Helio Beltrao Jr.
helio@hrbinfo.com.br

[supgaroto]

É o seguinte...
Tenho q imprimir esses codigos de barras em uma impressora USB.
Ou criar uma HTML pro cara poder imprimir fora do sistema...

[sygecom]

Support Sistemas:
Poderia enviar pra min tb. essa biblioteca LIBBAR50....

Prescisso criar um codigo de barra para um cadastro de Funcionario onde vai ter um leitor de codigo de barra....onde o funcionario vai passar na portaria e passar o cracha!!!

Obs: Eu jah consigo imprimir o codigo de barra EAN13...soh não consigo gerar nenhum.....melhor não faço nem ideia de como gerar !!

Se Alguem tiver algo para me auxiliar fico grato......

Abraços a todos !!!

[sygecom]

Please, Alguem sabe como GERAR CODIGOS DE BARRA ?

Obs:Tenho um cadastro de FUNCIONARIO onde cadastro deve gerar um codigo de barra !! para posteriormente fazer o reconhecimento dos funcionario pelo codigo de barra....

Agradeço qualquer Ajuda.........

Abraço a Todos..

[Maligno]

Pelo que entendi, imprimir você já imprime. Você quer apenas gerar os números. Se for isso mesmo, e caso ainda não saiba, o EAN13 é dividido nas partes:

Código: Selecionar todos

Dígitos   Descrição
-------   -----------------------------------
1- 3      Código do país (789 para Brasil)
4- 7      Código da empresa cadastrada na EAN
8-12      Código do produto
13        Dígito verificador

Para validação, tenho duas funções distintas: uma para calcular o dígito verificador e outra apenas para validar o código fornecido:

Código: Selecionar todos

//------------------------------------------------
function CalcEAN13(cEAN)
local nSoma := 0
local i
for i := 1 to 12
    nSoma += Val(SubStr(cEAN,i,1)) * if(i%2>0,1,3)
next
return if(nSoma%10=0, "0", Str(((Int(nSoma/10)+1)*10)-nSoma,1))

//------------------------------------------------
function ValidEAN13(cEAN)
return Len((cEAN := AllTrim(cEAN)))=13 .and. Right(cEAN,1) == CalcEAN13(cEAN)

Agora, se for apenas para uso interno, gere o código da forma que melhor lhe aprouver. Não precisa, neste caso, usar a formatação da instituição EAN. Mas se for para dar saída a produtos que serão vendidos em lojas, você não só terá de seguir o formato oficial, como também se cadastrar na EAN-Brasil, e isso é pago, conforme o faturamento da empresa.

Espero ter ajudado.

[]'s
Maligno
http://www.buzinello.com/prg

[Vander]

Amigo supgaroto;

Eu tenho um aplicativo em xHarbour que gera e imprime códigos de barra que talves atenda.
Você seleciona o nome do arquivo de origem, o campo de origem, inicial e final e o sistema gera o código e imprime se ainda não tiver achado uma solução é só avisar que eu mando para o seu E-Mail.

Vander

[sygecom]

Pelo que entendi, imprimir você já imprime. Você quer apenas gerar os números. Se for isso mesmo, e caso ainda não saiba, o EAN13 é dividido nas partes:

Código:
Dígitos Descrição
------- -----------------------------------
1- 3 Código do país (789 para Brasil)
4- 7 Código da empresa cadastrada na EAN
8-12 Código do produto
13 Dígito verificador

Realmente isso mesmo Maligno eu consigo Imprimir EAN13 através do PRWIN e de uma LIB que tenho aqui....a questão esta na geração do numero valido para ser impresso o codigo.....Tentei varias combinações pela dica que vc postou mais sem chance......ele imprime um codigo que não le......Help....

Obs: Tenho um leitor que não tem configuração alguma eu simplesmete liguei ele no teclado e saiu funcionando ele le todos os CODIGOS DE BARRA EAN13....

Agora, se for apenas para uso interno, gere o código da forma que melhor lhe aprouver. Não precisa, neste caso, usar a formatação da instituição EAN.

Quero para uso interno mas Como eu faço para gerar e o leitor recohecer

Abraços

[sygecom]

Amigo supgaroto;

Eu tenho um aplicativo em xHarbour que gera e imprime códigos de barra que talves atenda.
Você seleciona o nome do arquivo de origem, o campo de origem, inicial e final e o sistema gera o código e imprime se ainda não tiver achado uma solução é só avisar que eu mando para o seu E-Mail.

Vander

Vander:
Vc poderia enviar pra min tb......

[Vander]

Amigo sygecom;

O aplicativo Não gera codigo EAN13, ele gera código de barras para os numeros do seu arquivo, vou disponibilizar amanhã para todos.

Vander

[sygecom]

Vander:
Sabe me dizer como faço para fazer a leitura de outros codigo com um leitor ITAUTEC

Abraços

[Maligno]

...ele imprime um codigo que não le...
ele le todos os CODIGOS DE BARRA EAN13....

Não entendi. Afinal, ele lê ou não lê?
Ou você quer dizer que ele lê aquelas etiquetas de produtos de supermercados mas não lê as barras impressas por você?

Veja: número é número. Se o padrão das barras é EAN13, o leitor lerá EAN13. Se o número é válido ou não, se está no formato convencionado ou não, tanto faz. O leitor lê as barras e devolve o número, seja ele qual for.
Eu nunca usei EAN13. Vou começar a usar isso no mês que vem. Mas, imagino que é possível que seja necessário um caractere marcador de header/tail pra prefixar/posfixar o código a ser impresso, a exemplo do que é feito na impressão de números no formato 2 de 5 intercalado (FEBRABAN). Exemplo do que poderia ser necessário para imprimir as barras para o número 1234567890123: *1234567890123#. Lembre-se: estou apenas *supondo*.
Se esses dígitos marcadores forem realmente necessários e o leitor não encontrá-los, é claro que ele não lerá o número, já que ele não saberá onde o desalmado começa/termina. Na sua biblioteca de impressão não consta nada sobre isso na documentação?
Faça um teste simples: pegue o número do código de um produto numa etiqueta qualquer de supermercado e imprima pelo seu programa. Visualmente, compare sua impressão com a da etiqueta do produto. Se estiverem diferentes, mesmo que sutilmente, o problema pode estar na sua impressão ou no número que você manda imprimir.

Nota: as funções que passei apenas e tão somente trabalham com os números lidos, calculando seu dígito verificador ou validando-o.

[]'s
Maligno
http://www.buzinello.com/prg

[sygecom]

Maligno, mais uma vez obrigado pela ajuda.....o que estava acontecendo aqui era q os codigos que estavam sendo gerados e impressos não eram validos para o leitor que eu tenho(SEAL-SEM MANUAL DE CONFIGURAÇÃO)....problema resolvido graças a sua função VALIDEAN13.....

Muito Obrigado -:] :xau :)Pos
Abraços

[marcos.gurupi]

Caro Maligno serah q poderia disponibilizar o VALIDAEAN13 ou mesmo me mandar por email.

marcos_gurupi@hotmail.com
marcos.gurupi@ibest.com.br

Marcos Roberto