JsonArraySetObjectElement Function

Action

Replaces the value of a specified element from a JSON array. If the array element does not exist in the JSON array, a new element with the specified value will be appended to the array. If the array element does not contain a JSON object value, nothing happens.

Include file

Json.bdh

Syntax

JsonArraySetObjectElement( in handle : number,
                           in index  : number,
                           in value  : number ): boolean;
Parameter Description
handle Valid handle to a JSON array
index The index position in the JSON array. Lower bound is zero (0).
value A handle to the JSON object, which should be the new value of the element

Return value

  • true if value successfully written to element
  • false otherwise

Example

transaction TMain
var
  jsonText  : string;
  jsonArray : number;
  newValue  : number;
begin
  WebParseDataBound(jsonText);
  WebPageUrl("http://mycompany.com/api/jsondata");
  jsonArray := JsonParse(jsonText);
  
  newValue := JsonParse("{\"Name\": \"new Object\"}");
  JsonArraySetObjectElement(jsonArray, 1, newValue);
  
  /* add new value
   * index of the new value := size
   * size := size + 1 */
  JsonArraySetObjectElement(jsonArray, 999999, newValue);

  JsonFree(newValue);
  JsonFree(jsonArray);
end TMain;