Subversion Repositories Applications.papyrus

Rev

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

Rev 327 Rev 386
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: adsi_site.fonct.php,v 1.21 2005-04-08 13:29:04 jpm Exp $
22
// CVS : $Id: adsi_site.fonct.php,v 1.22 2005-05-27 16:06:16 jpm Exp $
23
/**
23
/**
24
* Bibliothèque de fonctions d'admininistration des projets
24
* Bibliothèque de fonctions d'admininistration des projets
25
*
25
*
26
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
26
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
27
* sur les projets (=sites gérés par Papyrus).
27
* sur les projets (=sites gérés par Papyrus).
Line 32... Line 32...
32
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
32
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
33
//Autres auteurs :
33
//Autres auteurs :
34
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
34
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
35
*@author        Laurent COUDOUNEAU <lc@gsite.org>
35
*@author        Laurent COUDOUNEAU <lc@gsite.org>
36
*@copyright     Tela-Botanica 2000-2004
36
*@copyright     Tela-Botanica 2000-2004
37
*@version       $Revision: 1.21 $ $Date: 2005-04-08 13:29:04 $
37
*@version       $Revision: 1.22 $ $Date: 2005-05-27 16:06:16 $
38
// +------------------------------------------------------------------------------------------------------+
38
// +------------------------------------------------------------------------------------------------------+
39
*/
39
*/
Line 40... Line 40...
40
 
40
 
41
// +------------------------------------------------------------------------------------------------------+
41
// +------------------------------------------------------------------------------------------------------+
Line 163... Line 163...
163
* @param  string   un message à destination de l'utilisateur.
163
* @param  string   un message à destination de l'utilisateur.
164
* return  string   le code XHTML à retourner.
164
* return  string   le code XHTML à retourner.
165
*/
165
*/
166
function ADMIN_afficherFormSite(&$db, $url, $aso_valeurs = array(), $message = '')
166
function ADMIN_afficherFormSite(&$db, $url, $aso_valeurs = array(), $message = '')
167
{
167
{
168
    //initialisation des valeurs
168
    // Initialisation des valeurs
-
 
169
    $sortie = '';
169
    $aso_valeurs['modification'] = false;
170
    $aso_valeurs['modification'] = false;
170
    $aso_valeurs['defaut'] = false;
171
    $aso_valeurs['defaut'] = false;
171
    $aso_valeurs['type_site_externe'] = 0;
172
    $aso_valeurs['type_site_externe'] = 0;
172
    // Nous cherchons à savoir si nous somme en modification
173
    // Nous cherchons à savoir si nous somme en modification
173
    if (isset($aso_valeurs['form_sites_modifier'])) {
174
    if (isset($aso_valeurs['form_sites_modifier'])) {
Line 210... Line 211...
210
    } else if (isset($aso_valeurs['gs_id_site'])) {
211
    } else if (isset($aso_valeurs['gs_id_site'])) {
211
        $aso_valeurs['modification'] = true;
212
        $aso_valeurs['modification'] = true;
212
    }
213
    }
213
    // Débogage :
214
    // Débogage :
214
    //$GLOBALS['_DEBOGAGE_'] .= '<pre>'.print_r($aso_valeurs, true).'</pre>';
215
    //$GLOBALS['_DEBOGAGE_'] .= '<pre>'.print_r($aso_valeurs, true).'</pre>';
-
 
216
    //-------------------------------------------------------------------------------------------------------------------
-
 
217
    // Information précédent le formulaire (en modification)
-
 
218
    if (isset($aso_valeurs['modification'])) {
-
 
219
        $sortie .= '<p>'.'Identifiant de ce site : '.'<span id="adsi_site_id">'.$aso_valeurs['gs_id_site'].'</span></p>'."\n";
215
    
220
    }
216
    //----------------------------------------------------------------------------
221
    //-------------------------------------------------------------------------------------------------------------------
217
    // Création du formulaire
222
    // Création du formulaire
218
    $form =& new HTML_QuickForm('site', 'post', str_replace('&amp;', '&', $url));
223
    $form =& new HTML_QuickForm('site', 'post', str_replace('&amp;', '&', $url));
219
    $tab_index = 1000;
224
    $tab_index = 1000;
220
    $squelette =& $form->defaultRenderer();
225
    $squelette =& $form->defaultRenderer();
221
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
226
    $squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'."\n");
Line 361... Line 366...
361
    $label = '<label for="'.$id.'">'.'Langue : '.'</label>';
366
    $label = '<label for="'.$id.'">'.'Langue : '.'</label>';
362
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
367
    $form->addElement('select', $id, $label, $aso_options, $aso_attributs);
Line 363... Line 368...
363
    
368
    
364
    $id = 'defaut';
369
    $id = 'defaut';
365
    $aso_attributs = array('id' => $id, 'tabindex' => $tab_index++);
370
    $aso_attributs = array('id' => $id, 'tabindex' => $tab_index++);
366
    if ($aso_valeurs[$id] === true) {
371
    if (isset($aso_valeurs[$id]) && $aso_valeurs[$id] === true) {
367
        $aso_attributs['checked'] = 'checked';
372
        $aso_attributs['checked'] = 'checked';
368
    }
373
    }
369
    $label = '<label for="'.$id.'">'.'En faire le site par défaut : '.'</label>';
374
    $label = '<label for="'.$id.'">'.'En faire le site par défaut : '.'</label>';
Line 433... Line 438...
433
        $resultat_admin = $db->query($requete_admin);
438
        $resultat_admin = $db->query($requete_admin);
434
        if (DB::isError($resultat_admin)) {
439
        if (DB::isError($resultat_admin)) {
435
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_admin->getMessage(), $requete_admin));
440
            die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_admin->getMessage(), $requete_admin));
