function fetchTermDown($tema_id) { $sql = SQLverTerminosE($tema_id); while ($array = mysqli_fetch_array($sql[datos])) { $result["result"][$array[id_tema]] = array("term_id" => $array[id_tema], "string" => $array[tema], "relation_type_id" => $array[t_relacion], "hasMoreDown" => $array[id_te] ? 1 : 0); } return $result; }
function fetchTermDown($tema_id) { $sql = SQLverTerminosE($tema_id); while ($array = $sql->FetchRow()) { $result["result"][$array[id_tema]] = array("term_id" => $array[id_tema], "string" => $array[tema], "isMetaTerm" => $array[isMetaTerm], "lang" => $array[idioma], "relation_type_id" => $array[t_relacion], "relation_type" => "NT", "relation_code" => $array[rr_code], "relation_label" => $array[rr_value], "hasMoreDown" => $array[id_te] ? 1 : 0); } return $result; }
function HTMLverTE($tema_id, $i_profundidad, $i = "") { global $CFG; $sql = SQLverTerminosE($tema_id); $rows = '<ul id="masTE' . $tema_id . '" style="display: none">'; //Contador de profundidad de TE desde la raíz $i_profundidad = ++$i_profundidad; //Contador de profundidad de TE desde el TE base $i = ++$i; while ($array = mysqli_fetch_array($sql[datos])) { if ($array[id_te]) { if ($i < CFG_MAX_TREE_DEEP) { $link_next = ' [<a href="javascript:expand(\'' . $array[id_tema] . '\')" title="' . LABEL_verDetalle . ' ' . $array[tema] . ' (' . TE_termino . ')" ><span id ="expandTE' . $array[id_tema] . '">+</span><span id ="contraeTE' . $array[id_tema] . '" style="display: none">~</span></a>]'; $link_next .= HTMLverTE($array[id_tema], $i_profundidad, $i); } else { $link_next = ' [<a title="' . LABEL_verDetalle . TE_termino . ' ' . $array[tema] . '" href="index.php?tema=' . $array[id_tema] . '">+</a>]'; } } else { $link_next = ''; } $rows .= '<li><acronym title="' . TE_termino . '" lang="' . LANG . '">' . TE_acronimo . $i_profundidad . '</acronym> '; $rows .= ' <a title="' . LABEL_verDetalle . ' ' . $array[tema] . ' (' . TE_termino . ')" href="index.php?tema=' . $array[id_tema] . '&/' . string2url($array[tema]) . '">' . $array[tema] . '</a>' . $link_next . '</li>'; } $rows .= '</ul>'; return $rows; }
function do_jsonld($tema_id) { global $CFG; $ARRAYjson_relations = array("skos:narrower" => array(), "skos:broader" => array(), "skos:altLabel" => array(), "skos:hiddenLabel" => array(), "skos:related" => array()); $_URI_BASE_ID = $CFG["_URI_BASE_ID"] ? $CFG["_URI_BASE_ID"] : $_SESSION["CFGURL"]; /* Tomar URL por default * Para que utilice URLs navegables: * $_URI_SEPARATOR_ID = ($CFG["_URI_SEPARATOR_ID"]) ? $CFG["_URI_SEPARATOR_ID"] : '?tema='; * Para que utilice URLs Skos core */ $_URI_SEPARATOR_ID = $CFG["_URI_SEPARATOR_ID"] ? $CFG["_URI_SEPARATOR_ID"] : 'xml.php?skosTema='; $datosTermino = ARRAYverDatosTermino($tema_id); if (!is_numeric($datosTermino["tema_id"])) { return null; } $SQLTerminosE = SQLverTerminosE($tema_id); while ($datosTerminosE = $SQLTerminosE->FetchRow()) { array_push($ARRAYjson_relations["skos:narrower"], $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosE[id_tema]); } $SQLterminosRelacionados = SQLverTerminoRelaciones($tema_id); while ($datosTerminosRelacionados = $SQLterminosRelacionados->FetchRow()) { if ($datosTerminosRelacionados[t_relacion] == '2') { // TR array_push($ARRAYjson_relations["skos:related"], $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosRelacionados[tema_id]); } if ($datosTerminosRelacionados[t_relacion] == '3') { // TG array_push($ARRAYjson_relations["skos:broader"], $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosRelacionados[tema_id]); } if ($datosTerminosRelacionados[t_relacion] == '4') { // UF //HiddenLabel if (in_array($datosTerminosRelacionados[rr_code], $CFG["HIDDEN_EQ"])) { array_push($ARRAYjson_relations["skos:hiddenLabel"], array("language" => $_SESSION["CFGIdioma"], "value" => $datosTerminosRelacionados[tema])); } else { array_push($ARRAYjson_relations["skos:altLabel"], array("language" => $_SESSION["CFGIdioma"], "value" => $datosTerminosRelacionados[tema])); } } } $SQLtargetTerms = SQLtargetTerms($tema_id); $ARRAYjson_map = array(); while ($datosTargetTerms = $SQLtargetTerms->FetchRow()) { $map_label = in_array(strtolower($datosTargetTerms[tvocab_tag]), array('exact', 'close', 'related', 'partial', 'broad', 'narrow')) ? strtolower($datosTargetTerms[tvocab_tag]) : 'exact'; $skos_tag = 'skos:' . $map_label . 'Match'; $ARRAYjson_map["{$skos_tag}"][] = array("@id" => $datosTargetTerms[tterm_url], "@type" => "skos:Concept", "skos:prefLabel" => array("@language" => $datosTargetTerms[tvocab_lang], "@value=" => $datosTargetTerms[tterm_string])); } $SQLURI2term = SQLURIxterm($tema_id); $ARRAYjson_URI = array(); while ($datosURI2term = $SQLURI2term->FetchRow()) { if (in_array(strtolower($datosURI2term[uri_code]), array('exactmatch', 'closematch', 'relatedmatch', 'partialmatch', 'broadmatch', 'narrowmatch'))) { $ARRAYjson_URI["{$datosURI2term['uri_code']}"][] = array("@id" => $datosURI2term[uri], "@type" => "skos:Concept"); } } $ARRAYjson_notes = array(); for ($iNota = 0; $iNota < count($datosTermino[notas]); ++$iNota) { if ($datosTermino[notas][$iNota][id]) { switch ($datosTermino[notas][$iNota][tipoNota]) { case 'NH': $ARRAYjson_notes["skos:historyNote"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'NA': $ARRAYjson_notes["skos:scopeNote"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'DF': $ARRAYjson_notes["skos:definition"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'ED': $ARRAYjson_notes["skos:editorialNote"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'EX': $ARRAYjson_notes["skos:example"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'CH': $ARRAYjson_notes["skos:changeNote"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; case 'NB': $ARRAYjson_notes["skos:note"][] = array("@lang" => $datosTermino[notas][$iNota][lang_nota], "@value" => html2txt($datosTermino[notas][$iNota][nota])); break; } } } $ARRAY_json = array("@context" => array("dc" => "http://purl.org/dc/elements/1.1/", "skos" => "http://www.w3.org/2004/02/skos/core#", "skos:broader" => array("@type" => "@id"), "skos:inScheme" => array("@type" => "@id"), "skos:related" => array("@type" => "@id"), "skos:narrower" => array("@type" => "@id"), "skos:hasTopConcept" => array("@type" => "@id"), "skos:topConceptOf" => array("@type" => "@id")), "@id" => $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTermino[idTema], "@type" => "skos:Concept", "skos:prefLabel" => array("@language" => $_SESSION["CFGIdioma"], "@value=" => xmlentities($datosTermino[titTema])), "skos:inScheme" => $_URI_BASE_ID, "dct:created" => $datosTermino[cuando]); if ($datosTermino[cuando_final]) { $ARRAY_json = array_merge($ARRAY_json, array("dct:modified" => $datosTermino[cuando_final])); } //Use or not term code / notation tag in Skos if ($CFG["_USE_CODE"] == '1' && strlen($datosTermino[code]) > 0) { $ARRAY_json = array_merge($ARRAY_json, array("skos:notation" => $datosTermino[code])); } //Unset empty array if (count($ARRAYjson_relations["skos:related"]) == 0) { unset($ARRAYjson_relations["skos:related"]); } if (count($ARRAYjson_relations["skos:broader"]) == 0) { unset($ARRAYjson_relations["skos:broader"]); } if (count($ARRAYjson_relations["skos:narrower"]) == 0) { unset($ARRAYjson_relations["skos:narrower"]); } if (count($ARRAYjson_relations["skos:altLabel"]) == 0) { unset($ARRAYjson_relations["skos:altLabel"]); } if (count($ARRAYjson_relations["skos:hiddenLabel"]) == 0) { unset($ARRAYjson_relations["skos:hiddenLabel"]); } return json_encode(array_merge($ARRAY_json, $ARRAYjson_notes, $ARRAYjson_relations, $ARRAYjson_map, $ARRAYjson_URI)); }
function TXTverTE($tema_id, $i_profundidad) { global $CFG; $i_profundidad = ++$i_profundidad; $sql = SQLverTerminosE($tema_id); //Contador de profundidad de TE desde la raíz while ($array = mysqli_fetch_array($sql[datos])) { //calculo de sangría $sangria = ''; for ($i = "1"; $i <= "{$i_profundidad}"; ++$i) { $sangria .= ' .' . "\t"; } //si tiene TEs if ($array[id_te]) { $txt .= $sangria . $array[tema] . "\r\n"; $txt .= TXTverTE($array[id_tema], $i_profundidad); } else { $txt .= $sangria . $array[tema] . "\r\n"; } } return $txt; }
function do_nodo_BS8723($tema_id) { global $CFG; $_URI_BASE_ID = $CFG["_URI_BASE_ID"] ? $CFG["_URI_BASE_ID"] : $_SESSION["CFGURL"]; /* Tomar URL por default * Para que utilice URLs navegables: * $_URI_SEPARATOR_ID = ($CFG["_URI_SEPARATOR_ID"]) ? $CFG["_URI_SEPARATOR_ID"] : '?tema='; * Para que utilice URLs Skos core */ $_URI_SEPARATOR_ID = $CFG["_URI_SEPARATOR_ID"] ? $CFG["_URI_SEPARATOR_ID"] : 'xml.php?skosTema='; //Buscar datos del termino $datosTermino = ARRAYverDatosTermino($tema_id); //Términos específicos (NT) del término $SQLTerminosE = SQLverTerminosE($tema_id); //Otras relaciones del término (UF,RT, BT) del término $SQLterminosRelacionados = SQLverTerminoRelaciones($tema_id); //Nodos de NT while ($datosTerminosE = mysqli_fetch_array($SQLTerminosE[datos])) { $xmlnodosNT .= '<HasHierRelConcept Role="NT">' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosE[id_tema] . '</HasHierRelConcept>'; } //Nodos RT, BT y UF while ($datosTerminosRelacionados = mysqli_fetch_array($SQLterminosRelacionados[datos])) { switch ($datosTerminosRelacionados[t_relacion]) { case '2': //RT $xmlnodosRT .= '<HasRelatedConcept Role="RT">' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosRelacionados[id] . '</HasRelatedConcept>'; break; case '3': //BT $xmlnodosBT .= '<HasHierRelConcept Role="BT">' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosRelacionados[id] . '</HasHierRelConcept>'; break; case '4': //UF $xmlnodosUF .= '<NonPreferredTerm dc:identifier="' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTerminosRelacionados[id] . '" xml:lang="' . $_SESSION["CFGIdioma"] . '">'; $xmlnodosUF .= ' <LexicalValue>' . xmlentities($datosTerminosRelacionados[tema]) . '</LexicalValue>'; $xmlnodosUF .= ' <dcterms:created>' . $datoTerminosRelacionados[t1_cuando] . '</dcterms:created>'; $xmlnodosUF .= ' <USE>' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datoTerminosRelacionados[tema_id] . '</USE>'; $xmlnodosUF .= '</NonPreferredTerm>'; break; } } //Notas for ($iNota = 0; $iNota < count($datosTermino[notas]); ++$iNota) { if ($datosTermino[notas][$iNota][id]) { switch ($datosTermino[notas][$iNota][tipoNota]) { case 'NH': //HistoryNote $xmlnodosNotas .= '<HistoryNote xml:lang="' . $datosTermino[notas][$iNota][lang_nota] . '">'; $xmlnodosNotas .= ' <LexicalValue>' . xmlentities($datosTermino[notas][$iNota][nota], true) . '</LexicalValue>'; $xmlnodosNotas .= '</HistoryNote>'; break; case 'NA': //ScopeNote $xmlnodosNotas .= '<ScopeNote xml:lang="' . $datosTermino[notas][$iNota][lang_nota] . '">'; $xmlnodosNotas .= ' <LexicalValue>' . xmlentities($datosTermino[notas][$iNota][nota], true) . '</LexicalValue>'; $xmlnodosNotas .= '</ScopeNote>'; break; } } } //Nodo del término $xmlnodoTermino .= '<PreferredTerm dc:identifier="' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTermino[idTema] . '" xml:lang="' . $_SESSION["CFGIdioma"] . '">'; $xmlnodoTermino .= ' <LexicalValue>' . xmlentities($datosTermino[titTema]) . '</LexicalValue>'; $xmlnodoTermino .= ' <dcterms:created>' . $datosTermino[cuando] . '</dcterms:created>'; if ($datosTermino[cuando_final]) { $xmlnodoTermino .= ' <dcterms:modified>' . $datosTermino[cuando_final] . '</dcterms:modified>'; } $xmlnodoTermino .= '</PreferredTerm>'; //Armado del nodo del concepto $xmlnodo = '<ThesaurusConcept dc:identifier="' . $_URI_BASE_ID . $_URI_SEPARATOR_ID . $datosTermino[idTema] . '">'; $xmlnodo .= ' <dcterms:created>' . $datosTermino[cuando] . '</dcterms:created>'; if ($datosTermino[cuando_final]) { $xmlnodo .= ' <dcterms:modified>' . $datosTermino[cuando_final] . '</dcterms:modified>'; } $xmlnodo .= $xmlnodoTermino; $xmlnodo .= $xmlnodosNotas; $xmlnodo .= $xmlnodosUF; $xmlnodo .= $xmlnodosBT; $xmlnodo .= $xmlnodosNT; $xmlnodo .= $xmlnodosRT; $xmlnodo .= '</ThesaurusConcept>'; return $xmlnodo; }
function getData4jtree($term_id = 0) { global $CFG; if (is_numeric($term_id)) { # display narrower terms $sql = SQLverTerminosE($term_id); } elseif ($term_id == 'TT') { # display top terms $sql = SQLverTopTerm(); } else { return; } $arrayResponse = array(); while ($array = $sql->FetchRow()) { //there are NT? $load_on_demand = $array["id_te"] == 0 ? false : true; //is top terms $load_on_demand = $term_id == 0 ? true : $load_on_demand; if ($_SESSION[$_SESSION["CFGURL"]][ssuser_id] && $CFG["_USE_CODE"] == '1') { $pre_link = ' ' . $array["code"] . ' '; } elseif ($CFG["_SHOW_CODE"] == '1') { $pre_link = ' ' . $array["code"] . ' '; } else { $pre_link = ' '; } $css_class_MT = $array["isMetaTerm"] == 1 ? ' class="metaTerm" ' : ''; $link = '<h3 class="TT">' . $pre_link . '<a ' . $css_class_MT . ' title="' . LABEL_verDetalle . $array[tema] . '" href="index.php?tema=' . $array[tema_id] . '">' . $array[tema] . '</a></h3>'; array_push($arrayResponse, array("label" => "{$link}", "id" => "{$array['tema_id']}", "load_on_demand" => $load_on_demand)); } return json_encode($arrayResponse); }