Oxygen XML Forum

Code: Select all

declare updating function 

   upsert($e as element(), 

          $an as xs:QName, 

          $av as xs:anyAtomicType) 

   {

   let $ea := $e/attribute()[fn:node-name(.) = $an]

   return

      if (fn:empty($ea))

      then insert node attribute {$an} {$av} into $e

      else replace value of node $ea with $av

   }

Code: Select all

let $source := doc('juicers.xml')

let $images := doc('juicer-images.xml')



return 

   for $i in $source//juicer return

          copy $j := $i

          modify 

             replace node $j/image with

                  element {'image'} 

                    {

                       for $j in $images//image[@id eq $j/@id]/* return

                           element {$j/name()} {data($j)}

                    }

          return $j