function do_VDEX($tema_id)
{
    global $CFG;
    $_URI_BASE_ID = $CFG["_URI_BASE_ID"] ? $CFG["_URI_BASE_ID"] : $_SESSION["CFGURL"];
    $time_start = time();
    @set_time_limit(900);
    header('content-type: text/xml');
    $row .= '<?xml version="1.0" encoding="' . $CFG["_CHAR_ENCODE"] . '"?>
	<vdex xmlns="http://www.imsglobal.org/xsd/imsvdex_v1p0"  orderSignificant="false" language="' . $_SESSION["CFGIdioma"] . '">
	<vocabIdentifier>' . $_URI_BASE_ID . '</vocabIdentifier>';
    $rowTerminos = doTerminosVDEX($tema_id);
    $rowRelaciones = doRelacionesVDEX($tema_id);
    $rowFinal = '</vdex>';
    $rows = $row . $rowTerminos . $rowRelaciones . $rowFinal;
    echo $rows;
}
function doTotalVDEX($tipoEnvio = 'file')
{
    $time_start = time();
    @set_time_limit(900);
    #enviar como archivo
    global $CFG;
    $_URI_BASE_ID = $CFG["_URI_BASE_ID"] ? $CFG["_URI_BASE_ID"] : $_SESSION["CFGURL"];
    header('content-type: text/xml');
    $row .= '<?xml version="1.0" encoding="' . $CFG["_CHAR_ENCODE"] . '"?>
			<vdex xmlns="http://www.imsglobal.org/xsd/imsvdex_v1p0" orderSignificant="false" language="' . $_SESSION["CFGIdioma"] . '">
    		<vocabIdentifier>' . $_URI_BASE_ID . '</vocabIdentifier>';
    $rowTerminos = doTerminosVDEX($tema_id);
    $rowRelaciones = doRelacionesVDEX($tema_id);
    $rowFinal = '</vdex>';
    $rows = $row . $rowTerminos . $rowRelaciones . $rowFinal;
    $filname = string2url($_SESSION[CFGTitulo]) . '.vdex';
    sendFile("{$rows}", "{$filname}");
}