$alert_sound_list[] = "information"; } $empr = new emprunteur($id_empr, $erreur_affichage, FALSE, 1); $affichage = $empr->fiche; } else { if ($sub == "pret_annulation" && $id_expl) { // récupérer la stat insérée pour la supprimer ! $query = "select pret_arc_id from pret "; $query .= "where pret_idexpl = '" . $id_expl . "' "; $result = pmb_mysql_query($query, $dbh); $stat_id = pmb_mysql_fetch_object($result); $result = pmb_mysql_query("delete from pret_archive where arc_id='" . $stat_id->pret_arc_id . "' ", $dbh); audit::delete_audit(AUDIT_PRET, $stat_id->pret_arc_id); // supprimer les valeurs de champs personnalisés $p_perso = new pret_parametres_perso("pret"); $p_perso->delete_values($stat_id->pret_arc_id); // supprimer le prêt annulé $query = "delete from pret "; $query .= "where pret_idexpl = '" . $id_expl . "' "; $result = pmb_mysql_query($query, $dbh); $erreur_affichage = "<hr />\n\t\t\t\t\t<div class='row'>\n\t\t\t\t\t<div class='colonne10'><img src='./images/info.png' /></div>\n\t\t\t\t\t<div class='colonne-suite'><span class='erreur'>" . str_replace('!!cb_expl!!', $cb_doc, $msg[607]) . "</span></div>\n\t\t\t\t\t</div><br />"; $alert_sound_list[] = "information"; $empr = new emprunteur($id_empr, $erreur_affichage, FALSE, 1); $affichage = $empr->fiche; } else { $script_magnetique = "\n<script language='javascript' type='text/javascript'>\nvar requete = null;\n\nfunction creerRequette(){\n\tif(window.XMLHttpRequest) // Firefox\n\t\trequete = new XMLHttpRequest();\n\telse if(window.ActiveXObject) // Internet Explorer\n \t\trequete = new ActiveXObject('Microsoft.XMLHTTP');\n\telse { // XMLHttpRequest non supporté par le navigateur\n \t\talert('Votre navigateur ne supporte pas les objets XMLHTTPRequest...');\n \treturn;\n\t}\n}\n\nfunction magnetise(commande){\n\tcreerRequette();\n\tif(netscape.security.PrivilegeManager)netscape.security.PrivilegeManager.enablePrivilege('UniversalBrowserRead');\n\trequete.open('GET', 'http://localhost:30000/?send_value='+commande+'&command=Send', false);\n\trequete.send(null);\n\tif(requete.readyState != 4) alert('Requête antivol non effectuée !');\n}\n\n"; //Si il y a un emprunteur if ($id_empr) { // Vérification id, on dispose d'un id pour l'emprunteur, donc on est en situation de prêt if (check_empr($id_empr)) { $empr_temp = new emprunteur($id_empr, '', FALSE, 0);
function del_pret($id_expl) { // le lien MySQL global $dbh; global $msg; // récupérer la stat insérée pour la supprimer ! $query = "select pret_arc_id ,pret_temp from pret where pret_idexpl = '" . $id_expl . "' "; $result = pmb_mysql_query($query, $dbh); $stat_id = pmb_mysql_fetch_object($result); if ($stat_id->pret_temp) { $result = pmb_mysql_query("delete from pret_archive where arc_id='" . $stat_id->pret_arc_id . "' ", $dbh); audit::delete_audit(AUDIT_PRET, $stat_id->pret_arc_id); // supprimer les valeurs de champs personnalisés $p_perso = new pret_parametres_perso("pret"); $p_perso->delete_values($stat_id->pret_arc_id); // supprimer le prêt annulé $query = "delete from pret where pret_idexpl = '" . $id_expl . "' "; $result = pmb_mysql_query($query, $dbh); } $array[0] = $this; $buf_xml = array2xml($array); return $buf_xml; }