CAdena JSON

CAdena JSON

Postby Willi Quintana » Wed Nov 08, 2023 3:52 am

Estimados amigo,
obtengo esta cadena JSON pero no puedo procesar la informacion que continua a "licencia", gracias por vuestro apoyo

{"status":200,"message":"Exito","data":{"numero_documento":"23869035","grupo_sanguineo":"O+","donacion_organos":"SI","licencia":[{"numero":"Z23869035","categoria":"A I","fecha_vencimiento":"09/03/2031","estado":"VIGENTE","restricciones":"CON LENTES"}]}}
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú

Re: CAdena JSON

Postby csincuir » Wed Nov 08, 2023 12:57 pm

Hola Willi, prueba de esta manera:

Code: Select all  Expand view

cJs := '{"status":200,"message":"Exito","data":{"numero_documento":"23869035","grupo_sanguineo":"O+","donacion_organos":"SI","licencia":[{"numero":"Z23869035","categoria":"A I","fecha_vencimiento":"09/03/2031","estado":"VIGENTE","restricciones":"CON LENTES"}]}}'
hJs := ""
hb_jsonDecode(cJs,@hJs)
hDat := hJs["data"]
aLic := hDat["licencia"]
hLic := aLic[1]
? hLic["numero"]
 


Saludos cordiales.

Carlos.
csincuir
 
Posts: 407
Joined: Sat Feb 03, 2007 6:36 am
Location: Guatemala

Re: CAdena JSON SOLUCIONADO

Postby Willi Quintana » Wed Nov 08, 2023 3:01 pm

Gracias Carlos, funcionó perfectamente
User avatar
Willi Quintana
 
Posts: 1019
Joined: Sun Oct 09, 2005 10:41 pm
Location: Cusco - Perú


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 62 guests