Subversion Repositories Applications.papyrus

Rev

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

Rev 805 Rev 810
Line 24... Line 24...
24 
//Autres auteurs :
 24 
//Autres auteurs :
25 
*@copyright         Tela-Botanica 2000-2004
 25 
*@copyright         Tela-Botanica 2000-2004
26 
*@version             03 mai 2004
 26 
*@version             03 mai 2004
27 
// +-----------------------------------------------------------------------------------------------+
 27 
// +-----------------------------------------------------------------------------------------------+
28 
//
 28 
//
29 
// $Id: cartographie.php,v 1.3 2006-04-04 12:23:05 florian Exp $
 29 
// $Id: cartographie.php,v 1.4 2006-04-10 14:01:36 florian Exp $
30 
// FICHIER : $RCSfile: cartographie.php,v $
 30 
// FICHIER : $RCSfile: cartographie.php,v $
31 
// AUTEUR    : $Author: florian $
 31 
// AUTEUR    : $Author: florian $
32 
// VERSION : $Revision: 1.3 $
 32 
// VERSION : $Revision: 1.4 $
33 
// DATE        : $Date: 2006-04-04 12:23:05 $
 33 
// DATE        : $Date: 2006-04-10 14:01:36 $
34 
*/
 34 
*/
35 
include_once PAP_CHEMIN_RACINE.'/client/bottin/configuration/bottin.config.inc.php';
 35 
include_once PAP_CHEMIN_RACINE.'/client/bottin/configuration/bottin.config.inc.php';
36 
include_once INS_CHEMIN_APPLI.'configuration/cartographie.config.inc.php';
 36 
include_once INS_CHEMIN_APPLI.'configuration/cartographie.config.inc.php';
37 
include_once INS_CHEMIN_APPLI.'bibliotheque/cartographie.fonct.php';
 37 
include_once INS_CHEMIN_APPLI.'bibliotheque/bottin.fonct.php';
38 
include_once INS_CHEMIN_APPLI.'bibliotheque/lib.carto.php';
 38 
include_once INS_CHEMIN_APPLI.'bibliotheque/lib.carto.php';
39 
include_once INS_CHEMIN_APPLI.'bibliotheque/cartographie.fonct.php';
 - 
 
40 
//include_once 'HTML/QuickForm.php' ;
 - 
 
Line 41... Line 39...
41 
 
 39 
 
- 
 
 40 
//================================================================================================
- 
 
 41 
if ( isset($_GET['voir_fiche']) or isset($_GET['voir_abonnement']) or isset($_GET['voir_actus']) or isset($_GET['voir_ressources']) or isset($_GET['voir_competences']) ) {
- 
 
 42 
	//---------------le menu de l'appli-----------
- 
 
 43 
	function afficherContenuNavigation () {
- 
 
 44 
		$res =inscription_onglets();
- 
 
 45 
		return $res ;
- 
 
 46 
	}
- 
 
 47 
}
42 
//================================================================================================
 48 
 
Line 43... Line 49...
43 
//================================================================================================
 49 
//================================================================================================
44 
 
 50 
 
45 
function afficherContenuCorps()
51 
function afficherContenuCorps()
Line 51... Line 57...
51 
    global $fin;
 57 
    global $fin;
52 
    global $sendpwd;//utilisé dans liste_inscrit.php
 58 
    global $sendpwd;//utilisé dans liste_inscrit.php
53 
    global $select;//utilisé dans liste_inscrit.php
 59 
    global $select;//utilisé dans liste_inscrit.php
54 
    global $liste_zone_carte;
 60 
    global $liste_zone_carte;
Line 55... Line 61...
55
61
56 
//=================================================================================================
 62 
	//=================================================================================================
57 
//Gestion de la configuration
63 
	//Gestion de la configuration
58 
    $requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['menu'];
 64 
    $requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['menu'];
59 
    $resultat = $GLOBALS['ins_db']->query($requete) ;
 65 
    $resultat = $GLOBALS['ins_db']->query($requete) ;
60 
    if (DB::isError($resultat)) {
 66 
    if (DB::isError($resultat)) {
61 
       	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
 67 
       	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
Line 68... Line 74...
68 
        	$nom_table2=$ligne['cc_table2'];
 74 
        	$nom_table2=$ligne['cc_table2'];
69 
        	$nom_champs_pays=$ligne['cc_pays'];
 75 
        	$nom_champs_pays=$ligne['cc_pays'];
70 
        	$nom_champs_cp=$ligne['cc_cp'];
 76 
        	$nom_champs_cp=$ligne['cc_cp'];
71 
        	$requete_sql=$ligne['cc_sql'];
 77 
        	$requete_sql=$ligne['cc_sql'];
72 
        }
 78 
        }
169 
    }
 236 
    }
170 
    $monde->image_x = $image_x;
 - 
 
171 
    $monde->image_y = $image_y;
 - 
 
172 
    $monde->liste_zone_carte = $liste_zone_carte;
 - 
 
173 
    $monde->url = $GLOBALS['ins_url']->getURL();
 - 
 
174
- 
 
