zip-uri-list.xqy

xquery version "1.0-ml";

declare variable $URIS as xs:string+ := (cts:uris());

declare function local:create-parts-manifest($items) {
  <parts xmlns="xdmp:zip">
  {
      for $item in $items
      return element part {$item}
  }
  </parts>
};

declare function local:create-sequence-of-docs($items) {
(
  for $item in $items 
  return doc($item)
)
};

(: Module main :)

let $zip := xdmp:zip-create(
  local:create-parts-manifest($URIS),
  local:create-sequence-of-docs($URIS)
)
return
xdmp:save("e:/myzip.zip", $zip,
  <options xmlns="xdmp:save">
    <encoding>utf8</encoding>
  </options>)