# File lib/edi4r/rexml.rb, line 96
    def Interchange.parse_xml( hnd ) # Handle to REXML document
      unless hnd.is_a? REXML::Document or hnd.is_a? IO or hnd.is_a? String
        raise "Unsupported object type: #{hnd.class}"
      end
      hnd = REXML::Document.new( hnd ) if hnd.is_a? IO or hnd.is_a? String

      key = hnd.root.attributes['standard_key']
      raise "Unsupported standard key: #{key}" if key == 'generic'
      EDI::const_get(key)::const_get('Interchange').parse_xml( hnd )
#      class_sym = (key+'Interchange').intern
#      EDI::const_get(class_sym).parse_xml( hnd )
    end