Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

[OT] Codigo de Barras

17 views
Skip to first unread message

Pablodegerli

unread,
Aug 1, 2005, 3:20:44 PM8/1/05
to
Hola gente
Tengo una inquietud, tengo previsto realizar la impresion de unas etiquetas
con el codigo de barra de un producto, con Ean 13. Hasta aqui algo comun, el
tema es que quisiera agregarle otro codigo de uso interno por cada bulto, y
no estoy seguro de si para esto usar esta misma codificacion porque se
prestaria a confusion.
Quisiera poder imprimir otro codigo de barras mas pequeño utilizando una
codificacion que pueda ser leida por el sistema pero solo para uso interno.

Como siempre, gracias de antemano


Saga

unread,
Aug 1, 2005, 3:39:15 PM8/1/05
to

Como es este codigo interno? Numerico? alfanumerico?

Despues de ver si solo necesitas digitos o bien letras tambien,
puedes seleccionar uno que se adapte a tu snecesidades.

Personalmente yo utilizaria Code39 si es alfanumerico
o Code 128 si solo es numerico. La ventaja con este
codigo es que puedes agrupar pares de digitos, asi que
el codigo de barras se puede optimizar. La desventaja
es que puede ser mas comlicado, todo depende de que
herramienta tienes (o consigues) para reproducirlo.

El code 39 nunca falla - no es muy complejo y sirve para
numeros y letras.

Suerte!
Saga

"Pablodegerli" <pablod...@yahoo.com.ar> wrote in message
news:uc7l23sl...@tk2msftngp13.phx.gbl...

Pablodegerli

unread,
Aug 1, 2005, 4:03:37 PM8/1/05
to
Por el momento solo hemos comprado licencias para el ean 13 y 8
lo que habia pensado era en usar el ean 8 pero completando los valores con
cero dado que este codigo interno dicilmente supere los 7 digitos.
Es un codigo numerico correlativo que identifica cada bulto dentro de un
deposito.
Cada bulto llevara esta etiqueta con su Ean13 correspondiente al producto,
le pienso agregar este codigo para identificar exactamente cada bulto y asi
tener mas control.

"Saga" <anti...@somewhere.com> escribió en el mensaje
news:uPnR0Ctl...@TK2MSFTNGP14.phx.gbl...

Leonardo Azpurua [mvp vb] arroba punto

unread,
Aug 2, 2005, 1:55:01 AM8/2/05
to

"Pablodegerli" <pablod...@yahoo.com.ar> escribió en el mensaje
news:u6Y8zPtl...@TK2MSFTNGP12.phx.gbl...

> Por el momento solo hemos comprado licencias para el ean 13 y 8
> lo que habia pensado era en usar el ean 8 pero completando los valores con
> cero dado que este codigo interno dicilmente supere los 7 digitos.
> Es un codigo numerico correlativo que identifica cada bulto dentro de un
> deposito.
> Cada bulto llevara esta etiqueta con su Ean13 correspondiente al producto,
> le pienso agregar este codigo para identificar exactamente cada bulto y
> asi
> tener mas control.

Hola, Pablo:

Como te comenta Saga, es preferible el Code39 para los códigos internos (te
quitas el problema de los digitos de validación).

Normalmente, el EAN8 se usa para productos pequeños (chicles, caramelos,
encendedores) donde no hay suficente espacio para colocar un código completo
de 13 caracteres.

Los dos o tres primeros dígitos del código EAN indican el pais de origen,
luego hay el código del producto (de cuatro o cinco dígitos, dependiendo de
la longitud del código del pais) y luego un digito de validacion.

El algoritmo para calcular el dígito de validación lo puedes obtener aquí:
http://www.barcodesymbols.com/ean8.htm

Los códigos EAN comienzan con un prefijo de dos o tres digitos con el código
del pais (EEUU/Canada, por ejemplo, usan del 00 al 13, Venezuela es el 759 y
México el 750). Los prefijos del 20 al 29 (es decir, los que comienzan por
dos) están reservados para uso interno.

Imagino que mientras utilices para uso interno codigos EAN que comiencen por
2, no deberás tener ningún problema. Los códigos de los paises, y una
descripcion general del código, los puedes consultar aquí:
http://users.pandora.be/worldstandards/barcodes.htm#prefixes

Salud!


Hace años tuve que revisar las especificaciones de UPC/EAN 13, y vi que el
prefijo 2 (DOS) se utiliza para productos etiquetados internamente (para
etiquetas de peso o productos empacados en la misma empresa). En todo el
tiempo que llevo trabajando con puntos de venta, sólo he encontrado un
producto (Queso Parmesano Reggiano) que utiliza el prefijo dos en su código
de barra (algo que no deberían hacer), porque cada paquete tiene un peso
diferente.

Pero el EAN 13 tiene un prefijo inequívoco (si comienza por 2 y no vendes
queso parmesano Reggiano, puedes confiar que es un código interno), de
manera que no debería haber problemas. No se si el EAN 8 tiene un prefijo
asignado para los códigos propios.


Helena

unread,
Aug 2, 2005, 1:43:57 PM8/2/05
to
Buenas Tardes,

