// $Id: make_sug.inc.php,v 1.13 2010-01-07 16:10:41 kantin Exp $ if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) { die("no access"); } //URL de retour du form de création/modification de suggestion $back_url = "onClick=\"document.location='./catalog.php?'\""; if ($id_notice && $action == 'modif') { $back_url = " onClick=\"history.go(-1);\" "; } // page de switch création suggestion require_once $base_path . '/acquisition/suggestions/func_suggestions.inc.php'; require_once $class_path . '/suggestions_map.class.php'; if ($acquisition_sugg_display) { require_once $base_path . '/acquisition/suggestions/' . $acquisition_sugg_display; } else { require_once $base_path . '/acquisition/suggestions/suggestions_display.inc.php'; } $sug_map = new suggestions_map(); //Traitement des actions print "<h1>" . htmlentities($msg['acquisition_sug_do'], ENT_QUOTES, $charset) . "</h1>"; switch ($action) { case 'modif': $update_action = "./catalog.php?categ=sug&action=update&id_bibli=" . $id_bibli . "&id_sug=" . $id_sug . "&id_notice={$id_notice}"; show_form_sug($update_action); break; case 'update': update_sug(); $back_url = "document.location='./catalog.php?'"; print "<script type='text/javascript'>alert('" . $msg['acquisition_sugg_ok'] . "');{$back_url}</script>"; break; }
} else { include $base_path . '/acquisition/suggestions/notice_form.inc.php'; } break; case 'upd_notice': include $base_path . '/acquisition/suggestions/update_notice.inc.php'; $update_action = "./acquisition.php?categ=sug&action=update&id_bibli=" . $id_bibli . "&id_sug=" . $id_sug; show_form_sug($update_action); break; case 'del_pj': $explnum_doc = new explnum_doc($id_pj); $explnum_doc->delete(); $req = "delete from explnum_doc_sugg where num_explnum_doc='" . $id_pj . "'"; mysql_query($req, $dbh); $del_url = "./acquisition.php?categ=sug&action=update&id_bibli=" . $id_bibli . "&id_sug=" . $id_sug; show_form_sug($del_url); break; case 'empr_sug': break; case 'record_uni': //Recherche de la fonction auxiliaire d'intégration if ($z3950_import_modele) { if (file_exists($base_path . "/catalog/z3950/" . $z3950_import_modele)) { require_once $base_path . "/catalog/z3950/" . $z3950_import_modele; } else { error_message("", $msg["admin_error_file_import_modele_z3950"], 1, "./admin.php?categ=param"); exit; } } else { require_once $base_path . "/catalog/z3950/func_other.inc.php"; }