Dim ListOfMaps As List
ListOfMaps.Initialize
Dim m As Map
m.Initialize
m.Put("Id", Main.codpratica)
m.Put("cognome", edittext1.text)
m.Put("nome", edittext2.Text)
m.Put("tipo",edittext3.text)
m.Put("tag",edittext4.Text)
m.Put("datacreazione", "Date('now')")
m.Put("livello",Main.livello)
m.Put("utente",Main.userx)
ListOfMaps.Add(m)
DBUtils.InsertMaps(Main.SQL, "pratiche", ListOfMaps)