Subversion Repositories Applications.papyrus

Compare Revisions

Ignore whitespace Rev 804 → Rev 805

/trunk/client/bottin/cartographie.php
26,11 → 26,11
*@version 03 mai 2004
// +-----------------------------------------------------------------------------------------------+
//
// $Id: cartographie.php,v 1.2 2005-11-24 16:17:52 florian Exp $
// $Id: cartographie.php,v 1.3 2006-04-04 12:23:05 florian Exp $
// FICHIER : $RCSfile: cartographie.php,v $
// AUTEUR : $Author: florian $
// VERSION : $Revision: 1.2 $
// DATE : $Date: 2005-11-24 16:17:52 $
// VERSION : $Revision: 1.3 $
// DATE : $Date: 2006-04-04 12:23:05 $
*/
include_once PAP_CHEMIN_RACINE.'/client/bottin/configuration/bottin.config.inc.php';
include_once INS_CHEMIN_APPLI.'configuration/cartographie.config.inc.php';
54,18 → 54,35
global $liste_zone_carte;
//=================================================================================================
$requete_01 =
"SELECT CP_ID_Continent,count(cp_id_continent) AS nbr".
" FROM ".INS_ANNUAIRE.", carto_PAYS".
" WHERE ".INS_CHAMPS_PAYS." = cp_id_pays".
" GROUP BY cp_id_continent";
//Gestion de la configuration
$requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['menu'];
$resultat = $GLOBALS['ins_db']->query($requete) ;
if (DB::isError($resultat)) {
die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
}
if ($resultat->numRows()>0) {
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
//valeurs par defaut enregistrees dans la table
$titre=$ligne['cc_titre_carto'];
$nom_table1=$ligne['cc_table1'];
$nom_table2=$ligne['cc_table2'];
$nom_champs_pays=$ligne['cc_pays'];
$nom_champs_cp=$ligne['cc_cp'];
$requete_sql=$ligne['cc_sql'];
}
//=================================================================================================
$requete_01 = 'SELECT CP_ID_Continent,count(cp_id_continent) AS nbr'.
' FROM '.$nom_table1.', carto_PAYS';
if ($nom_table2!=0) $requete_01 .= ', '.$nom_table2;
$requete_01 .= ' WHERE '.$nom_champs_pays.' = cp_id_pays';
if ($requete_sql!='') $requete_01 .= ' AND ('.$requete_sql.')';
$requete_01 .= ' GROUP BY cp_id_continent';
$resultat_01 = $GLOBALS['ins_db']->query($requete_01) ;
if (DB::isError($resultat_01)) {
die ($resultat_01->getMessage().'<br />'.$resultat_01->getDebugInfo()) ;
}
$tableau_ad_continent=array();
}
$tableau_ad_continent=array();
while ($ligne_01 = $resultat_01->fetchRow(DB_FETCHMODE_OBJECT)) {
$tableau_ad_continent[$ligne_01->CP_ID_Continent] = $ligne_01->nbr;
89,13 → 106,13
}
while ($ligne_02 = $resultat_02->fetchRow(DB_FETCHMODE_OBJECT)) {
$requete_03 =
'SELECT CP_ID_Pays, count(cp_id_pays) as nbr '.
' FROM '.INS_ANNUAIRE.', carto_PAYS'.
' WHERE '.INS_CHAMPS_PAYS.'= cp_id_pays'.
' AND cp_id_continent = "'.$ligne_02->CC_ID_Continent.'"'.
' GROUP BY cp_id_pays';
$requete_03 = 'SELECT CP_ID_Pays, count(cp_id_pays) as nbr '.
' FROM '.$nom_table1.', carto_PAYS';
if ($nom_table2!=0) $requete_03 .= ', '.$nom_table2;
$requete_03 .= ' WHERE '.$nom_champs_pays.'= cp_id_pays';
if ($requete_sql!='') $requete_03 .= ' AND ('.$requete_sql.')';
$requete_03 .= ' AND cp_id_continent = "'.$ligne_02->CC_ID_Continent.'"'.
' GROUP BY cp_id_pays';
$resultat_03 = $GLOBALS['ins_db']->query($requete_03) ;
if (DB::isError($resultat_03)) {
die ($resultat_03->getMessage().'<br />'.$resultat_03->getDebugInfo()) ;
102,7 → 119,6
}
$tableau_ad_pays = array();
while ($ligne_03 = $resultat_03->fetchRow(DB_FETCHMODE_OBJECT)) {
$tableau_ad_pays[$ligne_03->CP_ID_Pays] = $ligne_03->nbr;
}
117,48 → 133,27
$info_pays[$ligne_02->CC_ID_Continent]['tableau_valeurs_zone'] = $tableau_ad_pays;
}
//============================================================================================================
//récupération du numéro de département à partir du code postal
$requete_cp = 'SELECT a_code_postal FROM '.INS_ANNUAIRE.' WHERE '.INS_CHAMPS_PAYS.' = "fr"';
$resultat_cp = $GLOBALS['ins_db']->query($requete_cp) ;
if (DB::isError($resultat_cp)) {
die('
<h2 class="erreur">Erreur de requête</h2>'.
'<b>Requete : </b>'.$requete_cp.
'<br/><br/><b>Erreur : </b>'.$resultat_cp->getMessage());
}
$tableau_ad_dpt_france = array();
while ($ligne_cp = $resultat_cp->fetchRow(DB_FETCHMODE_ASSOC)) {
if (preg_match("/^97|98[0-9]*/", $ligne_cp['a_code_postal'])) {
$n_dpt = substr($ligne_cp['a_code_postal'], 0, 3) ;
} else {
$n_dpt = substr($ligne_cp['a_code_postal'], 0, 2) ;
}
$requete_04 = 'SELECT cd_id_departement '.
' FROM '.INS_ANNUAIRE.', carto_DEPARTEMENT'.
' WHERE '.INS_CHAMPS_PAYS.' = "fr"'.
' AND cd_id_departement = '.$n_dpt;
$resultat_04 = $GLOBALS['ins_db']->query($requete_04) ;
if (DB::isError($resultat_04)) {
die('
<H2 class="erreur">Erreur de requête</H2>'.
'<b>Requete : </b>'.$requete_04.
'<br/><br/><b>Erreur : </b>'.$resultat_04->getMessage());
}
while ($ligne_04 = $resultat_04->fetchRow(DB_FETCHMODE_OBJECT)) {
$tableau_ad_dpt_france[$ligne_04->cd_id_departement] = $resultat_04->numRows();
}
}
//if (!isset($_POST['historique_cartes']) && INS_ECHELLE_DEPART!='france') {
$requete_04 = 'SELECT CD_ID_Departement, count(cd_id_departement) as nbr'.
' FROM '.$nom_table1.', carto_DEPARTEMENT'.
' WHERE '.$nom_champs_pays.' = "fr"'.
' AND SUBSTRING('.$nom_champs_cp.' FROM 1 FOR 2) = cd_id_Departement'.
' GROUP BY cd_id_Departement';
$resultat_04 = $GLOBALS['ins_db']->query ($requete_04) ;
$tableau_ad_dpt_france = array();
while ($ligne_04 = $resultat_04->fetchRow(DB_FETCHMODE_OBJECT)) {
$tableau_ad_dpt_france[$ligne_04->CD_ID_Departement] = $ligne_04->nbr;
}
$info_dpt_france['nom_table_zone'] = 'carto_DEPARTEMENT';
$info_dpt_france['nom_chp_id_zone'] = 'CD_ID_Departement';
$info_dpt_france['nom_chp_nom_zone'] = 'CD_Intitule_departement';
$info_dpt_france['nom_chp_rouge'] = 'CD_Couleur_R';
$info_dpt_france['nom_chp_vert'] = 'CD_Couleur_V';
$info_dpt_france['nom_chp_bleu'] = 'CD_Couleur_B';
$info_dpt_france['nom_chp_zone_sup'] = 'CD_ID_Pays';
$info_dpt_france['tableau_valeurs_zone'] = $tableau_ad_dpt_france;
//}
$info_dpt_france['nom_table_zone'] = 'carto_DEPARTEMENT';
$info_dpt_france['nom_chp_id_zone'] = 'CD_ID_Departement';
$info_dpt_france['nom_chp_nom_zone'] = 'CD_Intitule_departement';
$info_dpt_france['nom_chp_rouge'] = 'CD_Couleur_R';
$info_dpt_france['nom_chp_vert'] = 'CD_Couleur_V';
$info_dpt_france['nom_chp_bleu'] = 'CD_Couleur_B';
$info_dpt_france['nom_chp_zone_sup'] = 'CD_ID_Pays';
$info_dpt_france['tableau_valeurs_zone'] = $tableau_ad_dpt_france;
//============================================================================================================
 
