Mostramos cuál es la estructura del código de barras EAN13 y cómo obtenerla con una aplicación en Delphi 6 AjpdSoft Obtener datos EAN13 en Delphi 6. Mostramos también cómo calcular el dígito de control de un código de barras EAN.

Estructura de código de barras EAN13

EAN (European Article Number o International Article Number) es un sistema de códigos de barras adoptado por la gran parte de países y empresas del mundo. En el año 2005, la asociación EAN se ha fusionado con la UCC (Uniform Code Council) para formar una nueva y única organización mundial identificada como GS1, con sede en Bélgica. El código EAN más usual es EAN13, constituido por 13 dígitos y con una estructura dividida en cuatro partes:

  1. Los primeros dígitos identifican a través de qué Organización Nacional se ha adscrito una empresa al Sistema EAN. Por ejemplo, en España se encarga de ello Aecoc y su código es el 84.
  2. Referencia del ítem, compuesto de:
    • Código de empresa: es un número compuesto por entre 5 y 8 dígitos, dependiendo de las necesidades de la empresa, que identifica al propietario de la marca.
    • Código de producto: completa los 12 primeros dígitos.
    • Dígito de control: consta de un solo dígito y sirve para verificar que el código leído es correcto. Para calcularlo se suman los dígitos de las posiciones impares, se multiplica por 3, se le suman los dígitos de las posiciones pares y a este resultado se le resta el siguiente múltiplo de 10. El resultado final ha de coincidir con el dígito de control.

Por lo tanto el código de barras EAN 13 puede ser muy variable dependiendo de la empresa que lo utilice. Un ejemplo podría ser:

Código de barras EAN 13
  • [84] Los dos primeros dígitos identifican que la empresa se ha adscrito a Aecoc como Organización Nacional registradora de códigos de barras EAN.
  • [25623] Los 5 dígitos siguientes indican el código de empresa asignado por la Organización Nacional Aecoc.
  • [50012] Los 5 dígitos siguientes identifican el producto dentro de la empresa, este código será asignado por la empresa a su libre albedrío.
  • [6] El último dígito es calculado, es el dígito de control.

Cálculo del dígito de control de código de barras EAN13 en Delphi

A continuación mostramos un ejemplo de cálculo de dígito de control de un código de barras EAN13 en Delphi:

AjpdSoft Obtener datos EAN13 con código fuente en Delphi 6

A continuación mostramos un ejemplo en Delphi de cómo obtener los datos de un código de barras EAN13, AjpdSoft Obtener datos EAN13 en Delphi 6:

Ejemplo en Delphi de obtención de los datos del código de barras EAN 13

El listado del código fuente completo de AjpdSoft Obtener datos EAN13 en Delphi 6:

Cómo generar códigos de barras EAN8 y EAN13 con Delphi 6

A continuación mostramos un enlace a un tutorial donde explicamos cómo generar códigos de barras EAN8 y EAN13 mediante el lenguaje de programación Delphi 6:

La aplicación con código fuente open source:

Y un videotutorial de su funcionamiento: