Example 2: Creating a SAX attributes object

MAIN
   DEFINE a, c om.SaxAttributes,
          i, m INTEGER
   LET a = om.SaxAttributes.create()
   CALL a.addAttribute("name","Jo")
   CALL a.addAttribute("birth","2008-12-20")
   DISPLAY a.getValue("birth")
   LET c = om.SaxAttributes.copy( a )
   LET m = a.getLength()
   DISPLAY "Len = ", m
   FOR i=1 TO m
       DISPLAY i, ": ", a.getName(i),
                  " = ", a.getValueByIndex(i)
   END FOR
   CALL a.removeAttribute("birth")
   CALL c.setAttributes(a)
   CALL a.clear()
   DISPLAY c.getLength()
END MAIN