prestonmcgowan / 1.0-ml--utility-functions Goto Github PK

(: Create sample document :)
declare namespace ns1 = "some:name:space";
declare namespace ns2 = "some:name:space2";
xdmp:document-insert("/sample.xml", element ns1:root{ element ns1:e{ element ns1:x{"replace me"}}})
;
(: Print out the before :)
element before { fn:doc("/sample.xml") }
;
(: Run the tests :)
import module namespace utilities = "https://github.com/prestonmcgowan/1.0-ml--utility-functions" at "/app/lib/1.0-ml--utility-functions.xqy";
declare namespace ns1 = "some:name:space";
declare namespace ns2 = "some:name:space2";
let $doc := fn:doc("/sample.xml")
return (
  (: Replace Element :)
  utilities:node-insert-or-replace-child($doc, ("ns1", "some:name:space1", "ns2", "some:name:space2"), "/ns1:root/ns1:e", element ns1:x{ "yz" }),
  (: Insert Element :)
  utilities:node-insert-or-replace-child($doc, ("ns1", "some:name:space1", "ns2", "some:name:space2"), "/ns1:root/ns1:e", element ns2:x{ "yz" })
)
;
(: Print out the after :)
element after { fn:doc("/sample.xml") }