175 
    foreach ($info_pays as $cle => $valeur) {
 - 
 
176 
        $requete_05 =
- 
 
177 
            "SELECT CDC_Titre_carte, CDC_ID_Carte, CDC_Carte_fond, CDC_Carte_masque, CDC_ID_Zone_geo_carte".
 - 
 
178 
            " FROM carto_DESCRIPTION_CARTE, carto_ACTION ".
 - 
 
179 
            " WHERE CA_ID_Zone_geo = '$cle'".
 - 
 
180 
            " AND CA_Type_zone = 1".
 - 
 
181 
            " AND CA_ID_Carte_destination = CDC_ID_Carte";
 - 
 
182
- 
 
183 
        $resultat_05 = $GLOBALS['ins_db']->query ($requete_05) ;
 - 
 
184 
        if (DB::isError($resultat_05)) {
 - 
 
185 
            die ($resultat_05->getMessage().'<br />'.$resultat_05->getDebugInfo()) ;
 - 
 
186 
        }
- 
 
187 
        $ligne_05 = $resultat_05->fetchRow(DB_FETCHMODE_OBJECT);
- 
 
188 
        $monde->ajouterFils($ligne_05->CDC_ID_Carte, $ligne_05->CDC_ID_Zone_geo_carte, $ligne_05->CDC_Titre_carte,
- 
 
189 
                                        $ligne_05->CDC_Carte_masque, $ligne_05->CDC_Carte_fond, $valeur);
 - 
 
190 
        $monde->fils[$ligne_05->CDC_ID_Carte]->definirCouleurs ('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
 - 
 
191 
    }
 - 
 
192
- 
 
193 
    $monde->fils['europe']->ajouterFils('france', 'fr', 'France' ,'france_masque.png', 'france.png', $info_dpt_france);
 - 
 
194 
    $monde->fils['europe']->fils['france']->definirCouleurs ('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
 - 
 
195
- 
 
196 
    // Une fois l'arborescence créée on lance la methode donnerFormulaireImage() pour recuperer la carte
 - 
 
197 
    // (dans $img). S'il n'y a pas de carte a afficher donnerFormulaireImage() renvoi false. On peut alors recuperer
 - 
 
198 
    // le niveau ou on en est grace a $monde->historique (du type continent*namerique*ca).
 - 
 
199
- 
 
200 
    $img = false;
 - 
 
201 
    if ($mailer == 1 || $fin == true) {
 - 
 
202 
        $objet_carte = $_SESSION['carte'] ;
 - 
 
203 
        $monde = unserialize($objet_carte);}
 - 
 
204 
    else {
 - 
 
205 
        $img = $monde->donnerFormulaireImage();
 - 
 
206 
    }
 - 
 
207
- 
 
208 
    // Quoi qu'il arrive, on ouvre la balise formulaire
 - 
 
209 
    if ($titre!='') $res = '<h1>'.$titre.'</h1>'."\n";
 - 
 
210 
    else $res = '<h1>'.INS_CARTOGRAPHIE.'</h1>'."\n";
 - 
 
211 
    $res .= '<form action="'.$monde->url.'" method="post">'."\n";
 - 
 
212 
    if ((INS_AFFICHE_ECHELLE)and($img)) {
 - 
 
213 
       	$historique_carte = new Carto_HistoriqueCarte ($monde, '&gt;', 'chemin_carto');
 - 
 
214 
       	$res .= $historique_carte->afficherHistoriqueCarte()."\n" ;
 - 
 
215 
    }
 - 
 
216 
    if (!$img ) {
 - 
 
217 
    	//include 'bibliotheque/cartographie.fonct.liste_inscrit.php';
 - 
 
218 
        $res .= carto_liste_fiches($monde, $nom_table1, $nom_table2, $nom_champs_pays, $nom_champs_cp, $requete_sql);
 - 
 
219 
        return $res;
 - 
 
220 
    } else {
 - 
 
221 
    	$res .= $img;
 - 
 
222 
        $res .= '<p class="zone_info">'."\n";
 - 
 
223 
		$res .= '<strong>'.INS_CLIQUER_ACCEDER.'</strong><br />'."\n";
 - 
 
224 
        $res .= INS_COULEUR."\n".'</p>'."\n";
- 
 
225 
    }
 - 
 
226 
    $res .= '</form>'."\n";
 - 
 
227 
    return $res;
 237 
    return $res;
Line 228... Line 238...
228
238
229 
//----------------------------------------------------------------------------------------------------------------------
 239 
//----------------------------------------------------------------------------------------------------------------------
230 
// Cas ou la carto n'a pas encore ete configuree
240 
// Cas ou la carto n'a pas encore ete configuree
Line 235... Line 245...
235 
 
 245 
 
236 
 
 246 
 
237 
//-- Fin du code source    ------------------------------------------------------------
 247 
//-- Fin du code source    ------------------------------------------------------------
- 
 
 248 
/*
- 
 
 249 
* $Log: not supported by cvs2svn $
- 
 
 250 
* Revision 1.3  2006/04/04 12:23:05  florian
238 
/*
 251 
* modifs affichage fiches, généricité de la carto, modification totale de l'appli annuaire
239 
* $Log: not supported by cvs2svn $
 252 
*
240 
* Revision 1.2  2005/11/24 16:17:52  florian
 253 
* Revision 1.2  2005/11/24 16:17:52  florian
241 
* changement template inscription + modifs carto
 254 
* changement template inscription + modifs carto
242 
*
 255 
*