436
        }
441
        }
437
        $ligne_admin = $resultat_admin->fetchRow(DB_FETCHMODE_OBJECT);
442
        $ligne_admin = $resultat_admin->fetchRow(DB_FETCHMODE_OBJECT);
438
        $info_admin =   '<p class="info">Dernière modification par'.$ligne_admin->ga_prenom.' '.$ligne_admin->ga_nom.
443
        $info_admin =   '<p class="info">Site créé le '.$aso_valeurs['gs_date_creation'].'. Dernière modification par'.
439
                        ' le '.$aso_valeurs['gs_date_creation'].'</p>';
444
                        $ligne_admin->ga_prenom.' '.$ligne_admin->ga_nom.'.'.'</p>';
440
        $form->addElement('html', $info_admin);
445
        $form->addElement('html', $info_admin);
441
        $form->addElement('hidden', 'gs_ce_admin');
446
        $form->addElement('hidden', 'gs_ce_admin');
442
        $form->addElement('hidden', 'gs_date_creation');
447
        $form->addElement('hidden', 'gs_date_creation');
Line 443... Line 448...
443
        
448
        
Line 475... Line 480...
475
    GEN_stockerCodeScript($regles_javascript);
480
    GEN_stockerCodeScript($regles_javascript);
476
    */
481
    */
Line 477... Line 482...
477
    
482
    
478
    // Note de fin de formulaire
483
    // Note de fin de formulaire
479
    $form->setRequiredNote('Indique les champs obligatoires');
484
    $form->setRequiredNote('Indique les champs obligatoires');
Line 480... Line 485...
480
    $sortie = $form->toHTML()."\n";
485
    $sortie .= $form->toHTML()."\n";
481
    
486
    
482
    // Construction de la page.
487
    // Construction de la page.
Line 899... Line 904...
899
                'gs_raccourci_clavier = "'.$aso_valeurs['gs_raccourci_clavier'].'", '.
904
                'gs_raccourci_clavier = "'.$aso_valeurs['gs_raccourci_clavier'].'", '.
900
                'gs_titre = "'.$aso_valeurs['gs_titre'].'", '.
905
                'gs_titre = "'.$aso_valeurs['gs_titre'].'", '.
901
                'gs_mots_cles = "'.$aso_valeurs['gs_mots_cles'].'", '.
906
                'gs_mots_cles = "'.$aso_valeurs['gs_mots_cles'].'", '.
902
                'gs_description = "'.$aso_valeurs['gs_description'].'", '.
907
                'gs_description = "'.$aso_valeurs['gs_description'].'", '.
903
                'gs_auteur = "'.$aso_valeurs['gs_auteur'].'", '.
908
                'gs_auteur = "'.$aso_valeurs['gs_auteur'].'", '.
904
                'gs_date_creation = "'.date('Y-m-d H:i:s').'", '.
909
                'gs_date_creation = "'.$aso_valeurs['gs_date_creation'].'", '.
905
                'gs_ce_admin = '.$id_admin.' '.
910
                'gs_ce_admin = '.$id_admin.' '.
906
                $requete_complement.
911
                $requete_complement.
907
                'WHERE gs_id_site = '.$aso_valeurs['gs_id_site'];
912
                'WHERE gs_id_site = '.$aso_valeurs['gs_id_site'];
908
    $resultat = $db->query($requete) ;
913
    $resultat = $db->query($requete) ;
909
    if (DB::isError($resultat)) {
914
    if (DB::isError($resultat)) {
Line 1157... Line 1162...
1157
}
1162
}
Line 1158... Line 1163...
1158
 
1163
 
1159
// +- Fin du code source  --------------------------------------------------------------------------------+
1164
// +- Fin du code source  --------------------------------------------------------------------------------+
1160
/*
1165
/*
-
 
1166
* $Log: not supported by cvs2svn $
-
 
1167
* Revision 1.21  2005/04/08 13:29:04  jpm
-
 
1168
* Utiliation de références.
-
 
1169
* Correction du double &amp; dans les urls du formulaire.
1161
* $Log: not supported by cvs2svn $
1170
*
1162
* Revision 1.20  2005/03/08 11:17:47  jpm
1171
* Revision 1.20  2005/03/08 11:17:47  jpm
1163
* Suppression de l'inclusion d'un fichier inutile.
1172
* Suppression de l'inclusion d'un fichier inutile.
1164
*
1173
*
1165
* Revision 1.19  2005/02/28 11:07:00  jpm
1174
* Revision 1.19  2005/02/28 11:07:00  jpm