FiveTech Software tech support forums

Saludos, así como dice el titulo, quería saber como puedo EXTRAER los datos leídos de un código QR, si hay alguna clase, forma de trabajo o lo que haya con FWH... imagino todo dependerá del lector y a donde se guarden los datos de lectura y el tipo de archivo, ya tengo la creación e impresión del QR con FW, pero esa información luego debe ser leída en un momento determinado en el mismo sistema, espero sus comentarios, ideas y/o recomendaciones...gracias..

Post data: lo que necesito es así como se lee el código de barra en un GET, hacer lo mismo con cierta información del código QR, es decir , extraer solo cierta información del QR, no se si eso es posible, gracias...

Estimado Jose Luis,

Esta librería puede servirnos:
https://github.com/nu-book/zxing-cpp

Hola José Luis:
En realidad es exactamente igual que con un código de barras.
El lector de código QR te va a devolver en forma de texto, el contenido del texto "escondido" en el QR.
Para eso simplemente puedes utilizar un GET donde quedará ese contenido (te recomiendo que sea un GET tipo MEMO por su tamaño)
Y después es cuestión de descomponer ese texto obteniendo los valores que te sean de utilidad. Claro que tienes que saber cual es el formato a esperar en el QR para poder hacerlo.

cmsoft wrote:Hola José Luis:
En realidad es exactamente igual que con un código de barras.
El lector de código QR te va a devolver en forma de texto, el contenido del texto "escondido" en el QR.
Para eso simplemente puedes utilizar un GET donde quedará ese contenido (te recomiendo que sea un GET tipo MEMO por su tamaño)
Y después es cuestión de descomponer ese texto obteniendo los valores que te sean de utilidad. Claro que tienes que saber cual es el formato a esperar en el QR para poder hacerlo.

Saludos cmsoft, imagine que es igual al de barra, el detalle es que son diferentes valores, mi duda es si habia alguna forma de acceder a algun dato especial, solo he trabajado la opcion de crear el QR, nunca extraer los datos, ya que aunque hay varios datos en el QR, solo necesito extraer UNO solo pero si es posible, en un GET normal asi como si fuese un codigo de barra, imagino todo dependera, como dices, del formato que me devuelva el lector, si tienes algun ejemplo, te estare agradecido, saludos, gracias...

José Luis:

Tal como te dice CMSOFT, necesitas un lector de código QR, este te devolverá una cadena de texto la cual
debes descomponer o trozear con SUBSTRING() dependiendo de donde se encuentra el trozo de código
que te interesa.

Saludos

Bueno lo ideal, el que tenga un trozo de codigo, que funcione, y nos beneficiamos todos

Adolfredo:

Con todo gusto, yo tengo este código:

Defino la variable que recibirá lo que el lector QR lea

Code: Select all  Expand view

    oHdr:TXT    := ""
 

Este es el GET donde se lee el QR, en lugar de usar el teclado, el usuario
utiliza el lector QR

Code: Select all  Expand view

        REDEFINE GET aGets[05] VAR oHdr:TXT ID 300 OF oDlg UPDATE;
            MEMO;
            VALID ValQR(oDlg,aGets);
            MESSAGE "Código QR"
 

Y en la función ValQR hago el troceo de la cadena para obtener el valor que requiero

Code: Select all  Expand view

            oHdr:UID    := ALLTRIM(SUBSTR(oHdr:TXT,nAtID + 3,36))                       // Folio fiscal
 

Espero esto les ayude.

Saludos

Armando wrote:Adolfredo:

Con todo gusto, yo tengo este código:

Defino la variable que recibirá lo que el lector QR lea

Code: Select all  Expand view

    oHdr:TXT    := ""
 

Este es el GET donde se lee el QR, en lugar de usar el teclado, el usuario
utiliza el lector QR

Code: Select all  Expand view

        REDEFINE GET aGets[05] VAR oHdr:TXT ID 300 OF oDlg UPDATE;
            MEMO;
            VALID ValQR(oDlg,aGets);
            MESSAGE "Código QR"
 

Y en la función ValQR hago el troceo de la cadena para obtener el valor que requiero

Code: Select all  Expand view

            oHdr:UID    := ALLTRIM(SUBSTR(oHdr:TXT,nAtID + 3,36))                       // Folio fiscal
 

Espero esto les ayude.

Saludos

Muchas gracias Armando, es lo que necesitaba...