# File lib/edi4r/rexml.rb, line 153
    def Message.parse_xml(p, xmsg)
      _header    = xmsg.elements["Header/Segment"]
      _trailer   = xmsg.elements["Trailer/Segment"]

      msg = p.new_message( Segment.parse_xml( p, _header ) )
      msg.header  = Segment.parse_xml( msg, _header  ) if _header

      xmsg.elements.each('descendant::Segment') do |xel|
        next if xel.parent.name =~ /Header|Trailer/
        msg.add Segment.parse_xml(msg, xel)
      end
      msg.trailer = Segment.parse_xml( msg, _trailer ) if _trailer

      msg
    end