id_thesaurus, 'fr_FR', $id_rech_theme);
if ($res_a) {
$categid_a = $res_a;
} else {
$categid_a = create_categ_z3950($id_rech_theme, $libelle_final, strip_empty_words($libelle_final));
}
// récup des sous-categ en cascade sous $a
$categ_parent = $categid_a ;
for ($x=0 ; $x < count($info_606_x[$a]) ; $x++) {
$res_x = categories::searchLibelle(addslashes(trim($info_606_x[$a][$x])), $thes->id_thesaurus, 'fr_FR', $categ_parent);
if ($res_x) {
$categ_parent = $res_x;
} else {
$categ_parent = create_categ_z3950($categ_parent, trim($info_606_x[$a][$x]), strip_empty_words($info_606_x[$a][$x]));
}
} // fin récup des $x en cascade sous l'id de la catégorie 606$a
if ($categ_parent != $id_rech_theme) {
$categ_retour[]['categ_id'] = $categ_parent ;
}
// récup des categ géo à loger sous la categ géo principale
$categ_parent = $id_rech_geo ;
for ($y=0 ; $y < count($info_606_y[$a]) ; $y++) {
$res_y = categories::searchLibelle(addslashes(trim($info_606_y[$a][$y])), $thes->id_thesaurus, 'fr_FR', $categ_parent);
if ($res_y) {
$categ_parent = $res_y;
} else {
$categ_parent = create_categ_z3950($categ_parent, trim($info_606_y[$a][$y]), strip_empty_words($info_606_y[$a][$y]));
}
} // fin récup des $y en cascade sous l'id de la catégorie principale thème géo
if ($categ_parent != $id_rech_geo) {
$categ_retour[]['categ_id'] = $categ_parent ;
}
// récup des categ chrono à loger sous la categ chrono principale
$categ_parent = $id_rech_chrono ;
for ($z=0 ; $z < count($info_606_z[$a]) ; $z++) {
$res_z = categories::searchLibelle(addslashes(trim($info_606_z[$a][$z])), $thes->id_thesaurus, 'fr_FR', $categ_parent);
if ($res_z) {
$categ_parent = $res_z;
} else {
$categ_parent = create_categ_z3950($categ_parent, trim($info_606_z[$a][$z]), strip_empty_words($info_606_z[$a][$z]));
}
} // fin récup des $z en cascade sous l'id de la catégorie principale thème chrono
if ($categ_parent != $id_rech_chrono) {
$categ_retour[]['categ_id'] = $categ_parent ;
}
}
// DEBUG echo ""; print_r($categ_retour) ; echo "
"; exit ;
return $categ_retour ;
}
function create_categ_z3950($num_parent, $libelle, $index) {
global $thes;
$n = new noeuds();
$n->num_thesaurus = $thes->id_thesaurus;
$n->num_parent = $num_parent;
$n->save();
$c = new categories($n->id_noeud, 'fr_FR');
$c->libelle_categorie = $libelle;
$c->index_categorie = $index;
$c->save();
return $n->id_noeud;
}