Subversion Repositories Applications.papyrus

Rev

Rev 832 | Rev 1417 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 832 Rev 1028
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: selecteur_sites.php,v 1.9 2006-04-28 12:41:49 florian Exp $
 22 
// CVS : $Id: selecteur_sites.php,v 1.10 2006-10-11 17:20:19 jp_milcent Exp $
23 
/**
 23 
/**
24 
* Applette : selecteur sites
 24 
* Applette : selecteur sites
25 
*
 25 
*
26 
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles.
 26 
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles.
27 
* Nécessite :
 27 
* Nécessite :
Line 38... Line 38...
38 
//Auteur original :
 38 
//Auteur original :
39 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 39 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
40 
//Autres auteurs :
 40 
//Autres auteurs :
41 
*@author        Aucun
 41 
*@author        Aucun
42 
*@copyright     Tela-Botanica 2000-2004
 42 
*@copyright     Tela-Botanica 2000-2004
43 
*@version       $Revision: 1.9 $ $Date: 2006-04-28 12:41:49 $
 43 
*@version       $Revision: 1.10 $ $Date: 2006-10-11 17:20:19 $
44 
// +------------------------------------------------------------------------------------------------------+
 44 
// +------------------------------------------------------------------------------------------------------+
45 
*/
 45 
*/
Line 46... Line 46...
46 
 
 46 
 
47 
// +------------------------------------------------------------------------------------------------------+
 47 
// +------------------------------------------------------------------------------------------------------+
Line 160... Line 160...
160 
    			}
 160 
    			}
161 
    			else {
 161 
    			else {
162 
    				$liste_site[]=$ligne;
 162 
    				$liste_site[] = $ligne;
163 
    			}
 163 
    			}
164 
    }
 164 
    }
165
- 
 
166 
    $resultat->free();
 165 
    $resultat->free();
Line 167... Line -...
167
- 
 
168 
 
 166 
 
169 
    // Si la langue en cours n'est pas la langue par défaut, recherche des sites ayant comme langue
 167 
    // Si la langue en cours n'est pas la langue par défaut, recherche des sites ayant comme langue
Line 170... Line -...
170 
    // la langue par defaut et non traduits dans la langue en cours.
 - 
 
171
168 
    // la langue par defaut et non traduits dans la langue en cours.
172 
 
 - 
 
173 
    // On recherche l'ensemble des site en excluant le site admin (administration de Papyrus).
 169 
 
174 
 
 - 
 
175 
	if ($langue_test != GEN_I18N_ID_DEFAUT) {
 - 
 
176
170 
    // On recherche l'ensemble des site en excluant le site admin (administration de Papyrus).
177
171 
	if ($langue_test != GEN_I18N_ID_DEFAUT) {
178 
    // Site ayant commme langue, la langue par defaut
172 
    // Site ayant commme langue, la langue par defaut
179 
	    $requete =  'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '.
 173 
	    $requete =  'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '.
180 
	                'FROM gen_site, gen_site_relation '.
 174 
	                'FROM gen_site, gen_site_relation '.
Line 187... Line 181...
187
181
188 
	    $resultat = $objet_pear_db->query($requete);
 182 
	    $resultat = $objet_pear_db->query($requete);
Line 189... Line 183...
189 
	    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
 183 
	    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
190
- 
 
191 
	    // Est il traduit ? Non, alors affichage
184
192
- 
 
193 
	    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
 185 
	    // Est il traduit ? Non, alors affichage
194
186 
	    while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {
195 
				if (isset($id_langue) && ($id_langue!='')) {
 187 
				if (isset($id_langue) && ($id_langue != '')) {
196 
					$langue_test=$id_langue;
 188 
					$langue_test=$id_langue;
197 
				} else {
 189 
				} else {
Line 209... Line 201...
209 
	            (DB::isError($resultat_est_traduction))
 201 
	            (DB::isError($resultat_est_traduction))
210 
	                ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction))
 202 
	                ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction))
211 
	                : '';
 203 
	                : '';
Line 212... Line 204...
212
204
213 
	            if ( $resultat_est_traduction->numRows() == 0 ) {
 - 
 
214
- 
 
215
- 
 
216
205 
	            if ( $resultat_est_traduction->numRows() == 0 ) {
217 
		    		$requete_traduction =   'SELECT gsr_id_site_01 '.
 206 
		    		$requete_traduction =   'SELECT gsr_id_site_01 '.
218 
		                                    'FROM  gen_site_relation, gen_site '.
 207 
		                                    'FROM  gen_site_relation, gen_site '.
219 
		                                    'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_01 ' .
 208 
		                                    'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_01 ' .
220 
		                                    'AND gsr_id_site_02 = gs_id_site '.
 209 
		                                    'AND gsr_id_site_02 = gs_id_site '.
Line 297... Line 286...
297 
 
 286 
 
298 
 
 287 
 
299 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 288 
/* +--Fin du code ----------------------------------------------------------------------------------------+
- 
 
 289 
*
- 
 
 290 
* $Log: not supported by cvs2svn $
- 
 
 291 
* Revision 1.9  2006/04/28 12:41:49  florian
300 
*
 292 
* corrections erreurs chemin
301 
* $Log: not supported by cvs2svn $
 293 
*
302 
* Revision 1.8  2006/03/02 10:49:49  ddelon
 294 
* Revision 1.8  2006/03/02 10:49:49  ddelon
303 
* Fusion branche multilinguisme dans branche principale
 295 
* Fusion branche multilinguisme dans branche principale
304 
*
 296 
*