tengo en informix un programa que me imprime codigo de barras, bueno envia
los caracteres propios de la impresorapara hacerlo, ya que la impresora es
una SATO que imprimi codigos de barra. Bueno el problema es que lo tengo que
migrar a VB6 y realmente no tengo ni idea de como hacerlo.
En informix es algo asi:
PRINT

COLUMN 1, ASCII(27), 'A', ASCII(27), '*&', ASCII(27), 'Z'

PRINT

COLUMN 1, ASCII(27), 'A', ASCII(27), 'EX0', ASCII(27), 'Z'

PRINT

COLUMN 1, ASCII(27), 'A', ASCII(27), "%2",

ASCII(27), 'H810',

ASCII(27), 'V0175',

ASCII(27), 'D302143', cadena CLIPPED,

ASCII(27), 'L0101', ASCII(27), 'P06',

ASCII(27), 'H821', ASCII(27), 'V0030',

ASCII(27), 'S', cadena[1,1],

ASCII(27), 'P06', ASCII(27), 'H798',

ASCII(27), 'V0030', ASCII(27),

ASCII(27), 'S', cadena[2,7],

ASCII(27), 'P06', ASCII(27), 'H708',

ASCII(27), 'V0030',

ASCII(27), 'S', cadena[8,12], dig_veri USING
"&"

Me podrian decir como seria en VB6, he buscado en la web, pero no ecnuetro
nada que me ayude.

Gracias a todos,

Helena ......

Victor Koch arroba punto punto punto

unread,
Aug 2, 2005, 2:00:54 PM8/2/05
to
Hola Helena,

Debrias abrir la impresora como un archivo y "grabar" en el las lineas de
impresion.

¿ Como abrir la impresora ?

Dim N as integer

N=Freefile

Open "LPT1" For Output As #N

¿ Como imprimir ?

PRINT #N,COLUMN1;CHR$(27); 'A'; CHR$(27); '*&'; CHR$(27); 'Z'

COLUMN1 pareceria que es el dato a imprimir.

Todo lo que es ASCII(27) son secuencias de escape a la impresora, debes
reemplazar ASCII por Chr$, tendrias que ver el manual de la impresora.

Para cerrar la impresora Close #N


--
Un saludo, Víctor Koch.


"Helena" <ameri...@yahoo.com> escribió en el mensaje
news:#zzqZm4l...@TK2MSFTNGP15.phx.gbl...

Helena

unread,
Aug 2, 2005, 3:15:41 PM8/2/05
to
primero que todo garcias por respondeer pero y si tengo la impresora en
red???
"Victor Koch" <v i c t o r (arroba)correo(punto)waldbott(punto)com(punto)ar>
escribió en el mensaje news:eoT2Pw4l...@TK2MSFTNGP10.phx.gbl...

Victor Koch arroba punto punto punto

unread,
Aug 2, 2005, 3:31:45 PM8/2/05
to
Hola Helena,

Una vez compartido el recurso

Open "\\xxxx\zzzz" For Output As #N


--
Un saludo, Víctor Koch.


"Helena" <ameri...@yahoo.com> escribió en el mensaje

news:#vM6qZ5l...@tk2msftngp13.phx.gbl...

Helena

unread,
Aug 2, 2005, 3:58:03 PM8/2/05
to
gracias, me podrias decisr que significa el $ en chr$27) asi en como esta en
el manual de la impresora, pero en vb no se que es, gracias.

"Victor Koch" <v i c t o r (arroba)correo(punto)waldbott(punto)com(punto)ar>
escribió en el mensaje news:OSh$Aj5lFH...@TK2MSFTNGP09.phx.gbl...

Victor Koch arroba punto punto punto

unread,
Aug 2, 2005, 4:15:04 PM8/2/05
to
La función CHR$ convierte un ascii a character. CHR$(27) es para indicarle a
la impresora que se va a enviar una secuencia de escape, lo que va a
continuacion del CHR$(27) es la secuencia en si, en el manual de la
impresora estan todas las secuencias de escape admitidas.


--
Un saludo, Víctor Koch.


"Helena" <ameri...@yahoo.com> escribió en el mensaje

news:eL1JWx5l...@TK2MSFTNGP12.phx.gbl...

Saga

unread,
Aug 2, 2005, 4:17:19 PM8/2/05
to

El $ en la funcion chr indica que el resultado es de tipo String, asi
como
tambien se usa en otras funciones tales como Format$, Trim$, Left$, etc.

Saludo
Saga


"Helena" <americ...@SPAMMEyahoo.com> wrote in message
news:eL1JWx5l...@TK2MSFTNGP12.phx.gbl...

Helena

unread,
Aug 2, 2005, 5:48:08 PM8/2/05
to
Gracias, eso no lo sabia.

"Saga" <anti...@somewhere.com> escribió en el mensaje
news:O$gew85lF...@TK2MSFTNGP09.phx.gbl...

Helena

unread,
Aug 2, 2005, 5:47:53 PM8/2/05
to
Gracias, me ayudaste muchismo
Helena

"Victor Koch" <v i c t o r (arroba)correo(punto)waldbott(punto)com(punto)ar>
escribió en el mensaje news:OTNzN75l...@TK2MSFTNGP10.phx.gbl...
0 new messages