13 lines
301 B
Plaintext
13 lines
301 B
Plaintext
IMPORT util
|
|
|
|
MAIN
|
|
DEFINE s STRING,
|
|
xrep RECORD
|
|
codigo,estado,mensajes,encf,secuenciaUtilizada STRING
|
|
END RECORD
|
|
|
|
LET s = '{"codigo":1,"estado":"Aceptado","mensajes":null,"encf":"E320000000103","secuenciaUtilizada":true}'
|
|
CALL util.JSON.parse(s,xrep)
|
|
|
|
DISPLAY xrep.*
|
|
END MAIN |