for $reg in /Cuentas/Documento/control
let $url := concat("C:/prueba_xquery/",encode-for-uri($reg/@cedula), ".xml"),
$cedula := $reg/@cedula,
$salida :=
{$reg}
{/Cuentas/Documento/encabezado[position() = $reg/position()]}
{/Cuentas/Documento/saldoAFavor[position() = $reg/position()]}
{/Cuentas/Documento/cadivi[position() = $reg/position()]}
{/Cuentas/Documento/detalleCuenta[position() = $reg/position()]}
return
( ddtek:serialize-to-url($salida,$url,"omit-xml-declaration=no,indent=yes"))
(: Stylus Studio meta-information - (c) 2004-2009. Progress Software Corporation. All rights reserved.
:)