The API for accessing JSON data now includes methods that you can use instead of always reading data through a JsonToken.

For JsonObject instances, use:

value := GetBoolean(Key: Text [; DefaultIfNotFound: Boolean]) value := GetByte(Key: Text [; DefaultIfNotFound: Boolean]) value := GetChar(Key: Text [; DefaultIfNotFound: Boolean]) value := GetInteger(Key: Text [; DefaultIfNotFound: Boolean]) value := GetBigInteger(Key: Text [; DefaultIfNotFound: Boolean]) value := GetDecimal(Key: Text [; DefaultIfNotFound: Boolean]) value := GetOption(Key: Text [; DefaultIfNotFound: Boolean]) value := GetDateTime(Key: Text [; DefaultIfNotFound: Boolean]) value := GetDate(Key: Text [; DefaultIfNotFound: Boolean]) value := GetTime(Key: Text [; DefaultIfNotFound: Boolean]) value := GetDuration(Key: Text [; DefaultIfNotFound: Boolean]) value := GetText(Key: Text [; DefaultIfNotFound: Boolean]) value := GetArray(Key: Text [; DefaultIfNotFound: Boolean]) value := GetObject(Key: Text [; DefaultIfNotFound: Boolean])

For JsonArray instances, use:

value := GetBoolean(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetByte(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetChar(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetInteger(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetBigInteger(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetDecimal(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetOption(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetDateTime(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetDate(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetTime(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetDuration(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetText(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetArray(Index: Integer [; DefaultIfNotFound: Boolean]) value := GetObject(Index: Integer [; DefaultIfNtFound: Boolean])