content: sub showGridScreen()
      m.GridScreen = CreateObject("roSGNode", "GridScreen")
      m.GridScreen.ObserveField("rowItemSelected", "OnGridScreenItemSelected")
      showScreen(m.GridScreen)
  end sub
  
  sub OnGridScreenItemSelected(event as Object)
      grid = event.GetRoSGNode()
      m.selectedIndex = event.GetData()
      rowContent = grid.content.GetChild(m.selectedIndex[0])
      ShowDetailsScreen(rowContent, m.selectedIndex[1])
  end sub