source: pmb4.2/trunk/fuentes/pmb/circ/listeresa/liste_expl_dispo.php @ 815

Last change on this file since 815 was 815, checked in by jrpelegrina, 4 years ago

Initial release of pmb 4.2

  • Property svn:executable set to *
File size: 4.1 KB
Line 
1<?php
2// +-------------------------------------------------+
3// © 2002-2004 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
4// +-------------------------------------------------+
5// $Id: liste_expl_dispo.php,v 1.9 2015-04-03 11:16:25 jpermanne Exp $
6
7$base_path="./../..";
8$base_auth = "CIRCULATION_AUTH";
9$base_title = "\$msg[5]";
10//permet d'appliquer le style de l'onglet ou apparait la frame
11$current_alert = "circ";
12
13require_once ("$base_path/includes/init.inc.php");
14
15$rqt = "SELECT ".
16                        "trim(concat(ifnull(notices_m.tit1,''),ifnull(notices_s.tit1,''),' ',ifnull(bulletin_numero,''), if (mention_date, concat(' (',mention_date,')') ,''))) as tit, ".
17                        "expl_cb, ".
18                        "location_libelle, ".
19                        "expl_id ,
20                        lender_libelle ".
21                "FROM (((exemplaires ".
22                        "LEFT JOIN notices AS notices_m ON expl_notice=notices_m.notice_id) ".
23                        "LEFT JOIN bulletins ON expl_bulletin = bulletins.bulletin_id) ".
24                        "LEFT JOIN notices AS notices_s ON bulletin_notice = notices_s.notice_id) ".
25                        "INNER JOIN docs_location ON expl_location=idlocation ".
26                        "INNER JOIN docs_statut ON expl_statut=idstatut ".
27                        "INNER JOIN lenders ON idlender=expl_owner " .
28                "WHERE ".
29                        "pret_flag=1 ".
30                        "and transfert_flag=1 ".
31                        "AND expl_notice=".$idnotice." ".
32                        "AND expl_bulletin=".$idbulletin." ".
33                        "AND expl_location<>".$loc." ".
34                "ORDER BY transfert_ordre";
35
36//echo $rqt;
37$res = pmb_mysql_query($rqt);
38$st = "odd";
39while (($data = pmb_mysql_fetch_array($res))) {
40        $sel_expl=1;
41        $statut="";
42        $req_res = "select count(1) from resa where resa_cb='".addslashes($data[1])."' and resa_confirmee='1'";
43        $req_res_result = pmb_mysql_query($req_res, $dbh);
44        if(pmb_mysql_result($req_res_result, 0, 0)) {                                   
45                $statut=$msg["transferts_circ_resa_expl_reserve"];
46                $sel_expl=0;
47        }
48        $req_pret = "select date_format(pret_retour, '".$msg["format_date"]."') as aff_pret_retour  from pret where pret_idexpl='".$data[3]."' ";
49        $req_pret_result = pmb_mysql_query($req_pret, $dbh);
50        if(pmb_mysql_num_rows($req_pret_result)) {                                     
51                //$statut=$msg["transferts_circ_resa_expl_en_pret"]."()";
52                $statut=$msg[358]." ".pmb_mysql_result($req_pret_result, 0,0);
53                $sel_expl=0;
54        }       
55        // transfert demandé
56        $req="select count(1)  from transferts_demande, transferts where etat_demande ='0' and num_expl='".$data[3]."' and etat_transfert=0 and id_transfert=num_transfert ";
57        $r = pmb_mysql_query($req, $dbh);
58        if(pmb_mysql_result($r, 0, 0)) {
59                if($statut)$statut.=". ";
60                $statut.=$msg["transfert_demande_in_progress"];
61                $sel_expl=0;
62        }
63        if ($st=="odd")
64                $st = "even";
65        else
66                $st = "odd";
67        if($sel_expl) {
68                $liste .=       "<tr class='" .$st ."' onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='" . $st ."'\"  style='cursor: pointer'>
69                                                <td onclick=\"parent.selExpl('".$data[1]."',$id_resa)\">".$data[0]."</td>
70                                                <td onclick=\"parent.selExpl('".$data[1]."',$id_resa)\">".$data[1]."</td>
71                                                <td onclick=\"parent.selExpl('".$data[1]."',$id_resa)\">".$data[2]."</td>
72                                                <td onclick=\"parent.selExpl('".$data[1]."',$id_resa)\">".$data[4]."</td>
73                                                <td onclick=\"parent.selExpl('".$data[1]."',$id_resa)\">".$statut."</td>
74                                        </tr>";
75        } else{
76                $liste .=       "<tr class='" .$st ."' onmouseover=\"this.className='surbrillance'\" onmouseout=\"this.className='" . $st ."'\"  style='cursor: pointer'>
77                                                <td>".$data[0]."</td>
78                                                <td>".$data[1]."</td>
79                                                <td>".$data[2]."</td>
80                                                <td>".$data[4]."</td>
81                                                <td class='erreur'>".$statut."</td>
82                                        </tr>";
83        }       
84}
85
86$global = "
87<div class='row'>
88        <div class='right'><a href='#' onClick='parent.kill_frame_expl();return false;'><img src='" . $base_path . "/images/close.gif' border='0' align='right'></a></div>
89        <h3>" . $msg["transferts_circ_resa_lib_choix_expl"] . "</h3>
90        <table>
91                <tr>
92                        <th>" . $msg["transferts_circ_resa_titre_titre"] . "</th>
93                        <th>" . $msg["transferts_circ_resa_titre_cb"] . "</th>
94                        <th>" . $msg["transferts_circ_resa_titre_localisation"] . "</th>
95                        <th align='left'>".$msg[651]."</th>
96                        <th></th>
97                </tr>
98                !!liste!!
99        </table>
100</div>";
101
102echo str_replace("!!liste!!",$liste,$global);
103
104echo "</body></html>";
105
106pmb_mysql_close($dbh);
107
108?>
Note: See TracBrowser for help on using the repository browser.