Subversion Repositories Applications.papyrus

Rev

Rev 612 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 612 Rev 805
Line 17... Line 17...
17 
// |                                                                                                      |
 17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
 18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
 19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
 20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
 21 
// +------------------------------------------------------------------------------------------------------+
22 
// CVS : $Id: cartographie.admin.php,v 1.2 2005-11-24 16:17:52 florian Exp $
 22 
// CVS : $Id: cartographie.admin.php,v 1.3 2006-04-04 12:23:05 florian Exp $
23 
/**
 23 
/**
24 
*
24 
*
25 
*@package bazar
 25 
*@package bazar
26 
//Auteur original :
 26 
//Auteur original :
27 
*@author        Florian Schmitt <florian@ecole-et-nature.org>
 27 
*@author        Florian Schmitt <florian@ecole-et-nature.org>
28 
//Autres auteurs :
 28 
//Autres auteurs :
29 
*@copyright     Tela-Botanica 2000-2004
 29 
*@copyright     Tela-Botanica 2000-2004
30 
*@version       $Revision: 1.2 $ $Date: 2005-11-24 16:17:52 $
 30 
*@version       $Revision: 1.3 $ $Date: 2006-04-04 12:23:05 $
31 
// +------------------------------------------------------------------------------------------------------+
 31 
// +------------------------------------------------------------------------------------------------------+
32 
*/
 32 
*/
33 
// +------------------------------------------------------------------------------------------------------+
 33 
// +------------------------------------------------------------------------------------------------------+
34 
// |                                            ENT?E du PROGRAMME                                       |
 34 
// |                                            ENT?E du PROGRAMME                                       |
35 
// +------------------------------------------------------------------------------------------------------+
 35 
// +------------------------------------------------------------------------------------------------------+
Line 50... Line 50...
50 
    *   @return  string  Le HTML
 50 
    *   @return  string  Le HTML
51 
    */
 51 
    */
52 
    function afficherContenuCorps()
 52 
    function afficherContenuCorps()
