function add_pret($id_empr, $id_expl, $cb_doc) { // le lien MySQL global $dbh; global $msg; global $pmb_quotas_avances; /* on prépare la date de début*/ $pret_date = time(); /* on cherche la durée du prêt */ if ($pmb_quotas_avances) { //Initialisation de la classe $qt = new quota("LEND_TIME_QUOTA"); $struct["READER"] = $id_empr; $struct["EXPL"] = $id_expl; $duree_pret = $qt->get_quota_value($struct); if ($duree_pret == -1) { $duree_pret = 0; } } else { $query = "SELECT duree_pret"; $query .= " FROM exemplaires, docs_type"; $query .= " WHERE expl_id='" . $id_expl; $query .= "' and idtyp_doc=expl_typdoc LIMIT 1"; $result = @pmb_mysql_query($query, $dbh) or die("can't SELECT exemplaires " . $query); $expl_properties = pmb_mysql_fetch_object($result); $duree_pret = $expl_properties->duree_pret; } // calculer la date de retour prévue $pret_retour = $pret_date + 3600 * 24 * $duree_pret; // insérer le prêt $query = "INSERT INTO pret SET "; $query .= "pret_idempr = '" . $id_empr . "', "; $query .= "pret_idexpl = '" . $id_expl . "', "; $query .= "pret_date = sysdate(), "; $query .= "pret_retour = '" . date("Y-m-d", $pret_retour) . "', "; $query .= "retour_initial = '" . date("Y-m-d", $pret_retour) . "' "; $result = @pmb_mysql_query($query, $dbh) or die(pmb_mysql_error() . "<br />can't INSERT into pret" . $query); // insérer la trace en stat, récupérer l'id et le mettre dans la table des prêts pour la maj ultérieure $stat_avant_pret = pret_construit_infos_stat($id_expl); $stat_id = stat_stuff($stat_avant_pret); $query = "update pret SET pret_arc_id='{$stat_id}' where "; $query .= "pret_idempr = '" . $id_empr . "' and "; $query .= "pret_idexpl = '" . $id_expl . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update pret for stats " . $query); audit::insert_creation(AUDIT_PRET, $stat_id); //enregistrer les champs perso pret $p_perso = new pret_parametres_perso("pret"); $p_perso->rec_fields_perso($stat_id); $query = "update exemplaires SET "; $query .= "last_loan_date = sysdate() "; $query .= "where expl_id= '" . $id_expl . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update last_loan_date in exemplaires : " . $query); $query = "update empr SET "; $query .= "last_loan_date = sysdate() "; $query .= "where id_empr= '" . $id_empr . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update last_loan_date in empr : " . $query); }
function get_display_custom_fields($id_empr, $id_expl) { $p_perso = new pret_parametres_perso("pret"); if (!$p_perso->no_special_fields) { $query_custom = "select pret_arc_id from pret\n\t\t\twhere pret_idempr='" . $id_empr . "' and pret_idexpl='" . $id_expl . "'"; $result_custom = pmb_mysql_query($query_custom); if ($result_custom && pmb_mysql_result($result_custom, 0, 0)) { $pret_arc_id = pmb_mysql_result($result_custom, 0, 0); $perso_ = $p_perso->show_fields($pret_arc_id); $perso = ""; if (count($perso_["FIELDS"])) { for ($i = 0; $i < count($perso_["FIELDS"]); $i++) { $perso .= "<div class='row'>" . $perso_["FIELDS"][$i]["TITRE"]; $perso .= $perso_["FIELDS"][$i]["AFF"] . "</div>"; } $perso . "<br />"; } return $perso; } } }
function do_fiche() { global $empr_tmpl, $empr_pret_allowed; global $msg, $charset; global $groupID; global $biblio_email; global $pmb_lecteurs_localises; global $pmb_gestion_abonnement, $pmb_gestion_financiere, $pmb_gestion_tarif_prets, $pmb_gestion_amende; global $finance_blocage_abt, $finance_blocage_amende, $finance_blocage_pret, $pmb_blocage_retard, $pmb_blocage_retard_force; global $force_finance; global $pmb_resa_planning; global $dbh; global $pmb_blocage_retard, $pmb_blocage_coef, $pmb_blocage_max, $pmb_blocage_delai; global $empr_fiche_depliee; global $pmb_opac_view_activate; global $pmb_sur_location_activate; global $alert_sound_list; // l'utilisateur veut-il les sons d'alerte global $pmb_short_loan_management; global $pmb_location_reservation, $deflt2docs_location; global $id_expl; $this->fiche = $empr_tmpl; $this->fiche = str_replace('!!cb!!', $this->cb, $this->fiche); $this->fiche = str_replace('!!nom!!', pmb_strtoupper($this->nom), $this->fiche); $this->fiche = str_replace('!!prenom!!', $this->prenom, $this->fiche); $this->fiche = str_replace('!!image_caddie_empr!!', $this->img_ajout_empr_caddie, $this->fiche); $this->fiche = str_replace('!!info_nb_pret!!', $this->nb_pret, $this->fiche); $this->fiche = str_replace('!!info_nb_resa!!', $this->nb_reservations, $this->fiche); if ($pmb_resa_planning) { $this->fiche = str_replace('!!info_resa_planning!!', $msg[empr_nb_resa_planning] . ":" . $this->nb_previsions, $this->fiche); } else { $this->fiche = str_replace('!!info_resa_planning!!', "", $this->fiche); } $this->fiche = str_replace('!!info_authldap!!', $this->ldap, $this->fiche); $this->fiche = str_replace('!!id!!', $this->id, $this->fiche); $this->fiche = str_replace('!!adr1!!', $this->adr1, $this->fiche); $this->fiche = str_replace('!!adr2!!', $this->adr2, $this->fiche); $this->fiche = str_replace('!!tel1!!', $this->tel1, $this->fiche); $this->fiche = str_replace('!!sms!!', $this->sms, $this->fiche); $this->fiche = str_replace('!!tel2!!', $this->tel2, $this->fiche); $this->fiche = str_replace('!!cp!!', $this->cp, $this->fiche); $this->fiche = str_replace('!!ville!!', $this->ville, $this->fiche); $this->fiche = str_replace('!!pays!!', $this->pays, $this->fiche); $emails = array(); $email_final = array(); $emails = explode(';', $this->mail); for ($i = 0; $i < count($emails); $i++) { $email_final[] = "<a href='mailto:" . $emails[$i] . "'>" . $emails[$i] . "</a>"; } $this->fiche = str_replace('!!mail_all!!', implode(" ", $email_final), $this->fiche); $this->fiche = str_replace('!!prof!!', $this->prof, $this->fiche); $this->fiche = str_replace('!!date!!', $this->birth, $this->fiche); $this->fiche = str_replace('!!categ!!', $this->cat_l, $this->fiche); $this->fiche = str_replace('!!codestat!!', $this->cstat_l, $this->fiche); $this->fiche = str_replace('!!adhesion!!', $this->aff_date_adhesion, $this->fiche); $this->fiche = str_replace('!!expiration!!', $this->aff_date_expiration, $this->fiche); $this->fiche = str_replace('!!last_loan_date!!', $this->aff_last_loan_date, $this->fiche); $this->fiche = str_replace('!!perso!!', $this->perso, $this->fiche); $this->fiche = str_replace('!!header_format!!', $this->header_format, $this->fiche); $this->fiche = str_replace('!!empr_login!!', $this->login, $this->fiche); if ($this->pwd != password::gen_hash("", $this->id)) { $this->fiche = str_replace('!!empr_pwd!!', "<i><strong>" . $msg["empr_pwd_opac_affected"] . "</strong></i>", $this->fiche); } else { $this->fiche = str_replace('!!empr_pwd!!', "", $this->fiche); } $this->fiche = str_replace('!!comptes!!', $this->compte, $this->fiche); $this->fiche = str_replace('!!empr_statut_libelle!!', $this->empr_statut_libelle, $this->fiche); $this->fiche = str_replace('!!empr_picture!!', $this->picture_empr($this->cb), $this->fiche); if ($empr_fiche_depliee == "1") { $this->fiche = str_replace('!!depliee!!', " startOpen=\"Yes\"", $this->fiche); } else { $this->fiche = str_replace('!!depliee!!', "", $this->fiche); } if ($pmb_lecteurs_localises) { $this->fiche = str_replace("<!-- !!localisation!! -->", "<div class='row'><strong>{$msg['empr_location']} : </strong>" . $this->empr_location_l . "</div>", $this->fiche); $resume_localisation = $this->empr_location_l; } if ($pmb_opac_view_activate) { } //Groupes if (count($this->groupes)) { $this->fiche = str_replace('!!groupes!!', "<strong>" . $msg[groupes_empr] . " : </strong>" . implode(" / ", $this->groupes) . "\n", $this->fiche); $resume_groupe = implode(" / ", $this->groupes); } else { $this->fiche = str_replace('!!groupes!!', " ", $this->fiche); } // Ajout d'infos complémentaires lorsque la fiche lecteur est repliée par défaut $empr_resume = ''; if ($empr_fiche_depliee == "0") { //localisation if ($resume_localisation) { $empr_resume = $resume_localisation . " - "; } //categ if ($this->cat_l) { $empr_resume .= $this->cat_l . " - "; } //groupe if ($resume_groupe) { $empr_resume .= $resume_groupe . " - "; } } $this->fiche = str_replace('!!empr_resume!!', $empr_resume, $this->fiche); //Pret autorisé ou non ? $pret_ok = 0; if ($pmb_gestion_financiere && $force_finance == 0) { $message_pret = ""; if ($pmb_gestion_abonnement) { //Vérification du compte $cpte_abt_id = comptes::get_compte_id_from_empr($this->id, 1); if ($cpte_abt_id) { $cpte_abt = new comptes($cpte_abt_id); $solde_neg = $cpte_abt->get_solde(); if ($finance_blocage_abt && $solde_neg * 1 < 0) { if ($pret_ok < 2) { $pret_ok = $finance_blocage_abt; } $message_pret .= sprintf($msg["finance_pret_solde_abt"], comptes::format($solde_neg)) . "<br />"; $this->blocage_abt = $finance_blocage_abt; } if ($solde_neg * 1 < 0) { $this->compte_abt = abs($solde_neg); } } } if ($pmb_gestion_tarif_prets) { //Vérification du compte $cpte_pret_id = comptes::get_compte_id_from_empr($this->id, 3); if ($cpte_pret_id) { $cpte_pret = new comptes($cpte_pret_id); $solde_neg = $cpte_pret->get_solde(); if ($finance_blocage_pret && $solde_neg * 1 < 0) { if ($pret_ok < 2) { $pret_ok = $finance_blocage_pret; } $message_pret .= sprintf($msg["finance_pret_solde_pret"], comptes::format($solde_neg)) . "<br />"; $this->blocage_tarifs = $finance_blocage_pret; } if ($solde_neg * 1 < 0) { $this->compte_tarifs = abs($solde_neg); } } } if ($pmb_gestion_amende) { //Vérification du compte $cpte_amende_id = comptes::get_compte_id_from_empr($this->id, 2); if ($cpte_amende_id) { $cpte_amende = new comptes($cpte_amende_id); $solde_neg = $cpte_amende->get_solde(); $amende = new amende($this->id, true); $amende_neg = $amende->get_total_amendes(); if ($finance_blocage_amende && ($solde_neg * 1 < 0 || $amende_neg * 1)) { $this->blocage_amendes = $finance_blocage_amende; if ($pret_ok < 2) { $pret_ok = $finance_blocage_amende; } if ($solde_neg * 1 < 0) { $message_pret .= sprintf($msg["finance_pret_solde_amende"], comptes::format($solde_neg)) . "<br />"; } if ($amende_neg * 1) { $message_pret .= sprintf($msg["finance_pret_amende_en_cours_blocage"], comptes::format($amende_neg)) . "<br />"; } } if ($solde_neg * 1 < 0) { $this->compte_amendes = abs($solde_neg); } if ($amende_neg * 1) { $this->amendes_en_cours = abs($amende_neg); } } } } if ($pmb_blocage_retard && $force_finance == 0) { if ($this->date_blocage && $this->blocage_active) { $this->blocage_retard = $pmb_blocage_retard_force; //pas de forçage possible if ($pmb_blocage_retard_force == 2) { $message_pret .= sprintf($msg["blocage_retard_pret"], formatdate($this->date_blocage)) . "<br />"; } else { $message_pret .= sprintf($msg["blocage_retard_pret"], formatdate($this->date_blocage)) . " <input type='button' value='" . $msg["blocage_params"] . "' class='bouton' onClick=\"openPopUp('./circ/blocage.php?id_empr=" . $this->id . "','blocage_params',400,200,-2,-2,'toolbar=no, dependent=yes,resizable=yes');\"/><br />"; } if ($pret_ok < 2) { $pret_ok = $pmb_blocage_retard_force; } } } // Ajout de l'impossibilité d'effectuer un prêt si un document n'est pas rendu // alors qu'il a dépassé le délai de blocage (NG72) . if ($pmb_blocage_retard && $force_finance == 0) { // Recherche la date de retour du document la plus petite, soit le plus gros retard potentiel $requete = "select MIN(pret_retour)as pret_retour"; $requete .= " from pret p"; $requete .= " where p.pret_idempr=" . $this->id; $result = pmb_mysql_query($requete, $dbh); while ($bloca = pmb_mysql_fetch_object($result)) { if ($bloca->pret_retour) { $pret_retour = $bloca->pret_retour; $date_debut = explode("-", $pret_retour); $ndays = calendar::get_open_days($date_debut[2], $date_debut[1], $date_debut[0], date("d"), date("m"), date("Y")); if ($ndays > $pmb_blocage_delai) { $ndays = $ndays * $pmb_blocage_coef; if ($ndays > $pmb_blocage_max && $pmb_blocage_max != 0) { $ndays = $pmb_blocage_max; } } else { $ndays = 0; } if ($ndays) { // Interdire alors de nouveau pret if ($pret_ok < 2) { $pret_ok = $pmb_blocage_retard_force; } $this->blocage_retard = $pmb_blocage_retard_force; } } } } $p_perso = new pret_parametres_perso("pret"); $pret_arc_id = 0; if ($id_expl) { $query_custom = "select pret_arc_id from pret\n\t\t\t\twhere pret_idempr='" . $this->id . "' and pret_idexpl='" . $id_expl . "'"; $result_custom = pmb_mysql_query($query_custom); if ($result_custom && pmb_mysql_num_rows($result_custom)) { $pret_arc_id = pmb_mysql_result($result_custom, 0, 0); } } $perso_ = $p_perso->show_editable_fields($pret_arc_id); $pretperso_field_tpl = "\n\t\t\t<div class='row'>\n\t\t\t\t<label class='etiquette'>!!titre!! </label>!!comment!!\n\t\t\t</div>\n\t\t\t<div class='row'>\n\t\t\t\t!!aff!!\n\t\t\t</div>"; if (count($perso_['FIELDS'])) { $custom_fields = ""; foreach ($perso_['FIELDS'] as $field) { if ($field['MANDATORY']) { $field_tpl = "<div class='mandatory'>" . $pretperso_field_tpl . "</div>"; } else { $field_tpl = $pretperso_field_tpl; } $field_tpl = str_replace("!!titre!!", $field['TITRE'], $field_tpl); $field_tpl = str_replace("!!aff!!", $field['AFF'], $field_tpl); $field_tpl = str_replace("!!comment!!", $field['COMMENT_DISPLAY'], $field_tpl); $custom_fields .= $field_tpl; } $custom_fields .= $perso_["CHECK_SCRIPTS"]; $empr_pret_allowed = str_replace('<!-- custom_fields -->', $custom_fields, $empr_pret_allowed); } else { $empr_pret_allowed = str_replace('<!-- custom_fields -->', "\n<script>function check_form() { return true; }</script>\n", $empr_pret_allowed); } if (!$pret_ok && $this->allow_loan) { $this->fiche = str_replace("!!empr_case_pret!!", $empr_pret_allowed, $this->fiche); $this->fiche = str_replace('!!id!!', $this->id, $this->fiche); } else { if ($pret_ok == 1 && $this->allow_loan) { $message_pret .= "<input type='button' class='bouton' value=\"" . $msg["finance_pret_force_pret"] . "\" onClick=\"this.form.force_finance.value=1; this.form.submit();\">"; } elseif ($this->allow_loan) { $message_pret .= "<div class='erreur'>" . $msg["finance_pret_bloque"] . "</div>"; } else { $message_pret .= "<div class='erreur'>" . $msg["empr_no_allow_loan"] . "</div>"; } $this->fiche = str_replace("!!empr_case_pret!!", $message_pret, $this->fiche); } $abonnement = ""; if ($pmb_gestion_financiere && $pmb_gestion_abonnement == 2) { if ($this->type_abt) { $requete = "select type_abt_libelle from type_abts where id_type_abt='" . $this->type_abt . "'"; $resultat_type_abt = pmb_mysql_query($requete); if (@pmb_mysql_num_rows($resultat_type_abt)) { $abonnement = pmb_mysql_result($resultat_type_abt, 0, 0); } } } if ($abonnement) { $this->fiche = str_replace("!!abonnement!!", "<div class='row'><strong>" . $msg["finance_type_abt"] . " : </strong>" . htmlentities($abonnement, ENT_QUOTES, $charset) . "</div>\n", $this->fiche); } else { $this->fiche = str_replace("!!abonnement!!", "", $this->fiche); } // message if ($this->empr_msg) { $message_fiche_empr = "\n\t\t\t\t\t<hr />\n\t\t\t\t\t<div class='row'>\n\t\t\t\t\t\t<div class='colonne10'><img src='./images/info.png' /></div>\n\t\t\t\t\t\t<div class='colonne-suite'><span class='erreur'>{$this->empr_msg}</span></div>\n\t\t\t\t\t\t</div><br />"; $alert_sound_list[] = "information"; $this->fiche = str_replace('!!empr_msg!!', $message_fiche_empr, $this->fiche); } else { $this->fiche = str_replace('!!empr_msg!!', "", $this->fiche); } // on distingue les messages de prêts du message sur l'emprunteur $this->fiche = str_replace('!!pret_msg!!', $this->message, $this->fiche); if ($this->adhesion_renouv_proche()) { $message_date_depassee = $msg[empr_date_renouv_proche]; } elseif ($this->adhesion_depassee()) { $message_date_depassee = $msg[empr_date_depassee]; } else { $message_date_depassee = ""; } if ($message_date_depassee) { $alert_sound_list[] = "critique"; } $this->fiche = str_replace('!!empr_date_depassee!!', $message_date_depassee, $this->fiche); if ($this->age_categ_change()) { $message_categ_age_change = $msg[empr_categ_age_change]; } else { $message_categ_age_change = ""; } if ($message_categ_age_change) { $alert_sound_list[] = "information"; } $this->fiche = str_replace('!!empr_categ_age_change!!', $message_categ_age_change, $this->fiche); $group_zone = "<a href='./circ.php'>{$msg['64']}</a>"; if ($groupID) { $group_zone .= " <a href='./circ.php?categ=groups&action=showgroup&groupID={$groupID}'>{$msg['grp_autre_lecteur']}</a>"; } $this->fiche = str_replace('!!group_zone!!', $group_zone, $this->fiche); $fsexe[0] = $msg[128]; $fsexe[1] = $msg[126]; $fsexe[2] = $msg[127]; $this->fiche = str_replace('!!sexe!!', $fsexe[$this->sexe], $this->fiche); // valeur pour les champ hidden du prêt. L'id empr est pris en charge plus haut (voir Eric) $this->fiche = str_replace('!!cb!!', $this->cb, $this->fiche); // traitement liste exemplaires en prêt $this->fiche = str_replace('!!nb_prets_encours!!', $this->nb_pret, $this->fiche); //On affiche le bouton de mail si le destinataire a une adresse mail if ($this->mail) { $mail_click = "onclick=\"if (confirm('" . $msg["mail_pret_confirm"] . "')) { openPopUp('./pdf.php?pdfdoc=mail_liste_pret&id_empr=" . $this->id . "', 'print_PDF', 600, 500, -2, -2, '{$PDF_win_prop}');} return(false) \""; $bouton_mail_liste_pret = "<input type='button' name='maillistedocs' class='bouton' value='{$msg['email']}' {$mail_click} />"; } else { $bouton_mail_liste_pret = ""; } $this->fiche = str_replace("!!mail_liste_pret!!", $bouton_mail_liste_pret, $this->fiche); //Si mail de rappel affecté au responsable du groupe $requete = "select id_groupe,resp_groupe from groupe,empr_groupe where id_groupe=groupe_id and empr_id=" . $this->id . " and resp_groupe and mail_rappel limit 1"; $res = pmb_mysql_query($requete); if (pmb_mysql_num_rows($res) > 0) { $requete = "select id_empr, empr_mail from empr where id_empr='" . pmb_mysql_result($res, 0, 1) . "'"; $result = pmb_mysql_query($requete); $has_mail = pmb_mysql_result($result, 0, 1) ? 1 : 0; } else { $has_mail = $this->mail ? 1 : 0; } //Si retard sur un document, proposer la lettre de retard ou l'email de retard if ($this->retard >= 1) { $imprime_click = "onclick=\"openPopUp('./pdf.php?pdfdoc=lettre_retard&id_empr=" . $this->id . "', 'lettre', 600, 500, -2, -2, 'toolbar=no, dependent=yes, resizable=yes'); return(false) \""; $bouton_lettre_retard = $msg['retard'] . " <input type=\"button\" class=\"bouton\" value=\"" . $msg["lettre_retard"] . "\" " . $imprime_click . ">"; if ($has_mail && $biblio_email) { $mail_click = "onclick=\"if (confirm('" . $msg["mail_retard_confirm"] . "')) { openPopUp('./mail.php?type_mail=mail_retard&id_empr=" . $this->id . "', 'mail', 600, 500, -2,- 2, 'toolbar=no, dependent=yes, resizable=yes, scrollbars=yes');} return(false) \""; $bouton_mail_retard = "<input type=\"button\" class=\"bouton\" value=\"" . $msg["mail_retard"] . "\" " . $mail_click . ">"; } else { $bouton_mail_retard = ""; } } else { $bouton_lettre_retard = ""; $bouton_mail_retard = ""; } $this->fiche = str_replace("!!lettre_retard!!", $bouton_lettre_retard, $this->fiche); $this->fiche = str_replace("!!mail_retard!!", $bouton_mail_retard, $this->fiche); $voir_tout_pret = ""; //separation prets classiques et prets courts $prets_list = array('0' => '', '1' => ''); if (!count($this->prets)) { // dans ce cas, le lecteur n'a rien en prêt $prets_list[0] = "<tr><td colspan='9'>{$msg['650']}</td></tr>"; $prets_list[1] = ''; } else { // constitution du code HTML $vdr = 0; $id_bloc = $id_inpret = ''; $odd_even = 0; // Gestion de limitation de la visualisation de la liste de pret. global $pmb_pret_aff_limitation; global $pmb_pret_aff_nombre; global $see_all_pret; global $current_module; while (list($cle, $valeur) = each($this->prets)) { $id_inpret .= $valeur['id'] . '|'; if ($valeur['pret_retard'] == 1) { $tit_color = "color='RED'"; } else { $tit_color = ""; } //reservations sur la notice ou le bulletin ? $resas = ""; $query_resa = "select count(*) as resas from resa where resa_idnotice=" . $valeur['notice_id'] . " and resa_idbulletin=" . $valeur['bulletin_id'] . " and (resa_cb='')"; if ($pmb_location_reservation) { $query_resa = "select count(*) as resas from resa,empr,resa_loc\n\t\t\t\t\twhere resa_idnotice=" . $valeur['notice_id'] . " and resa_idbulletin=" . $valeur['bulletin_id'] . " and (resa_cb='')\n\t\t\t\t\t\t\t\t\t\tand resa_idempr=id_empr\n\t\t\t\t\t\t\t\t\t\tand empr_location=resa_emprloc and resa_loc='" . $deflt2docs_location . "'\n\t\t\t\t\t"; } $result_resa = pmb_mysql_query($query_resa, $dbh); if ($result_resa && mysql_num_rows($result_resa)) { $qt_resas = pmb_mysql_result($result_resa, 0, 0); if ($qt_resas) { $resas = " <img src='./images/alert.gif' alt='" . addslashes($qt_resas . " " . $msg["reserv_en_cours_doc"]) . "' title='" . addslashes($qt_resas . " " . $msg["reserv_en_cours_doc"]) . "'>"; } } //Affichage des prolongations global $pmb_pret_restriction_prolongation, $pmb_pret_nombre_prolongation, $pmb_utiliser_calendrier; $pret_nombre_prolongation = 0; $forcage_prolongation = TRUE; $duree_prolongation = 0; // Limitation simple du pret if ($pmb_pret_restriction_prolongation == 1) { $pret_nombre_prolongation = $pmb_pret_nombre_prolongation; } elseif ($pmb_pret_restriction_prolongation == 2) { // Limitation du pret par les quotas //Initialisation des quotas pour nombre de prolongations $qt = new quota("PROLONG_NMBR_QUOTA"); //Tableau de passage des paramètres $struct["READER"] = $this->id; $struct["EXPL"] = $valeur['id']; $pret_nombre_prolongation = $qt->get_quota_value($struct); $forcage_prolongation = $qt->get_force_value($struct); //Initialisation des quotas de durée de prolongation $qt = new quota("PROLONG_TIME_QUOTA"); $struct["READER"] = $this->id; $struct["EXPL"] = $valeur['id']; $duree_prolongation = $qt->get_quota_value($struct); } //$forcage_prolongation=FALSE; /* on prépare la date de début*/ $pret_date = $valeur['sql_date_retour']; $rqt_date = "select date_add('" . $pret_date . "', INTERVAL '{$duree_prolongation}' DAY) as date_prolongation "; $resultatdate = pmb_mysql_query($rqt_date); $res = pmb_mysql_fetch_object($resultatdate); $date_prolongation = str_replace('-', "", $res->date_prolongation); if ($pmb_utiliser_calendrier) { $req_date_calendrier = "select date_ouverture from ouvertures where ouvert=1 and num_location='" . $valeur["idlocation"] . "' and DATEDIFF(date_ouverture,'{$date_prolongation}')>=0 order by date_ouverture asc limit 1"; $res_date_calendrier = pmb_mysql_query($req_date_calendrier); if (pmb_mysql_num_rows($res_date_calendrier) > 0) { $date_prolongation = str_replace('-', "", pmb_mysql_result($res_date_calendrier, 0, 0)); } } if ($odd_even == 0) { $pair_impair = "odd"; $odd_even = 1; } else { if ($odd_even == 1) { $pair_impair = "even"; $odd_even = 0; } } $expl_sur_loc = ""; if ($pmb_sur_location_activate) { $expl_sur_loc = "<td><center>" . $valeur["sur_location"] . "</center></td>"; } $tr_javascript = " onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='{$pair_impair}'\""; $prets_list[$valeur['short_loan_flag']] .= "\n\t\t\t\t\t<tr class='{$pair_impair}' {$tr_javascript}>\n\t\t\t\t\t<form class='form-{$current_module}' name=prolong" . $valeur['id'] . " action='circ.php'>\n\t\t\t\t\t\t<td class='empr-expl'><a href='./circ.php?categ=visu_ex&form_cb_expl=" . rawurlencode($valeur['cb']) . "'>\n\t\t\t\t\t\t\t{$valeur['cb']}</a>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td size='70%'>\n\t\t\t\t\t\t\t<font {$tit_color}>" . strip_tags($valeur['libelle']) . "</font>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<center>{$valeur['typdoc']}<br />{$valeur['cote']}</center>\n\t\t\t\t\t\t</td>{$expl_sur_loc}\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<center>{$valeur['location']}<br />{$valeur['section']}</center>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<center>{$valeur['date_pret']}</center>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<center>{$valeur['retour_initial']}</center>\n\t\t\t\t\t\t</td>\n\t\t\t\t\t\t<td>"; if ($pmb_pret_restriction_prolongation == 0) { $prets_list[$valeur['short_loan_flag']] .= "<center>{$valeur['cpt_prolongation']}" . $resas . "</center>"; } else { $prets_list[$valeur['short_loan_flag']] .= "<center>{$valeur['cpt_prolongation']}/{$pret_nombre_prolongation}" . $resas . "</center>"; } $prets_list[$valeur['short_loan_flag']] .= "</td>\n\t\t\t\t\t\t\t<td>\n\t\t\t\t\t\t\t<input type='hidden' name='categ' value='pret'>\n\t\t\t\t\t\t\t<input type='hidden' name='sub' value='pret_prolongation'>\n\t\t\t\t\t\t\t<input type='hidden' name='form_cb' value='{$this->cb}'>\n\t\t\t\t\t\t\t<input type='hidden' name='cb_doc' value='{$valeur['cb']}'>\n\t\t\t\t\t\t\t<input type='hidden' name='id_doc' value='{$valeur['id']}'>\n\t\t\t\t\t\t\t<input type='hidden' name='date_retour' value=\"\">"; $vdr = max($vdr, $date_prolongation); // $vdr=max($vdr,$valeur['org_ret_date']); if ($forcage_prolongation == FALSE && $valeur['cpt_prolongation'] >= $pret_nombre_prolongation) { $prets_list[$valeur['short_loan_flag']] .= "<center>{$valeur['date_retour']}</center>" . "</td>" . "</form><td> </td></tr>"; } else { $date_clic = " onClick=\"openPopUp('./select.php?what=calendrier"; $date_clic .= "&caller=prolong" . $valeur['id']; $date_clic .= "&date_caller={$date_prolongation}"; $date_clic .= "¶m1=date_retour¶m2=date_retour_lib&auto_submit=YES',"; $date_clic .= " 'date_retour', 250, 300, -2, -2,"; $date_clic .= " 'toolbar=no, dependent=yes, resizable=yes')\""; $prets_list[$valeur['short_loan_flag']] .= "\n\t\t\t\t\t\t<center><input type='button' name='date_retour_lib' class='bouton' value='{$valeur['date_retour']}' " . $date_clic . " sorttable_customkey='{$valeur['date_retour']}' /></center>\n\t\t\t\t\t\t</td><td><center>"; $prets_list[$valeur['short_loan_flag']] .= "<input type='checkbox' id='prol_" . $valeur['id'] . "' name='cbox_prol' onClick='check_cb(this.form)'/>"; $prets_list[$valeur['short_loan_flag']] .= "</center></td>\n\t\t\t\t\t\t</form></tr>"; } // Gestion de limitation de la visualisation de la liste de pret. if ($pmb_pret_aff_limitation == 1 && $pmb_pret_aff_nombre && !$see_all_pret && $cle + 1 >= $pmb_pret_aff_nombre) { break; } } // Gestion de limitation de la visualisation de la liste de pret. if ($pmb_pret_aff_limitation == 1 && $pmb_pret_aff_nombre && !$see_all_pret && $this->nb_pret > $pmb_pret_aff_nombre) { // le bouton 'Voir tous les prets' n'a pas été posté et on arrive à la limite imposée //Affichage du bouton 'Voir tous les prets' $tout_voir_click = "onclick=\"document.location='circ.php?categ=pret&see_all_pret=1&form_cb=" . $this->cb . "'\""; $voir_tout_pret = "<input type='button' name='see_all_pret' class='bouton' value='" . $msg['pret_liste_voir_tout'] . "' {$tout_voir_click}/>"; } } /* 1ere option */ //$prets_list = $prets_list[0].(($pmb_short_loan_management==1 && count($prets_list[1]))?("<tr ><th colspan='9'>".$msg['short_loans']."</th></tr>".$prets_list[1]):''); /* 2eme option*/ $id_inpret = substr($id_inpret, 0, -1); $date_format_SQL = substr($vdr, 0, 4) . '-' . substr($vdr, 4, 2) . '-' . substr($vdr, 6, 2); $svdr = formatdate($date_format_SQL); $date_prol = " onClick=\"openPopUp('./select.php?what=calendrier"; $date_prol .= "&caller=prolong_bloc"; $date_prol .= "&date_caller={$vdr}"; $date_prol .= "¶m1=date_retbloc¶m2=date_retbloc_lib&auto_submit=YES',"; $date_prol .= " 'date_retbloc',"; $date_prol .= " 250,260,-2,-2,'toolbar=no, dependent=yes, resizable=yes')\""; $butt_prol = "\n\t\t\t<input type='button' name='date_retbloc_lib' class='bouton' value='{$svdr}' " . $date_prol . " />\n\t\t\t<input type='hidden' name='categ' value='pret'>\n\t\t\t<input type='hidden' name='sub' value='pret_prolongation_bloc'>\n\t\t\t<input type='hidden' name='form_cb' value='{$this->cb}'>\n\t\t\t<input type='hidden' name='date_retbloc' value=\"\">\n\t\t\t<input type='hidden' name='id_bloc' value=\"\">"; $this->fiche = str_replace('!!id_inpret!!', $id_inpret, $this->fiche); if ($vdr) { $this->fiche = str_replace('!!prol_date!!', $butt_prol, $this->fiche); $this->fiche = str_replace('!!bouton_cocher_prolong!!', "<input type='button' name='bloc_all' value='+' class='bouton' title='{$msg['resa_tout_cocher']}' onClick='check_allcb(this.form)'/>", $this->fiche); } else { $this->fiche = str_replace('!!prol_date!!', "", $this->fiche); $this->fiche = str_replace('!!bouton_cocher_prolong!!', " ", $this->fiche); } $this->fiche = str_replace('!!voir_tout_pret!!', $voir_tout_pret, $this->fiche); /* 1ere option */ //$this->fiche = str_replace('!!pret_list!!', $prets_list, $this->fiche); /* 2eme option */ $this->fiche = str_replace('!!pret_list!!', $prets_list[0], $this->fiche); if ($pmb_short_loan_management == 1) { if (count($prets_list[1])) { $this->fiche = str_replace('!!short_loan_list!!', $prets_list[1], $this->fiche); } else { $this->fiche = str_replace('!!short_loan_list!!', '', $this->fiche); } } //tableau des relances $this->fiche = str_replace('!!relance!!', $this->relance, $this->fiche); if ($pmb_gestion_amende && $pmb_gestion_financiere) { $bt_histo_relance = " <input type='button' class='bouton' id='see_late' name='see_late' value=\"" . $msg['empr_see_late'] . "\" onclick=\"document.location='./circ.php?categ=pret&sub=show_late&id={$this->id}' \" />"; } else { $bt_histo_relance = ""; } $this->fiche = str_replace('!!bt_histo_relance!!', $bt_histo_relance, $this->fiche); // mise à jour de la liste des réservations $this->fiche = str_replace('!!resa_list!!', $this->fetch_resa(), $this->fiche); if ($pmb_resa_planning) { // mise à jour de la liste des réservations planifiées $this->fiche = str_replace('!!resa_planning_list!!', $this->fetch_resa_planning(), $this->fiche); } else { $this->fiche = str_replace('!!resa_planning_list!!', '', $this->fiche); } if ($this->allow_sugg && SESSrights & ACQUISITION_AUTH) { $req = "select count(id_suggestion) as nb from suggestions, suggestions_origine where num_suggestion=id_suggestion and origine='" . $this->id . "' and type_origine='1' "; $res = pmb_mysql_query($req, $dbh); $btn_sug = ""; if ($res && pmb_mysql_num_rows($res)) { $sug = pmb_mysql_fetch_object($res); if ($sug->nb) { $btn_sug = "<input type='button' class='bouton' id='see_sug' name='see_sug' value='" . $msg['acquisition_lecteur_see_sugg'] . "' onclick=\"document.location='./acquisition.php?categ=sug&action=list&user_id[]=" . $this->id . "&user_statut[]=1&sugg_location_id=" . $this->empr_location . "' \" />"; } } $this->fiche = str_replace('!!voir_sugg!!', $btn_sug, $this->fiche); } else { $this->fiche = str_replace('!!voir_sugg!!', "", $this->fiche); } // mise à jour de la liste des abonnement de circulation de pério $this->fiche = str_replace('!!serialcirc_empr!!', $this->fetch_serial_circ(), $this->fiche); }
function confirm_pret($id_empr, $id_expl, $short_loan = 0) { // le lien MySQL global $dbh, $msg; global $pmb_quotas_avances, $pmb_utiliser_calendrier; global $pmb_gestion_financiere, $pmb_gestion_tarif_prets; global $include_path, $lang; global $deflt2docs_location; global $pmb_pret_date_retour_adhesion_depassee; global $pmb_short_loan_management; //supprimer le pret temporaire $query = "delete from pret where pret_idexpl = '" . $id_expl . "' "; $result = pmb_mysql_query($query, $dbh); /* on prépare la date de début*/ $pret_date = today(); /* on cherche la durée du prêt */ if ($pmb_short_loan_management && $short_loan) { if ($pmb_quotas_avances) { //Initialisation de la classe $qt = new quota("SHORT_LOAN_TIME_QUOTA"); $struct["READER"] = $id_empr; $struct["EXPL"] = $id_expl; $duree_pret = $qt->get_quota_value($struct); if ($duree_pret == -1) { $duree_pret = 0; } } else { $query = "SELECT short_loan_duration as duree_pret"; $query .= " FROM exemplaires, docs_type"; $query .= " WHERE expl_id='" . $id_expl; $query .= "' and idtyp_doc=expl_typdoc LIMIT 1"; $result = @pmb_mysql_query($query, $dbh) or die("can't SELECT exemplaires " . $query); $expl_properties = pmb_mysql_fetch_object($result); $duree_pret = $expl_properties->duree_pret; } } else { if ($pmb_quotas_avances) { //Initialisation de la classe $qt = new quota("LEND_TIME_QUOTA"); $struct["READER"] = $id_empr; $struct["EXPL"] = $id_expl; $duree_pret = $qt->get_quota_value($struct); if ($duree_pret == -1) { $duree_pret = 0; } } else { $query = "SELECT duree_pret"; $query .= " FROM exemplaires, docs_type"; $query .= " WHERE expl_id='" . $id_expl; $query .= "' and idtyp_doc=expl_typdoc LIMIT 1"; $result = @pmb_mysql_query($query, $dbh) or die("can't SELECT exemplaires " . $query); $expl_properties = pmb_mysql_fetch_object($result); $duree_pret = $expl_properties->duree_pret; } } // calculer la date de retour prévue, tenir compte de la date de fin d'adhésion if (!$duree_pret) { $duree_pret = "0"; } if ($pmb_pret_date_retour_adhesion_depassee) { $rqt_date = "select empr_date_expiration,if(empr_date_expiration>date_add('" . $pret_date . "', INTERVAL '{$duree_pret}' DAY),0,1) as pret_depasse_adhes, date_add('" . $pret_date . "', INTERVAL '{$duree_pret}' DAY) as date_retour from empr where id_empr='" . $id_empr . "'"; } else { $rqt_date = "select empr_date_expiration,if(empr_date_expiration>date_add('" . $pret_date . "', INTERVAL '{$duree_pret}' DAY),0,1) as pret_depasse_adhes, if(empr_date_expiration>date_add('" . $pret_date . "', INTERVAL '{$duree_pret}' DAY),date_add('" . $pret_date . "', INTERVAL '{$duree_pret}' DAY),empr_date_expiration) as date_retour from empr where id_empr='" . $id_empr . "'"; } $resultatdate = pmb_mysql_query($rqt_date) or die(pmb_mysql_error() . "<br /><br />{$rqt_date}<br /><br />"); $res = pmb_mysql_fetch_object($resultatdate); $date_retour = $res->date_retour; $pret_depasse_adhes = $res->pret_depasse_adhes; $empr_date_expiration = $res->empr_date_expiration; if ($pmb_utiliser_calendrier) { if ($pret_depasse_adhes == 0 || $pmb_pret_date_retour_adhesion_depassee) { $rqt_date = "select date_ouverture from ouvertures where ouvert=1 and to_days(date_ouverture)>=to_days('{$date_retour}') and num_location={$deflt2docs_location} order by date_ouverture "; $resultatdate = pmb_mysql_query($rqt_date); $res = @pmb_mysql_fetch_object($resultatdate); if ($res->date_ouverture) { $date_retour = $res->date_ouverture; } } else { $rqt_date = "select date_ouverture from ouvertures where date_ouverture>=sysdate() and ouvert=1 and to_days(date_ouverture)<=to_days('{$date_retour}') and num_location={$deflt2docs_location} order by date_ouverture DESC"; $resultatdate = pmb_mysql_query($rqt_date); $res = @pmb_mysql_fetch_object($resultatdate); if ($res->date_ouverture) { $date_retour = $res->date_ouverture; } } // Si la date_retour, calculée ci-dessus d'après le calendrier, dépasse l'adhésion, alors que c'est interdit, // la date de retour doit etre le dernier jour ouvert if (!$pmb_pret_date_retour_adhesion_depassee) { $rqt_date = "SELECT DATEDIFF('{$empr_date_expiration}','{$date_retour}')as diff"; $resultatdate = pmb_mysql_query($rqt_date); $res = @pmb_mysql_fetch_object($resultatdate); if ($res->diff < 0) { $rqt_date = "select date_ouverture from ouvertures where date_ouverture>=sysdate() and ouvert=1 and to_days(date_ouverture)<=to_days('{$empr_date_expiration}') and num_location={$deflt2docs_location} order by date_ouverture DESC"; $resultatdate = pmb_mysql_query($rqt_date); $res = @pmb_mysql_fetch_object($resultatdate); if ($res->date_ouverture) { $date_retour = $res->date_ouverture; } } } } // insérer le prêt $query = "INSERT INTO pret SET "; $query .= "pret_idempr = '" . $id_empr . "', "; $query .= "pret_idexpl = '" . $id_expl . "', "; $query .= "pret_date = sysdate(), "; $query .= "pret_retour = '{$date_retour}', "; $query .= "retour_initial = '{$date_retour}', "; $query .= "short_loan_flag = " . ($pmb_short_loan_management && $short_loan ? "'1'" : "'0'"); $result = @pmb_mysql_query($query, $dbh) or die("can't INSERT into pret" . $query); // insérer la trace en stat, récupérer l'id et le mettre dans la table des prêts pour la maj ultérieure $stat_avant_pret = pret_construit_infos_stat($id_expl); $stat_id = stat_stuff($stat_avant_pret); $query = "update pret SET pret_arc_id='{$stat_id}' where "; $query .= "pret_idempr = '" . $id_empr . "' and "; $query .= "pret_idexpl = '" . $id_expl . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update pret for stats " . $query); //enregistrer les champs perso pret $p_perso = new pret_parametres_perso("pret"); $p_perso->rec_fields_perso($stat_id); $query = "update exemplaires SET "; $query .= "last_loan_date = sysdate() "; $query .= "where expl_id= '" . $id_expl . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update last_loan_date in exemplaires : " . $query); $query = "update exemplaires SET "; $query .= "expl_retloc=0 "; $query .= "where expl_id= '" . $id_expl . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update expl_retloc in exemplaires : " . $query); $query = "update empr SET "; $query .= "last_loan_date = sysdate() "; $query .= "where id_empr= '" . $id_empr . "' "; $result = @pmb_mysql_query($query, $dbh) or die("can't update last_loan_date in empr : " . $query); //Débit du compte lecteur si nécessaire if ($pmb_gestion_financiere && $pmb_gestion_tarif_prets) { $tarif_pret = 0; switch ($pmb_gestion_tarif_prets) { case 1: //Gestion simple $query = "SELECT tarif_pret"; $query .= " FROM exemplaires, docs_type"; $query .= " WHERE expl_id='" . $id_expl; $query .= "' and idtyp_doc=expl_typdoc LIMIT 1"; $result = @pmb_mysql_query($query, $dbh) or die("can't SELECT exemplaires " . $query); $expl_tarif = pmb_mysql_fetch_object($result); $tarif_pret = $expl_tarif->tarif_pret; break; case 2: //Gestion avancée //Initialisation Quotas global $_parsed_quotas_; $_parsed_quotas_ = false; $qt_tarif = new quota("COST_LEND_QUOTA", "{$include_path}/quotas/own/{$lang}/finances.xml"); $struct["READER"] = $id_empr; $struct["EXPL"] = $id_expl; $tarif_pret = $qt_tarif->get_quota_value($struct); break; } $tarif_pret = $tarif_pret * 1; if ($tarif_pret) { $compte_id = comptes::get_compte_id_from_empr($id_empr, 3); if ($compte_id) { $cpte = new comptes($compte_id); $cpte->record_transaction("", abs($tarif_pret), -1, sprintf($msg["finance_pret_expl"], $id_expl), 0); } } } $this->resa_pret_gestion($id_empr, $id_expl, $stat_id); $array[0]['statut'] = 1; $buf_xml = array2xml($array); return $buf_xml; }
<?php // +-------------------------------------------------+ // © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net) // +-------------------------------------------------+ // $Id: perso.inc.php,v 1.1 2015-06-26 13:15:12 dgoron Exp $ if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) { die("no access"); } require_once $class_path . "/pret_parametres_perso.class.php"; $option_visibilite = array(); $option_visibilite["multiple"] = "none"; $option_visibilite["obligatoire"] = "block"; $option_visibilite["search"] = "none"; $option_visibilite["export"] = "none"; $option_visibilite["filters"] = "block"; $option_visibilite["exclusion"] = "none"; $option_visibilite["opac_sort"] = "none"; $p_perso = new pret_parametres_perso("pret", "./admin.php?categ=loans&sub=perso", $option_visibilite); $p_perso->proceed();