JsonObject:GetNames

JsonObject:GetNames( )

#include "protheus.ch"

user function GNExemplo()
  local oJson
  local ret
  local names
  local i

  oJson := JsonObject():new()

  //como o JsonObject ainda nao foi populado será retornado um vetor vazio
  names := oJson:GetNames()

  ret := oJson:fromJson('{"character":"Joaquim", "json":{"Joao":22, "Joana":33}, "array":[4,12,5], "numeric":23, "logic":false, "nil":null}')

  if ValType(ret) == "U"
    Conout("JsonObject populado com sucesso")
  else
    Conout("Falha ao popular JsonObject. Erro: " + ret)
  endif

  names := oJson:GetNames()

  for i := 1 to len(names)
    conout(names[i])
  next i

  /*
  Será impresso:
  character
  numeric
  logic
  array
  nil
  json
  */
return