53 
    {
 53 
    {
54 
        /** Inclusion du fichier de configuration de cette application.*/
 54 
        /** Inclusion du fichier de configuration de cette application.*/
55 
    require_once PAP_CHEMIN_RACINE.'client/bottin/configuration/bottin.config.inc.php';
 55 
        require_once PAP_CHEMIN_RACINE.'client/bottin/configuration/bottin.config.inc.php';
56 
	require_once INS_CHEMIN_APPLI.'configuration/cartographie.config.inc.php';
 56 
        require_once INS_CHEMIN_APPLI.'configuration/cartographie.config.inc.php';
57 
	require_once PAP_CHEMIN_RACINE.'api/pear/HTML/QuickForm.php' ;
 57 
        require_once 'HTML/QuickForm.php' ;
58
58
59 
        //-------------------------------------------------------------------------------------------------------------------
 59 
        //-------------------------------------------------------------------------------------------------------------------
60 
        // Initialisation des attributs
 60 
        // Initialisation des attributs
61 
        $this->objet_pear_auth = $GLOBALS['_GEN_commun']['pear_auth'];
 61 
        $this->objet_pear_auth = $GLOBALS['_GEN_commun']['pear_auth'];
62 
        $this->objet_pear_db = $GLOBALS['_GEN_commun']['pear_db'];
 62 
        $this->objet_pear_db = $GLOBALS['ins_db'];
63 
        $this->objet_pear_url = $GLOBALS['_GEN_commun']['url'];
 63 
        $this->objet_pear_url = $GLOBALS['_GEN_commun']['url'];
64 
        $this->sortie_xhtml = '';
 64 
        $this->sortie_xhtml = '<h1>'.INS_CONFIG_MENU.' '.$_GET['adme_menu_id'].'</h1><br />'."\n";
Line 65... Line 65...
65
65
- 
 
 66 
        //-------------------------------------------------------------------------------------------------------------------
- 
 
 67 
        // Gestion des boutons de l'interface
- 
 
 68 
        if (isset($_POST['afficheur_annuler'])) {
- 
 
 69 
            return false;
- 
 
 70 
        } else if (isset($_POST['afficheur_enregistrer_quitter'])) {
- 
 
 71 
            // Sauvegarde paramêtres carto
- 
 
 72 
            //on vérifie l'existence de la configuration, pour savoir si l'on fait un INSERT ou un UPDATE
- 
 
 73 
            $requete = 'SELECT cc_menu_id FROM carto_config WHERE cc_menu_id='.$_GET['adme_menu_id'];
- 
 
 74 
            $resultat = $this->objet_pear_db->query($requete) ;
- 
 
 75 
            if (DB::isError($resultat)) {
- 
 
 76 
            	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
- 
 
 77 
            }
- 
 
 78 
            if ($resultat->numRows()>0) {
- 
 
 79 
             	$requete = 'UPDATE carto_config SET cc_titre_carto="'.$_POST['titre_carto'].'", cc_table1="'.$_POST['nom_table1'].'", cc_table2="'.$_POST['nom_table2'].
- 
 
 80 
                           '", cc_pays="'.$_POST['nom_champs_pays'].'", cc_cp="'.$_POST['nom_champs_cp'].
- 
 
 81 
                           '", cc_sql="'.$_POST['requete_sql'].'" WHERE cc_menu_id='.$_GET['adme_menu_id'];
- 
 
 82 
            } else {
- 
 
 83 
             	$requete = 'INSERT INTO carto_config (cc_titre_carto, cc_menu_id, cc_table1, cc_table2, cc_pays, cc_cp, cc_sql)'.
- 
 
 84 
             	           ' VALUES ( "'.$_POST['titre_carto'].'", '.$_GET['adme_menu_id'].', "'.$_POST['nom_table1'].'", "'.$_POST['nom_table2'].
- 
 
 85 
						   '", "'.$_POST['nom_champs_pays'].'", "'.$_POST['nom_champs_cp'].'", "'.$_POST['requete_sql'].'")';
- 
 
 86 
            }
- 
 
 87 
            $resultat = $this->objet_pear_db->query($requete) ;
- 
 
 88 
            if (DB::isError($resultat)) {
- 
 
 89 
            	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
- 
 
 90 
            }
- 
 
 91 
            return false;
- 
 
 92 
        }
- 
 
 93
- 
 
 94 
        //--------------------------------------------------------------------------------------------------------------
- 
 
 95 
        // Gestion des valeurs par defauts, en fonctions des donnees sauvees dans carto_config
- 
 
 96 
        $requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['adme_menu_id'];
- 
 
 97 
        $resultat = $this->objet_pear_db->query($requete) ;
- 
 
 98 
        if (DB::isError($resultat)) {
- 
 
 99 
        	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
- 
 
 100 
        }
- 
 
 101 
        $valeurs_par_defaut = array();
- 
 
 102 
        if ($resultat->numRows()>0) {
- 
 
 103 
        	while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
- 
 
 104 
        		//valeurs par defaut enregistrees dans la table
- 
 
 105 
        		$valeurs_par_defaut['titre_carto']=$ligne['cc_titre_carto'];
- 
 
 106 
        		$valeurs_par_defaut['nom_table1']=$ligne['cc_table1'];
- 
 
 107 
        		$valeurs_par_defaut['nom_table2']=$ligne['cc_table2'];
- 
 
 108 
        		$valeurs_par_defaut['nom_champs_pays']=$ligne['cc_pays'];
- 
 
 109 
        		$valeurs_par_defaut['nom_champs_cp']=$ligne['cc_cp'];
- 
 
 110 
        		$valeurs_par_defaut['requete_sql']=$ligne['cc_sql'];
- 
 
 111 
        	}
- 
 
 112 
        } else {
- 
 
 113 
        	//valeurs par defaut pour afficher une carto des structures
- 
 
 114 
        	$valeurs_par_defaut['titre_carto']='';
- 
 
 115 
        	$valeurs_par_defaut['nom_table1']=INS_ANNUAIRE;
- 
 
 116 
        	$valeurs_par_defaut['nom_table2']=0;
- 
 
 117 
        	$valeurs_par_defaut['nom_champs_pays']=INS_CHAMPS_PAYS;
- 
 
 118 
        	$valeurs_par_defaut['nom_champs_cp']=INS_CHAMPS_CODE_POSTAL;
- 
 
 119 
        	$valeurs_par_defaut['requete_sql']='a_structure=1';
- 
 
 120 
        }
- 
 
 121
66 
        //-------------------------------------------------------------------------------------------------------------------
 122 
        //--------------------------------------------------------------------------------------------------------------
67 
	// Création du formulaire
 123 
        // Gestion du formulaire
68 
        $this->objet_pear_url->addQueryString('adme_site_id', 2);
 124 
        $this->objet_pear_url->addQueryString('adme_site_id', $_GET['adme_site_id']);
69 
        $this->objet_pear_url->addQueryString('adme_menu_id', 14);
 125 
        $this->objet_pear_url->addQueryString('adme_menu_id', $_GET['adme_menu_id']);
70 
        $this->objet_pear_url->addQueryString('adme_action', 'administrer');
 126 
        $this->objet_pear_url->addQueryString('adme_action', 'administrer');
71 
        $form =& new HTML_QuickForm('form_param_carto', 'post', str_replace('&amp;', '&', $this->objet_pear_url->getUrl()));
 127 
        $form =& new HTML_QuickForm('form_param_carto', 'post', str_replace('&amp;', '&', $this->objet_pear_url->getUrl()));
72 
        $squelette =& $form->defaultRenderer();
 128 
        $squelette =& $form->defaultRenderer();
73 
        $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'<ul>'."\n".'{content}'."\n".'</ul>'."\n".'</form>'."\n");
 129 
        $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'<table>'."\n".'{content}'."\n".'</table>'."\n".'</form>'."\n");
