Subversion Repositories Applications.papyrus

Rev

Rev 805 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 805 Rev 815
Line 7... Line 7...
7 
// |                                                                                |
 7 
// |                                                                                |
8 
// +--------------------------------------------------------------------------------+
 8 
// +--------------------------------------------------------------------------------+
9 
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org>                       |
 9 
// | Auteur : Alexandre Granier <alexandre@tela-botanica.org>                       |
10 
// +--------------------------------------------------------------------------------+
 10 
// +--------------------------------------------------------------------------------+
11 
//
 11 
//
12 
// $Id: cartographie.fonct.liste_inscrit.php,v 1.2 2006-04-04 12:23:05 florian Exp $
 12 
// $Id: cartographie.fonct.liste_inscrit.php,v 1.3 2006-04-11 08:40:24 alexandre_tb Exp $
Line 13... Line 13...
13 
 
 13 
 
Line 14... Line 14...
14 
global $HTTP_USER_AGENT;
 14 
global $HTTP_USER_AGENT;
Line 131... Line 131...
131 
}
 131 
}
Line 132... Line 132...
132 
 
 132 
 
Line 133... Line 133...
133 
// 2 ème cas, on vient de cliquer sur un département français
 133 
// 2 ème cas, on vient de cliquer sur un département français
134 
 
 134 
 
Line 135... Line 135...
135 
 else if (count($tabmonde) == 4) {
 135 
 else if (count($tabmonde) == 4) {
136 
    $argument = $tabmonde[3];
 136 
    $numero_departement = $tabmonde[3];
137
137
138 
    $query = 'SELECT * FROM '.INS_TABLE_DPT.' WHERE '.INS_CHAMPS_ID_DEPARTEMENT.'='.$argument;
 138 
    $query = 'SELECT * FROM '.INS_TABLE_DPT.' WHERE '.INS_CHAMPS_ID_DEPARTEMENT.'='.$numero_departement;
139 
    $result = $GLOBALS['ins_db']->query($query);
 139 
    $result = $GLOBALS['ins_db']->query($query);
140 
    if (DB::isError($result)) {
 140 
    if (DB::isError($result)) {
Line 148... Line 148...
148 
    $res.="<div><b>\n";
 148 
    $res.="<div><b>\n";
149 
    foreach ($tabonglet as $key=>$value) {
 149 
    foreach ($tabonglet as $key=>$value) {
150 
        if ($key==0) {
 150 
        if ($key==0) {
151 
            $chemin=$value;
 151 
            $chemin=$value;
152 
            $value='monde';
 152 
            $value='monde';
- 
 
 153 
            $res.= "<a class=\"chemin_carto\" href=\"".
153 
            $res.= "<a class=\"chemin_carto\" href=\"".$monde->url."&amp;historique_cartes=$chemin\">&nbsp;&gt;&nbsp;".$tabnom[$key]."</a>";
 154 
            		$monde->url."&amp;historique_cartes=$chemin\">&nbsp;&gt;&nbsp;".$tabnom[$key]."</a>";
154 
        }
 155 
        }
155 
        else if ($key==(count($tabonglet)-1)) {
 156 
        else if ($key==(count($tabonglet)-1)) {
156 
            $res.="<a class=\"chemin_carto\">&nbsp;&gt;&nbsp;$nom</a>";
 157 
            $res.="<a class=\"chemin_carto\">&nbsp;&gt;&nbsp;$nom</a>";
157 
        }
 158 
        }
158 
        else {
 159 
        else {
Line 162... Line 163...
162 
    }
 163 
    }
163 
    $res .= "</b></div>\n";
 164 
    $res .= "</b></div>\n";
Line 164... Line 165...
164
165
165 
    $query2 = ' SELECT count('.INS_CHAMPS_ID.') as nbr'.
 166 
    $query2 = ' SELECT count('.INS_CHAMPS_ID.') as nbr'.
166 
            ' FROM '.INS_ANNUAIRE.
 167 
            ' FROM '.INS_ANNUAIRE.
167 
            ' WHERE '.INS_CHAMPS_CODE_POSTAL.' LIKE "'.$argument.'%"'.
 168 
            ' WHERE '.INS_CHAMPS_CODE_POSTAL.' LIKE "'.$numero_departement.'%"'.
168 
            ' AND '.INS_CHAMPS_PAYS.'="FR"';
 169 
            ' AND '.INS_CHAMPS_PAYS.'="FR"';
169 
    $result2 = $GLOBALS['ins_db']->query($query2);
 170 
    $result2 = $GLOBALS['ins_db']->query($query2);
170 
    if (DB::isError($result2)) {
 171 
    if (DB::isError($result2)) {
171 
    	die ($result2->getMessage().'<br />'.$result2->getDebugInfo()) ;
 172 
    	die ($result2->getMessage().'<br />'.$result2->getDebugInfo()) ;