XQuery - Use cts:uris to find irregular call numbers in 090 fields in embedded MARCXML

find-call-numbers.xq

xquery version "1.0-ml";

(: 2/23/11 Use MarkLogic function cts:uris to find irregular call numbers in the 090 field of MARCXML :)

declare namespace ia = "http://my.server/my.directory";
declare namespace m = "http://www.loc.gov/MARC21/slim";


let $uris := cts:uris((), "ascending")
for $uri in $uris[fn:position() = (50001 to fn:last())]
return for $doc in fn:doc($uri)
       let $marc := $doc/ia:doc/ia:metadata/ia:marc/m:record
       let $marcCode := $marc/m:datafield[@tag = "040"]/m:subfield[@code = "a"]
       let $callNums := $marc/m:datafield[@tag = "090"]     
       let $callNumInd := $callNums[@ind2 = "9"]
       for $callNum in $callNums
       where $marcCode = "OTU" and $callNumInd
       return $callNum