74 
        $squelette->setElementTemplate(  '<li>'."\n".
 - 
 
75 
                                        '{label}'."\n".
 130 
        $squelette->setElementTemplate( '<tr>'."\n".
76 
                                        '{element}'."\n".
 131 
                                        '<td style="padding:5px;text-align:right;">{label}'.
77 
                                        '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
 132 
                                        '<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".
- 
 
 133 
                                        '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
- 
 
 134 
										' : </td>'."\n".
78 
                                        '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
 135 
                                        '<td style="padding:5px;text-align:left;">{element}</td>'."\n".
- 
 
 136 
                                        '</tr>'."\n" );
79 
                                        '</li>'."\n");
 137 
        $form->addElement('text', 'titre_carto', INS_TITRE_CARTO);
80 
        $requete = 'SHOW TABLES FROM '.$this->objet_pear_db->dsn['database'];
 138 
        $requete = 'SHOW TABLES FROM '.$this->objet_pear_db->dsn['database'];
81 
        $resultat = $this->objet_pear_db->query($requete) ;
 139 
        $resultat = $this->objet_pear_db->query($requete) ;
82 
        if (DB::isError($resultat)) {
 140 
        if (DB::isError($resultat)) {
83 
        	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
 141 
        	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
Line 86... Line 144...
86 
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
 144 
        while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
87 
        	$option_tables[$ligne['Tables_in_'.$this->objet_pear_db->dsn['database']]] =  $ligne['Tables_in_'.$this->objet_pear_db->dsn['database']];
 145 
        	$option_tables[$ligne['Tables_in_'.$this->objet_pear_db->dsn['database']]] =  $ligne['Tables_in_'.$this->objet_pear_db->dsn['database']];
88 
        }
 146 
        }
89 
        $javascript= array('onchange' => 'javascript:this.form.submit();');
 147 
        $javascript= array('onchange' => 'javascript:this.form.submit();');
90 
        $form->addElement('select', 'nom_table1', INS_TABLE, $option_tables, $javascript);
 148 
        $form->addElement('select', 'nom_table1', INS_TABLE, $option_tables, $javascript);
91
149
92 
	$requete = $requete = 'SELECT * FROM carto_config WHERE cc_menu_id='.$_GET['adme_menu_id'];
 - 
 
93 
	$resultat = $this->objet_pear_db->query($requete) ;
 - 
 
94 
	if (DB::isError($resultat)) {
 - 
 
95 
		die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
 - 
 
96 
	}
 - 
 
97 
	echo '<pre>'.print_r($_POST, true).'</pre>';
 - 
 
