我想更新xml数据库(Marklogic)中的XML文档。我有xml作为输入,并希望替换目标xml中存在的每个节点。
如果某个节点不存在,那么添加它会很棒,但这可能是另一项任务。
数据库中的我的XML:
<user>
<username>username</username>
<firstname>firstname</firstname>
<lastname>lastname</lastname>
<email>email@mail.de</email>
<comment>comment</comment>
</user>
$ user_xml的值:
<user>
<firstname>new firstname</firstname>
<lastname>new lastname</lastname>
</user>
到目前为止我的功能:
declare function update-user (
$username as xs:string,
$user_xml as node()) as empty-sequence()
{
let $uri := user-uri($username)
return
for $node in $user_xml/user
return
xdmp:node-replace(fn:doc($uri)/user/fn:node-name($node), $node)
};
首先,我无法迭代$user_xml/user
。如果我尝试迭代$user_xml
,我会得到异常
arg1不是node()
类型
但也许这是错误的做法?
是否有人可能有示例代码如何执行此操作?
答案 0 :(得分:5)
我必须自己回答:
declare function update-user (
$username as xs:string,
$user_xml as node()) as empty-sequence()
{
let $uri := user-uri($username)
return
for $node in $user_xml/*
let $target := fn:doc($uri)/user/*[fn:name() = fn:name($node)]
return
if($target) then
xdmp:node-replace($target, $node)
else
xdmp:node-insert-child(fn:doc($uri)/user, $node)
};
但也许有人对/user/*[fn:name() = fn:name($node)]
有更好的解决方案?