attribute value change

[Mukul Gandhi]

There is a slight improvement, to the solution I posted earlier. The
earlier solution, didn't check that "id" attribute belonged to "chap"
element (I think, this was mentioned in your requirement).

The solution below has this improvement.

declare namespace local = "http://example.com/functions";

declare function local:copy($element as element()) {
  element {node-name($element)}
    {$element/@*[../self::chap and not(name() eq 'id')], if
(local-name($element) eq 'chap') then
	                                  (attribute id {
concat($element/preceding::bn, '_', $element/@id) }) else (),
     for $child in $element/node()
        return if ($child instance of element())
          then local:copy($child)
          else $child
    }
};

local:copy(doc('test.xml')/*)

On Fri, Feb 5, 2010 at 12:26 PM, Mukul Gandhi <http://x-query.com/mailman/listinfo/talk> wrote:
> The following seems to work:
>
> declare namespace local = "http://example.com/functions";
>
> declare function local:copy($element as element()) {
>  element {node-name($element)}
>    {$element/@*[not(name() eq 'id')], if (local-name($element) eq 'chap') then
>                                                     (attribute id {
> concat($element/preceding::bn, '_',            $element/@id) }) else
> (),
>     for $child in $element/node()
>        return if ($child instance of element())
>          then local:copy($child)
>          else $child
>    }
> };
>
> local:copy(doc('test.xml')/*)



-- 
Regards,
Mukul Gandhi