AGREGAR ARRAY EN CODIGO QR

[joseluisysturiz]

Buen dia, lo que dice el titulo, tengo que guardar una lista de codigos que tengo en un array, que luego debo recuperar para usar en una validacion de pago, se puede guardar el array al crear el codigo QR y cuando haga la lectura del QR podre extraer todos los codigos del array..?

Es como si guardara una lista de productos de una facturacion en el QR y luego al leer el campo del QR pueda extraer los productos individuales para realizar X operacion... espero sus ayudas y sugerencias, gracias...

[Armando]

José Luis:

Un pequeño aporte, Si abres un QR con algún lector de QR, veras que te devuelve una cadena de caracteres (String)
esta cadena de caracteres esta delimitada por algunos caracteres especiales, por ejemplo: &id=eltexto, &re=otrotexto
de esta manera podrás trocear la cadena original.

Desde luego, vas a necesitar un lector de QR conectado a tu PC, los hay muy económicos.

Espero te de un hilo.

Saludos

[joseluisysturiz]

José Luis:

Un pequeño aporte, Si abres un QR con algún lector de QR, veras que te devuelve una cadena de caracteres (String)
esta cadena de caracteres esta delimitada por algunos caracteres especiales, por ejemplo: &id=eltexto, &re=otrotexto
de esta manera podrás trocear la cadena original.

Desde luego, vas a necesitar un lector de QR conectado a tu PC, los hay muy económicos.

Espero te de un hilo.

Saludos

Armando, gracias por responder. ya se usar y estoy usando lector QR, pero con varios campos de un solo valor, hasta alli todod bien, lo que preguntaba es si el codigo QR se portaria como una TABLA o DBF que guardara una VAR con su contenido, imagino que lo que me va a devolver en el campo que use para guardar el array, es todo el contenido de dicho array pero de forma concatenada asi como dices, crei por un momento podria recuperar de una lectura, la VAR y de ella por programacion crear un FOR para realizar operaciones de forma individual, no se si alguno tendra alguna otra idea, y si solo puedo recuperar la cadena con el contenido del array, de que forma puedo extraer cada uno de los valores del array y llevarlo a un ARRAY de nuevo para luego usar el FOR y realizar lo que deseo con cada valor, gracias...

[wmormar]

Que tal.

Si es texto totalmente los valores de tu array sin problema ya que puedes delimitar tus "textos" y genera el array sin problema alguno.

Saludos

[Willi Quintana]

MI estimado buenos dias...
Utiliza las funciones ASAVE y AREAD,
ASAVE convierte un array en una cadena (luego lo trabajas en el QR, aunque te recomiendo usar PDF417
AREAD lee la cadena y la reconvierte a un ARRAY (previamente convertida con ASAVE)
pero, al parecer hay un problema....
lee este link
viewtopic.php?f=6&t=27529&p=153548&hilit=asave&sid=b5f24a442749fae3d5fe150664455d2e#p153548

[joseluisysturiz]

MI estimado buenos dias...
Utiliza las funciones ASAVE y AREAD,
ASAVE convierte un array en una cadena (luego lo trabajas en el QR, aunque te recomiendo usar PDF417
AREAD lee la cadena y la reconvierte a un ARRAY (previamente convertida con ASAVE)
pero, al parecer hay un problema....
lee este link
viewtopic.php?f=6&t=27529&p=153548&hilit=asave&sid=b5f24a442749fae3d5fe150664455d2e#p153548

saludos, algo como esto es lo que quiero. revisare lo que me dices a ver cual es el problema, la otra opcion seria unir los valores del array en una cadena con un separador y luego cuando lea el QR, que uso para crearlo la clase de FW, leer el valor del QR y descomponerlo para luego crear de nuevo el array, algo como lo que me sugieres...pero a pedal.... pruebo y comento, gracias...

[leandro]

Amigo buenos días como estas?

Creo que te puede ir mejor con un json "hash"

Code: Select all  Expand view  RUN

#include "fivewin.ch"

REQUEST FWZEBRA

//----------------------------------------------------------------------------//

function Main()

   local oWnd, cText
   local hInfo := hash()
   local aInfo := {"primero","segundo","tercero","cuarto","quinto","_","septimo","octavo"}
   local cPrg := space(0)
   hInfo["id"] := "52"
   hInfo["nombre"] := "Jhon Doe"
   hInfo["info"] := aInfo
   cPrg := hb_jsonEncode( hInfo )

   DEFINE WINDOW oWnd TITLE "prueba QR array"
   ACTIVATE WINDOW oWnd CENTERED ;
      ON PAINT oWnd:SayBarCode( cPrg, { 20,20,-20,-20 }, "QR-CODE" )

return nil

//----------------------------------------------------------------------------//