JsonArraySetFloatElement 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 float value, nothing happens.

Include file

Json.bdh

Syntax

JsonArraySetFloatElement( in handle : number,
                          in index  : number,
                          in value  : float ): boolean;
Parameter Description
handle Valid handle to a JSON array
index The index position in the JSON array. Lower bound is zero (0).
value The new value of the element

Return value

  • true if value successfully written to element
  • false otherwise

Example

transaction TMain
var
  jsonText               : string;
  jsonArray, i           : number;
  newValue, currentValue : float;
begin
  WebParseDataBound(jsonText);
  WebPageUrl("http://mycompany.com/api/jsondata");
  jsonArray := JsonParse(jsonText);
  
  //every JSON array element is greater than or equal 11.22
  newValue := 11.22;
  for i := 0 to (JsonGetArrayLength(jsonArray) - 1) do
    JsonArrayGetFloatElement(jsonArray, i, currentValue);
    if currentValue < newValue then
      JsonArraySetFloatElement(jsonArray, i, newValue);
    end;
  end;
  
  /* add new value
   * index of the new value := size
   * size := size + 1 */
  JsonArraySetFloatElement(jsonArray, 999999, newValue);

  JsonFree(jsonArray);
end TMain;