Example 1: Displaying SAX attributes of an XML node

FUNCTION displayAttributes( a )
   DEFINE a om.SaxAttributes 
   DEFINE i, m INTEGER
   LET m = a.getLength()
   FOR i=1 to m
      DISPLAY a.getName(i) || "=[" || a.getValueByIndex(i) || "]"
   END FOR
END FUNCTION