In showHomeScreen(), try replacing the call to displayCategoryPosterScreen(kid) with displayshowDetailScreen(kid, 0).
You will need to modify displayshowDetailScreen() slightly, as it is no longer called in the context of the poster screeen....
Function displayShowDetailScreen(category as Object, showIndex as Integer) As Integer
if validateParam(category, "roAssociativeArray", "displayShowDetailScreen") = false return -1
shows = getShowsForCategoryItem(category, showIndex)
screen = preShowDetailScreen(category.Title, category.kids[showIndex].Title)
showIndex = showDetailScreen(screen, shows, showIndex)
return showIndex
End Function