| 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.8 2007-04-06 08:35:46 neiluj Exp $
|
29 |
// $Id: cartographie.php,v 1.9 2007-04-11 08:30:12 neiluj Exp $
|
| 30 |
// FICHIER : $RCSfile: cartographie.php,v $
|
30 |
// FICHIER : $RCSfile: cartographie.php,v $
|
| 31 |
// AUTEUR : $Author: neiluj $
|
31 |
// AUTEUR : $Author: neiluj $
|
| 32 |
// VERSION : $Revision: 1.8 $
|
32 |
// VERSION : $Revision: 1.9 $
|
| 33 |
// DATE : $Date: 2007-04-06 08:35:46 $
|
33 |
// DATE : $Date: 2007-04-11 08:30:12 $
|
| 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 |
|
| - |
|
49 |
//================================================================================================
|
| - |
|
50 |
function construit_hierarchie(&$info_zone, &$carto_config, $info_zone_hierarchie, &$monde) {
|
| - |
|
51 |
static $i=0;
|
| - |
|
52 |
$i++;
|
| - |
|
53 |
|
| - |
|
54 |
//on ajoute la carto en cours en tant que fils
|
| - |
|
55 |
$monde->ajouterFils($info_zone_hierarchie->czh_code_alpha, $info_zone_hierarchie->czh_identifiant_table_info_couleur,
|
| - |
|
56 |
$info_zone_hierarchie->czh_nom, $info_zone_hierarchie->czh_fichier_masque,
|
| - |
|
57 |
$info_zone_hierarchie->czh_fichier_image, '');
|
| - |
|
58 |
$monde->fils[$info_zone_hierarchie->czh_code_alpha]->definirCouleurs ('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
|
| - |
|
59 |
|
| - |
|
60 |
//requete pour trouver les fils de la carte de depart voulue
|
| - |
|
61 |
$requete_zone_fils = 'SELECT * FROM carto_zone_hierarchie '.
|
| - |
|
62 |
'WHERE czh_id_zone_pere='.$info_zone_hierarchie->czh_id_zone;/*echo $requete_zone_fils;*/
|
| - |
|
63 |
$resultat_zone_fils = $GLOBALS['ins_db']->query($requete_zone_fils) ;
|
| - |
|
64 |
if (DB::isError($resultat_zone_fils )) {
|
| - |
|
65 |
echo ($resultat_zone_fils->getMessage().'<br />'.$resultat_zone_fils->getDebugInfo()).'<br />'.$requete_zone_fils ;
|
| - |
|
66 |
}
|
| - |
|
67 |
|
| - |
|
68 |
if ($resultat_zone_fils->numRows()!=0) {
|
| - |
|
69 |
while ($ligne_zone_fils = $resultat_zone_fils ->fetchRow(DB_FETCHMODE_OBJECT)) {
|
| - |
|
70 |
//requete pour obtenir toutes les infos (repartition par zones, nom des tables et champs pour les couleurs,.. ) pour la carte à afficher
|
| - |
|
71 |
$requete_01 = 'SELECT '.$ligne_zone_fils->czh_nom_champs_id_pere.',count('.$ligne_zone_fils->czh_nom_champs_id_pere.') AS nbr'.
|
| - |
|
72 |
' FROM '.$carto_config['cc_table1'].', '.$ligne_zone_fils->czh_nom_table_info_couleur;
|
| - |
|
73 |
if ($carto_config['cc_table2']!=0) $requete_01 .= ', '.$carto_config['cc_table2'];
|
| - |
|
74 |
$requete_01 .= ' WHERE '.$ligne_zone_fils->czh_champs_jointure_annuaire.' = '.$ligne_zone_fils->czh_nom_champs_id;
|
| - |
|
75 |
if ($carto_config['cc_sql']!='') $requete_01 .= ' AND ('.$carto_config['cc_sql'].')';
|
| - |
|
76 |
$requete_01 .= ' GROUP BY '.$ligne_zone_fils->czh_nom_champs_id_pere;
|
| - |
|
77 |
$resultat_01 = $GLOBALS['ins_db']->query($requete_01) ;
|
| - |
|
78 |
if (DB::isError($resultat_01)) {
|
| - |
|
79 |
echo ($resultat_01->getMessage().'<br />'.$resultat_01->getDebugInfo()).'<br />'.$requete_01 ;
|
| - |
|
80 |
}
|
| - |
|
81 |
$tableau_repartition=array();
|
| - |
|
82 |
while ($ligne_01 = $resultat_01->fetchRow(DB_FETCHMODE_OBJECT)) {
|
| - |
|
83 |
$id=$ligne_zone_fils->czh_nom_champs_id_pere;
|
| - |
|
84 |
$tableau_repartition[$ligne_01->$id] = $ligne_01->nbr;
|
| - |
|
85 |
}
|
| - |
|
86 |
$info_zone[$i]['nom_table_zone'] =$info_zone_hierarchie->czh_nom_table_info_couleur;
|
| - |
|
87 |
$info_zone[$i]['nom_chp_id_zone'] =$info_zone_hierarchie->czh_nom_champs_id;
|
| - |
|
88 |
$info_zone[$i]['nom_chp_nom_zone'] =$info_zone_hierarchie->czh_nom_champs_intitule;
|
| - |
|
89 |
$info_zone[$i]['nom_chp_rouge'] =$info_zone_hierarchie->czh_nom_champs_couleur_R;
|
| - |
|
90 |
$info_zone[$i]['nom_chp_vert'] =$info_zone_hierarchie->czh_nom_champs_couleur_V;
|
| - |
|
91 |
$info_zone[$i]['nom_chp_bleu'] =$info_zone_hierarchie->czh_nom_champs_couleur_B;
|
| - |
|
92 |
$info_zone[$i]['nom_chp_zone_sup'] =$info_zone_hierarchie->czh_nom_champs_id_pere;
|
| - |
|
93 |
$info_zone[$i]['tableau_valeurs_zone'] = $tableau_repartition;
|
| - |
|
94 |
if ($i == 1) {
|
| - |
|
95 |
$monde->_info_table_zg = $info_zone[1];
|
| - |
|
96 |
$monde->definirCouleurs('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
|
| - |
|
97 |
construit_hierarchie($info_zone, $carto_config, $ligne_zone_fils, $monde);
|
| - |
|
98 |
} else {
|
| - |
|
99 |
$monde->_info_table_zg = $info_zone[$i];
|
| - |
|
100 |
construit_hierarchie($info_zone, $carto_config, $ligne_zone_fils, $monde->fils[$info_zone_hierarchie->czh_code_alpha]);
|
| - |
|
101 |
}
|
| - |
|
102 |
}
|
| - |
|
103 |
}
|
| Line 43... |
Line 104... |
| 43 |
//================================================================================================
|
104 |
}
|
| 44 |
|
- |
|
| 45 |
function afficherContenuCorps()
|
105 |
|
| 46 |
{
|
106 |
function afficherContenuCorps() {
|
| 47 |
global $image_x;
|
107 |
global $image_x;
|
| 48 |
global $image_y;
|
108 |
global $image_y;
|
| 49 |
global $historique_cartes;
|
109 |
global $historique_cartes;
|
| 50 |
global $mailer;
|
110 |
global $mailer;
|
| 51 |
global $fin;
|
111 |
global $fin;
|
| 52 |
global $sendpwd;//utilisé dans liste_inscrit.php
|
112 |
global $sendpwd;//utilisé dans liste_inscrit.php
|
| Line 53... |
Line 113... |
| 53 |
global $select;//utilisé dans liste_inscrit.php
|
113 |
global $select;//utilisé dans liste_inscrit.php
|
| 54 |
global $liste_zone_carte;
|
114 |
global $liste_zone_carte;
|
| 55 |
|
115 |
|
| 56 |
//=================================================================================================
|
116 |
//=================================================================================================
|
| 57 |
//Gestion de la configuration
|
117 |
//Gestion de la configuration
|
| 58 |
$requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['menu'];
|
118 |
$requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$GLOBALS['_GEN_commun']['info_menu']->gm_id_menu;
|
| 59 |
$resultat = $GLOBALS['ins_db']->query($requete) ;
|
119 |
$resultat = $GLOBALS['ins_db']->query($requete) ;
|
| 60 |
if (DB::isError($resultat)) {
|
120 |
if (DB::isError($resultat)) {
|
| 61 |
die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
|
121 |
die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
|
| 62 |
}
|
- |
|
| 63 |
if ($resultat->numRows()>0) {
|
- |
|
| 64 |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
|
- |
|
| 65 |
//valeurs par defaut enregistrees dans la table
|
- |
|
| 66 |
$titre=$ligne['cc_titre_carto'];
|
- |
|
| 67 |
$nom_table1=$ligne['cc_table1'];
|
- |
|
| 68 |
$nom_table2=$ligne['cc_table2'];
|
- |
|
| 69 |
$nom_champs_pays=$ligne['cc_pays'];
|
- |
|
| 70 |
$nom_champs_cp=$ligne['cc_cp'];
|
- |
|
| 71 |
$requete_sql=$ligne['cc_sql'];
|
- |
|
| 72 |
}
|
- |
|
| 73 |
|
- |
|
| 74 |
//=================================================================================================
|
- |
|
| 75 |
$requete_01 = 'SELECT CP_ID_Continent,count(cp_id_continent) AS nbr'.
|
- |
|
| 76 |
' FROM '.$nom_table1.', carto_PAYS';
|
- |
|
| 77 |
if ($nom_table2!=0) $requete_01 .= ', '.$nom_table2;
|
- |
|
| 78 |
$requete_01 .= ' WHERE '.$nom_champs_pays.' = cp_id_pays';
|
- |
|
| 79 |
if ($requete_sql!='') $requete_01 .= ' AND ('.$requete_sql.')';
|
- |
|
| 80 |
$requete_01 .= ' GROUP BY cp_id_continent';
|
- |
|
| 81 |
$resultat_01 = $GLOBALS['ins_db']->query($requete_01) ;
|
- |
|
| 82 |
if (DB::isError($resultat_01)) {
|
- |
|
| 83 |
die ($resultat_01->getMessage().'<br />'.$resultat_01->getDebugInfo()) ;
|
- |
|
| 84 |
}
|
- |
|
| 85 |
$tableau_ad_continent=array();
|
- |
|
| 86 |
while ($ligne_01 = $resultat_01->fetchRow(DB_FETCHMODE_OBJECT)) {
|
- |
|
| 87 |
$tableau_ad_continent[$ligne_01->CP_ID_Continent] = $ligne_01->nbr;
|
- |
|
| 88 |
|
- |
|
| 89 |
}
|
- |
|
| 90 |
$info_continent['nom_table_zone'] = 'carto_CONTINENT';
|
- |
|
| 91 |
$info_continent['nom_chp_id_zone'] = 'CC_ID_Continent';
|
- |
|
| 92 |
$info_continent['nom_chp_nom_zone'] = 'CC_Intitule_continent';
|
- |
|
| 93 |
$info_continent['nom_chp_rouge'] = 'CC_Couleur_R';
|
- |
|
| 94 |
$info_continent['nom_chp_vert'] = 'CC_Couleur_V';
|
- |
|
| 95 |
$info_continent['nom_chp_bleu'] = 'CC_Couleur_B';
|
- |
|
| 96 |
$info_continent['nom_chp_zone_sup'] = '';
|
- |
|
| 97 |
$info_continent['tableau_valeurs_zone'] = $tableau_ad_continent;
|
- |
|
| 98 |
|
- |
|
| 99 |
//============================================================================================================
|
- |
|
| 100 |
|
- |
|
| 101 |
$requete_02 = 'SELECT CC_ID_Continent FROM carto_CONTINENT';
|
- |
|
| 102 |
|
- |
|
| 103 |
$resultat_02 = $GLOBALS['ins_db']->query($requete_02) ;
|
- |
|
| 104 |
if (DB::isError($resultat_02)) {
|
- |
|
| 105 |
die ($resultat_02->getMessage().'<br />'.$resultat_02->getDebugInfo()) ;
|
- |
|
| 106 |
}
|
- |
|
| 107 |
|
- |
|
| 108 |
while ($ligne_02 = $resultat_02->fetchRow(DB_FETCHMODE_OBJECT)) {
|
- |
|
| 109 |
$requete_03 = 'SELECT CP_ID_Pays, count(cp_id_pays) as nbr '.
|
- |
|
| 110 |
' FROM '.$nom_table1.', carto_PAYS';
|
- |
|
| 111 |
if ($nom_table2!=0) $requete_03 .= ', '.$nom_table2;
|
- |
|
| 112 |
$requete_03 .= ' WHERE '.$nom_champs_pays.'= cp_id_pays';
|
- |
|
| 113 |
if ($requete_sql!='') $requete_03 .= ' AND ('.$requete_sql.')';
|
- |
|
| 114 |
$requete_03 .= ' AND cp_id_continent = "'.$ligne_02->CC_ID_Continent.'"'.
|
- |
|
| 115 |
' GROUP BY cp_id_pays';
|
- |
|
| 116 |
$resultat_03 = $GLOBALS['ins_db']->query($requete_03) ;
|
- |
|
| 117 |
if (DB::isError($resultat_03)) {
|
- |
|
| 118 |
die ($resultat_03->getMessage().'<br />'.$resultat_03->getDebugInfo()) ;
|
- |
|
| 119 |
}
|
- |
|
| 120 |
|
- |
|
| 121 |
$tableau_ad_pays = array();
|
- |
|
| Line 227... |
Line 274... |
| 227 |
return $res;
|
274 |
return $res;
|
| 228 |
|
275 |
|
| 229 |
//----------------------------------------------------------------------------------------------------------------------
|
276 |
//----------------------------------------------------------------------------------------------------------------------
|
| 230 |
// Cas ou la carto n'a pas encore ete configuree
|
277 |
// Cas ou la carto n'a pas encore ete configuree
|
| Line 231... |
Line 278... |
| 231 |
} else {
|
278 |
} else {
|
| 232 |
return '<p class="zone_alert">'.INS_FAUT_CONFIGURER_CARTO.'</p>'."\n";
|
279 |
return '<p class="zone_alert">'.INS_FAUT_CONFIGURER_CARTO.'</p>'."\n";
|
| 233 |
}
|
280 |
}
|
| - |
|
281 |
}
|
| - |
|
282 |
|
| - |
|
283 |
|
| - |
|
284 |
//-- Fin du code source ------------------------------------------------------------
|
| - |
|
285 |
/*
|
| - |
|
286 |
* $Log: not supported by cvs2svn $
|
| - |
|
287 |
* Revision 1.6 2006/12/01 13:23:17 florian
|
| - |
|
288 |
* integration annuaire backoffice
|
| - |
|
289 |
*
|
| - |
|
290 |
* Revision 1.5 2006/04/19 13:49:04 alexandre_tb
|
| - |
|
291 |
* correction de bug sur l'utilisation de l'id_menu de papyrus
|
| - |
|
292 |
*
|
| 234 |
}
|
293 |
* Revision 1.4 2006/04/10 14:01:36 florian
|
| 235 |
|
294 |
* uniformisation de l'appli bottin: plus qu'un fichier de fonctions
|
| 236 |
|
295 |
*
|
| 237 |
//-- Fin du code source ------------------------------------------------------------
|
296 |
* Revision 1.3 2006/04/04 12:23:05 florian
|
| 238 |
/*
|
297 |
* modifs affichage fiches, généricité de la carto, modification totale de l'appli annuaire
|