INT _arr
_arr := %JSON_CreateArray()
%JSON_ArraySetLength(_arr, 5)
%JSON_ArraySetValue(_arr, 1, "IPESOFT")
%JSON_ArraySetValue(_arr, 2, 365)
%JSON_ArraySetValue(_arr, 3, 1.234)
%JSON_ArraySetValue(_arr, 4, @TRUE)
%JSON_ArraySetValue(_arr, 5, U.uservariable)
%JSON_FreeArrayHandle(_arr)
Pridať komentár