content:     sub init()
        m.top.functionName = "getcontent"
      end sub
  
      sub getcontent()
        content = createObject("roSGNode", "ContentNode")
  
        contentxml = createObject("roXMLElement")
  
        readInternet = createObject("roUrlTransfer")
        readInternet.setUrl(m.top.contenturi)
        contentxml.parse(readInternet.GetToString())
  
        if contentxml.getName()="Content"
          for each item in contentxml.GetNamedElements("item")
            itemcontent = content.createChild("ContentNode")
            itemcontent.setFields(item.getAttributes())
          end for
        end if
  
        m.top.content = content
      end sub