XQuery - Query theocom documents for edition for works by John Calvin

edition-statements.xqy

xquery version "1.0-ml";

(: 5/29/11 Query theocom documents for edition for works by John Calvin :)


declare namespace ia = "http://digital.library.ptsem.edu/ia";
declare namespace m = "http://www.loc.gov/MARC21/slim";

for $doc in xdmp:directory("/ia-xml/8/", "infinity")
let $marc := $doc/ia:doc/ia:metadata/ia:marc/m:record
let $name := $doc/ia:doc/ia:metadata/ia:name
let $sortTitle := $doc/ia:doc/ia:metadata/ia:sortTitle
let $edition := $marc/m:datafield[@tag = "250"]
let $newNodeEdition := <edition xmlns="http://digital.library.ptsem.edu/ia">{ fn:normalize-space($edition) }</edition>
let $newLine := text {"&#10;"}
let $indent := text {"        "}
where $name = "Calvin, Jean, 1509-1564." and $edition
return let $empty := xdmp:node-insert-after($sortTitle, $newLine)
       let $empty := xdmp:node-insert-after($sortTitle, $indent)
       let $empty := xdmp:node-insert-after($sortTitle, $newNodeEdition)
       return ()