// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+
// $Id: categ_delete.inc.php,v 1.18 2015-06-10 07:14:04 jpermanne Exp $
if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) {
die("no access");
}
require_once "{$class_path}/category.class.php";
require_once "{$class_path}/noeuds.class.php";
require_once $class_path . "/thesaurus.class.php";
require_once $class_path . "/synchro_rdf.class.php";
require_once $class_path . "/vedette/vedette_composee.class.php";
require_once $class_path . "/index_concept.class.php";
if (noeuds::hasChild($id)) {
error_message($msg[321], $msg[322], 1, "./autorites.php?categ=categories&id={$id}&sub=categ_form&parent={$parent}");
exit;
} elseif (count(noeuds::listTargetsExceptOrphans($id))) {
error_message($msg[321], $msg[thes_suppr_impossible_renvoi_voir], 1, "./autorites.php?categ=categories&id={$id}&sub=categ_form&parent={$parent}");
exit;
} elseif (noeuds::isProtected($id)) {
error_message($msg[321], $msg[thes_suppr_impossible_protege], 1, "./autorites.php?categ=categories&id={$id}&sub=categ_form&parent={$parent}");
exit;
} elseif (count(vedette_composee::get_vedettes_built_with_element($id, "category"))) {
// Cette autorité est utilisée dans des vedettes composées, impossible de la supprimer
error_message($msg[321], $msg["vedette_dont_del_autority"], 1);
exit;
} elseif (noeuds::isUsedInNotices($id)) {
if ($forcage == 1) {
$tab = unserialize(urldecode($ret_url));
foreach ($tab->GET as $key => $val) {
$GLOBALS[$key] = $val;
}
