Example 1: Search nodes by tag name

MAIN
  DEFINE nl om.NodeList 
  DEFINE r, n om.DomNode 
  DEFINE i INTEGER

  LET r = ui.Interface.getRootNode()
  LET nl = r.selectByTagName("Form")

  FOR i=1 to nl.getLength()
    LET n = nl.item(i)
    DISPLAY n.getAttribute("name")
  END FOR

END MAIN