Sub DoJson
Private root As Map
Private data As Map
Private languages As List
Private pivot As Map
Private JS As String
root.Initialize
data.Initialize
data.Put("id", 61)
data.Put("user_id", 61)
data.Put("profession_id", Null)
data.Put("ocupation", Null)
data.Put("province_id", Null)
data.Put("work_hour_id", Null)
data.Put("working_term_id", Null)
data.Put("computing_level", 0)
data.Put("salary", 0)
data.Put("travel", 0)
data.Put("gender", Null)
data.Put("created_at", "2020-03-04 19,43,06")
data.Put("updated_at", "2020-03-04 19,43,06")
languages.Initialize
pivot.Initialize
languages.Add(CreateMap("id": 1, "name": "Inglés", "state": "Active", "created_at": Null, "updated_at": Null, "pivot" : CreateMap("candidate_id": 61, "language_id": 1)))
languages.Add(CreateMap("id": 2, "name": "Frances", "state": "Active", "created_at": Null, "updated_at": Null, "pivot" : CreateMap("candidate_id": 61, "language_id": 2)))
data.Put("languages",languages)
root.Put("data",data)
Private JSONGenerator As JSONGenerator
JSONGenerator.Initialize(root)
Log("MiJSON")
JS = JSONGenerator.ToPrettyString(2)
Log(JS)
End Sub