****************************
*          XQuery          *
****************************

(Titles and author first name names of books whose title contains one of the author's first names)

for $b in doc("BookstoreQ.xml")/Bookstore/Book
where some $fn in $b/Authors/Author/First_Name
                    satisfies contains($b/Title, $fn)
return <Book>
             { $b/Title }
             { $b/Authors/Author/First_Name }
          </Book>



(Now include only first names in book title)

for $b in doc("BookstoreQ.xml")/Bookstore/Book
where some $fn in $b/Authors/Author/First_Name
                    satisfies contains($b/Title, $fn)
return <Book>
             { $b/Title }
             { for $fn in $b/Authors/Author/First_Name
                where contains($b/Title, $fn) return $fn }
          </Book>



(Books where every author's first name includes "J")

for $b in doc("BookstoreQ.xml")/Bookstore/Book
where every $fn in $b/Authors/Author/First_Name
            satisfies contains($fn, "J")
return $b



(This query finds the average book price)

<Average>
  { Let $plist := doc("BookstoreQ.xml")/Bookstore/Book/@Price
     return avg($plist) }
</Average>



(Books whose price is below average)

let $a := avg(doc("BookstoreQ.xml")/Bookstore/Book/@Price)
for $b in doc("BookstoreQ.xml")/Bookstore/Book
where $b/@Price < $a
return <Book>
         { $b/Title }
         <Price> { $b/data(@Price) } </Price>
       </Book>



(Order the book price)

for $b in doc("BookstoreQ.xml")/Bookstore/Book
order by xs:int($b/@Price)
return <Book>
         { $b/Title }
         <Price> { $b/data(@Price) } </Price>
       </Book>



(All last names - contains repeats)

for $n in doc("BookstoreQ.xml")//Last_Name
return $n



(All last names - without repeats)

for $n in distinct-values(doc("BookstoreQ.xml")//Last_Name)
return <Last_Name> { $n } </Last_Name>



(return pairs of books that share a author's last name)

for $b1 in doc("BookstoreQ.xml")/Bookstore/Book
for $b2 in doc("BookstoreQ.xml")/Bookstore/Book
where $b1/Authors/Author/Last_Name = $b2/Authors/Author/Last_Name
      and $b1/Title < $b2/Title
return <BookPair>
         <Title1> { data($b1/Title) } </Title1>
         <Title2> { data($b2/Title) } </Title2>
       </BookPair>



(Invert data: Authors with the books they've written)

<InvertedBookstore>
  { for $ln in distinct-values(doc("BookstoreQ.xml")//Author/Last_Name)
    for $fn in distinct-values(doc("BookstoreQ.xml")//Author[
                               Last_Name=$ln]/First_Name)
  return
    <Author>
      <First_Name> { $fn } </First_Name>
      <Last_Name> { $ln } </Last_Name>
      { for $b in doc("BookstoreQ.xml")/Bookstore/Book[
                          Authors/Author/Last_Name = $ln]
        return <Book>
                 < $b/@ISBN } { $b/@Price } { $b/Title }
               </Book>
    </Author>
</InvertedBookstore>




****************************
*          XQuery          *
****************************

<xsl:stylesheet version="2.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:output method="xml" indent="yes" omit-xml-declaration="yes" />
...
<xsl:stylesheet>



(Book and magazine titles, relabled)

<xsl:template match="Book">
  <BookTitle> <xsl:value-of select="Title" /> </BookTitle>
</xsl:template>

<xsl:template match="Book">
  <MagazineTitle> <xsl:value-of select="Title" /> </MagazineTitle>
</xsl:template>



(All books costing less than $90)

<xsl:template match="Book[@Price &lt; 90]">
  <xsl:copy-of select="." />
</xsl>

<xsl:template match="text()" />



(All books costing less than $90 and all the magazines)

<xsl:template match="Book[@Price &lt; 90]">
  <xsl:copy-of select="." />
</xsl:template>

<xsl:template match="Book" />

<xsl:template match="Magazine">
  <xsl:copy-of select="." />
</xsl:template>



(copy entire data)

<xsl:template match="/">
  <xsl:copy-of select="." />
</xsl:template>



(a more completed way of copying entire data, we further change ISBN to a sub-element, and convert Author to an attribute)

<xsl:template match="*|@*|text()">
  <xsl:copy>
    <xsl:apply-templates select="*|@*|text()" />
  </xsl:copy>
</xsl:template>

<xsl:template match="@ISBN">
  <ISBN> <xsl:value-of select="." /> </ISBN>
</xsl:template>

<xsl:template match="Author">
  <Author LN="{Last_Name}" FN="{First_Name}" />
</xsl:template>



(HTML Table of books costing less than $90, sorted by price)

<xsl:template match="/">
  <html>
    <table border="1">
      <th>Book</th>
      <th>Cost</th>
      <xsl:for-each select="Bookstore/Book">
      <xsl:sort select="@Price" />
        <xsl:if test="@Price &lt; 90">
          <tr>
            <td><i><xsl:value-of select="Title" /></i></td>
            <td><xsl:value-of select="@Price" /></td>
          </tr>
        </xsl:if>
      </xsl:for-each>
    </table>
  </html>
</xsl:template>



(Expunge 'Jennifer', change 'Widom' to 'Ms. Widom')

<xsl:template match="*|@*|text()">
  <xsl:copy>
    <xsl:apply-templates select="*|@*|text()" />
  </xsl:copy>
</xsl:template>

<xsl:template match="First_Name[data(.) = 'Jennifer']">
</xsl:template>

<xsl:template match="Last_Name[data(.) = 'Widom']">
  <Name>Ms. Widom</Name>
</xsl:template>



(Same thing as the previous one)

<xsl:template match="*|@*|text()">
  <xsl:copy>
    <xsl:apply-templates select="*|@*|text()" />
  </xsl:copy>
</xsl:template>

<xsl:template match="Author[First_Name = 'Jennifer']">
  <Author><Name>Ms. Widom</Name></Author>
</xsl:template>