element title
      ; putting the content into this variable since we 
  will use this content twice
      local stream titlecontent ; creating a variable of 
  type stream
      open titlecontent as buffer
      put titlecontent "%c"
      close titlecontent
  
      ; existing code
      output "<H2 style='margin-top:40pt'>"
      using attribute id of parent
             do when attribute id is specified
             output "<A name='%v(id)'></A>"
             done
  output "%g(titlecontent)</H2>%n"
  
  ; referent
  reopen toc as referent "toc"
      using attribute id of parent
      put toc "<LI><A HREF='%v(id).htm'>%g(titlecontent)</A></LI>"
      close toc