165,11 → 160,13
//============================================================================================================
// On cree tout d'abord l'arborescence
$monde = new Carto_Carte('continent', '', 'Monde', 'monde_masque5c.png', 'monde5c.png', INS_CHEMIN_APPLI.'presentations/fonds/', $info_continent);
$monde->definirCouleurs('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
$monde->historique_cartes = $historique_cartes;
$monde = new Carto_Carte('continent', '', 'Monde', 'monde_masque5c.png', 'monde5c.png', INS_CHEMIN_APPLI.'presentations/fonds/', $info_continent);
$monde->definirCouleurs('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
if (isset($_POST['historique_cartes'])) {
$monde->historique_cartes = $_POST['historique_cartes'];
} else {
$monde->historique_cartes = INS_ECHELLE_DEPART;
}
$monde->image_x = $image_x;
$monde->image_y = $image_y;
$monde->liste_zone_carte = $liste_zone_carte;
186,10 → 183,8
$resultat_05 = $GLOBALS['ins_db']->query ($requete_05) ;
if (DB::isError($resultat_05)) {
die ($resultat_05->getMessage().'<br />'.$resultat_05->getDebugInfo()) ;
}
$ligne_05 = $resultat_05->fetchRow(DB_FETCHMODE_OBJECT);
}
$ligne_05 = $resultat_05->fetchRow(DB_FETCHMODE_OBJECT);
$monde->ajouterFils($ligne_05->CDC_ID_Carte, $ligne_05->CDC_ID_Zone_geo_carte, $ligne_05->CDC_Titre_carte,
$ligne_05->CDC_Carte_masque, $ligne_05->CDC_Carte_fond, $valeur);
$monde->fils[$ligne_05->CDC_ID_Carte]->definirCouleurs ('255', '255', '255','255', '250', '130','255', '204', '0','255', '153', '0') ;
201,9 → 196,7
// Une fois l'arborescence créée on lance la methode donnerFormulaireImage() pour recuperer la carte
// (dans $img). S'il n'y a pas de carte a afficher donnerFormulaireImage() renvoi false. On peut alors recuperer
// le niveau ou on en est grace a $monde->historique (du type continent*namerique*ca).
$res = '';
$img = false;
if ($mailer == 1 || $fin == true) {
$objet_carte = $_SESSION['carte'] ;
211,25 → 204,33
else {
$img = $monde->donnerFormulaireImage();
}
// On teste donc img
// Quoi qu'il arrive, on ouvre la balise formulaire
if ($titre!='') $res = '<h1>'.$titre.'</h1>'."\n";
else $res = '<h1>'.INS_CARTOGRAPHIE.'</h1>'."\n";
$res .= '<form action="'.$monde->url.'" method="post">'."\n";
if ((INS_AFFICHE_ECHELLE)and($img)) {
$historique_carte = new Carto_HistoriqueCarte ($monde, '&gt;', 'chemin_carto');
$res .= $historique_carte->afficherHistoriqueCarte()."\n" ;
}
if (!$img ) {
include 'bibliotheque/cartographie.fonct.liste_inscrit.php';
//include 'bibliotheque/cartographie.fonct.liste_inscrit.php';
$res .= carto_liste_fiches($monde, $nom_table1, $nom_table2, $nom_champs_pays, $nom_champs_cp, $requete_sql);
return $res;
}
else {
// Quoi qu'il arrive, on ouvre la balise formulaire
$res = '<form action="'.$monde->url.'" method="post">'."\n";
$historique_carte = new Carto_HistoriqueCarte ($monde, '&gt;', 'chemin_carto');
$res .= $historique_carte->afficherHistoriqueCarte()."\n" ;
$res .= $img;
$res .= '</form>'."\n";
$res .= '<p style="text-align: center;">'."\n";
} else {
$res .= $img;
$res .= '<p class="zone_info">'."\n";
$res .= '<strong>'.INS_CLIQUER_ACCEDER.'</strong><br />'."\n";
$res .= INS_COULEUR."\n".'</p>'."\n";
return $res;
$res .= INS_COULEUR."\n".'</p>'."\n";
}
$res .= '</form>'."\n";
return $res;
//----------------------------------------------------------------------------------------------------------------------
// Cas ou la carto n'a pas encore ete configuree
} else {
return '<p class="zone_alert">'.INS_FAUT_CONFIGURER_CARTO.'</p>'."\n";
}
}
 
 
236,6 → 237,9
//-- Fin du code source ------------------------------------------------------------
/*
* $Log: not supported by cvs2svn $
* Revision 1.2 2005/11/24 16:17:52 florian
* changement template inscription + modifs carto
*
* Revision 1.1 2005/09/22 14:02:49 ddelon
* nettoyage annuaire et php5
*