xquery update를 사용하여 노드 내부의 텍스트를 자식 노드로 변환하는 방법은 무엇입니까?

Question

내가 가진 노드가 자식 노드에 text 및 child node 변환 텍스트가 포함 된 경우 의미 모든 노드가이 문서를 변환하는 방법

<root> 
    <first> 
    First Level 
    <second> 
     second level 
     <third> 
     Third Level 
     </third> 
    </second> 
    <second2> 
     another second level 
    </second2> 
    </first> 
</root> 

같은 XML 문서는 XQuery 업데이트를 사용 (의이 childtext 말을하자)

<root> 
    <first> 
    <childtext>First Level</childtext> 
    <second> 
     <childtext>second level</childtext> 
     <third> 
     Third Level 
     </third> 
    </second> 
    <second2> 
     another second level 
    </second2> 
    </first> 
</root> 

그리고 여기 내가 뭘하려 :

let $a := 
<root> 
    <first> 
    First Level 
    <second> 
     second level 
     <third> 
     Third Level 
     </third> 
    </second> 
    <second2> 
     another second level 
    </second2> 
    </first> 
</root> 
return 
copy $i := $a 
modify (
    for $x in $i/descendant-or-self::* 
    return (
    if($x/text() and exists($x/*)) then (
     insert node <childtext> 
     {$x/text()} 
     </childtext> as first into $x 
     (: here should be some code to delete the text only:) 
    ) else() 
) 
) 
return $i 

형제 노드가있는 텍스트를 삭제할 수 없습니다.

Answer 1

요소를 바꾸려면 새 요소를 삽입하고 이전 요소를 삭제하는 대신 replace 구문을 사용하면됩니다. 나에게 훨씬 간단 같다 :

copy $i := $a 
modify (
    for $x in $i/descendant-or-self::* 
    return (
    if($x/text() and exists($x/*)) then (
     if(count($x/text())=1) then (
     replace node $x/text() with <child> {$x/text()}</child> 
    ) else (
     for $j at $pos in 1 to count($x/text()) 
     return 
     replace node $x/text()[$pos] with <child>{$x/text()[$pos]}</child> 

    ) 


    ) else() 
) 
) 
return $i 

다시 한번 감사 :

copy $i := $a 
modify (
    for $x in $i/descendant-or-self::*[exists(*)]/text() 
    return replace node $x with <childtext>{$x}</childtext> 
) 
return $i 

Answer 2

수정 된 솔루션은 여기 @dirkk에서입니다.