98 
	if (($resultat->numRows()>0)or(isset($_POST['nom_table1']))) {
 150 
        if (isset($_POST['nom_table1'])) {
99 
		if (isset($_POST['nom_table1'])) {
 151 
        	$table=$_POST['nom_table1'];
- 
 
 152 
        } else {
100 
				$ligne['cc_table1']=$_POST['nom_table1'];
 153 
        	$table=$valeurs_par_defaut['nom_table1'];
101 
		}
 154 
        }
102
- 
 
103 
		$requete = $requete = 'SHOW COLUMNS FROM '.$ligne['cc_table1'];
 155 
        $requete = 'SHOW COLUMNS FROM '.$table;
104 
		$resultat = $this->objet_pear_db->query($requete) ;
 156 
        $resultat = $this->objet_pear_db->query($requete) ;
105 
		if (DB::isError($resultat)) {
 157 
        if (DB::isError($resultat)) {
106 
			die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
 158 
        	die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;
107 
		}
 159 
        }
108 
		$option_champs = array();
 160 
       	$option_champs = array();
109 
		$i=0;
 - 
 
110 
		while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
 - 
 
111 
			$option_champs[$i] =  $ligne['Field'];
 - 
 
112 
			$i++;
 - 
 
113 
		}
 - 
 
114 
		$form->addElement('select', 'nom_champs_pays', INS_NOM_CHAMPS_PAYS, $option_champs);
 - 
 
115 
		$form->addElement('select', 'nom_champs_cp', INS_NOM_CHAMPS_CP, $option_champs);
 - 
 
116 
		$option_tables[0] = INS_PAS_NECESSAIRE;
 - 
 
117 
		$form->addElement('select', 'nom_table2', INS_TABLE_SUPPLEMENTAIRE, $option_tables);
 - 
 
118 
		$form->addElement('text', 'requete_sql', INS_REQUETE_SQL_SUPPLEMENTAIRE);
 - 
 
119 
		while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
 161 
		while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
120 
			//valeurs par defaut
 162 
			$option_champs[$ligne['Field']] =  $ligne['Field'];
121 
		}
 163 
		}
122
- 
 
123 
	}
 - 
 
124
- 
 
- 
 
 164 
       	$form->addElement('select', 'nom_champs_pays', INS_NOM_CHAMPS_PAYS, $option_champs);
- 
 
 165 
       	$form->addElement('select', 'nom_champs_cp', INS_NOM_CHAMPS_CP, $option_champs);
- 
 
 166 
       	$option_tables[0] = INS_PAS_NECESSAIRE;
- 
 
 167 
       	$form->addElement('select', 'nom_table2', INS_TABLE_SUPPLEMENTAIRE, $option_tables);
- 
 
 168 
       	$form->addElement('text', 'requete_sql', INS_REQUETE_SQL_SUPPLEMENTAIRE);
125 
        $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
 169 
        $liste_bouton_debut = '<ul class="liste_bouton">'."\n";
126 
        $form->addElement('html', $liste_bouton_debut);
 170 
        $form->addElement('html', $liste_bouton_debut);
127 
        $form->addElement('submit', 'afficheur_enregistrer_quitter', INS_ENREGISTRER_ET_QUITTER);
 171 
        $form->addElement('submit', 'afficheur_enregistrer_quitter', INS_ENREGISTRER_ET_QUITTER);
128 
        $form->addElement('submit', 'afficheur_annuler', INS_ANNULER);
 172 
        $form->addElement('submit', 'afficheur_annuler', INS_ANNULER);
129 
        $liste_bouton_fin = '</ul>'."\n";
 173 
        $liste_bouton_fin = '</ul>'."\n";
130 
        $form->addElement('html', $liste_bouton_fin);
 174 
        $form->addElement('html', $liste_bouton_fin);
- 
 
 175 
        $form->setDefaults($valeurs_par_defaut);
131 
        $this->sortie_xhtml .= $form->toHTML()."\n";
 176 
        $this->sortie_xhtml .= $form->toHTML()."\n";
132
- 
 
133 
        return $this->sortie_xhtml;
 177 
        return $this->sortie_xhtml;
134 
    }
 178 
    }
Line 135... Line 179...
135 
 
 179 
 
Line 136... Line 180...
136 
}// Fin de la classe
 180 
}// Fin de la classe
137 
 
 181 
 
138 
// +------------------------------------------------------------------------------------------------------+
 182 
// +------------------------------------------------------------------------------------------------------+
139 
// |                                            PIED du PROGRAMME                                         |
 - 
 
140 
// +------------------------------------------------------------------------------------------------------+
 183 
// |                                            PIED du PROGRAMME                                         |
141 
 
 184 
// +------------------------------------------------------------------------------------------------------+