Dim mapGlobal As Map
mapGlobal.Initialize
mapGlobal.Put("Key1", "Value1")
mapGlobal.Put("Key2", "Value2")
mapGlobal.Put("Key3", "Value3")
mapGlobal.Put("Key4", "Value4")
Dim map2 As Map=mapGlobal
Log(map2.Remove("Key1"))
Log("mapGlobal: ")
For i=0 To mapGlobal.Size-1
Log(mapGlobal.GetKeyAt(i)&", "&mapGlobal.GetValueAt(i))
Next
Log("map2: ")
For i=0 To map2.Size-1
Log(map2.GetKeyAt(i)&", "&map2.GetValueAt(i))
Next