Hi Paul,
thanks for this snippet!
Have you already seen the built-in min/max functions?
max((1,2,3)), min((1,2,3))
Might save both, some bytes and milliseconds, neglectable but
nevertheless. :-)
Best from Konstanz
Michael
On 15 Aug 2014, at 22:02, Paul Swennenhuis wrote:
Hi all,
Triggered by a thread in this forum I decided to make a paged()
function that adds paging information to a node-set.
It does so by wrapping the node-set in an root element - with a name
of your choice - with attributes for total number of nodes,
start-index requested page-size, actual page-size and end-index.
The last function argument lets you select whether or not to output a
paged node-set or just wrap the node-set in a root element.
It's not very spectacular but it may be of use if you want to use
BaseX for paged results or endless scrolling.
Comments are appreciated.
The module with the paged() function:
-------------------------------------
module namespace lib = "My Library";
(:
lib:paged adds paging information to a node-set
in order to enable paged results for a web-app
Will return a node with the name as specified in $nodeName
along with total number of nodes ($total), start-index ($start),
requested page-size ($num), actual page-size ($displayed)
and end-index ($end) as attributes, followed by the subsequence of the
node-set
Collection MUST be a node-set (i.e. must NOT have a root element)
If $doPaged argument is false(), only the root node with the original
collection is returned
The parameter makes it easier to do a non-conditional call of the
function on a node-set
:)
declare function lib:paged ($collection, $nodeName, $start, $pageSize,
$doPaged) {
let $total := count($collection)
let $min := lib:max(lib:min($pageSize,lib:min($total,$total - $start +
1)),0)
return
element {$nodeName} {
if ($doPaged) then (
attribute total {$total},
attribute start {$start},
attribute pageSize {$pageSize},
attribute actualPageSize {$min},
attribute end {$start + $min - 1},
subsequence($collection, $start, $pageSize)
)
else
$collection
}
};
(: Return smallest of two numbers :)
declare function lib:min($a,$b) {
if ($a < $b) then $a else $b
};
(: Return largest of two numbers :)
declare function lib:max($a,$b) {
if ($a > $b) then $a else $b
};
------------------------------------
Usage example:
-----------------------------------
import module namespace lib="My Library" at "library.xqy";
lib:paged(collection("Facts")//city, 'cities', 500, 300, true())
------------------------------------
Paul
