1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
import schema namespace ipo="http://www.example.com/IPO";
(: insert-start :)
declare variable $input-context external;
(: insert-end :)
declare function local:deadbeat( $b as element(billTo, ipo:USAddress) )
as xs:boolean
{
$b/name = doc("http://www.usa-deadbeats.com/current")/deadbeats/row/name
};
for $p in $input-context//element(ipo:purchaseOrder)
where $p/@orderDate = date("2004-12-01")
and local:deadbeat( $p/element(billTo) )
return <warning>{ $p/billTo/name, "is a known deadbeat!" }</warning>
|
