Subversion Repositories Applications.papyrus

<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */ 
// +------------------------------------------------------------------------------------------------------+
// | PHP version 4.1                                                                                      |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
// +------------------------------------------------------------------------------------------------------+
// | This library is free software; you can redistribute it and/or                                        |
// | modify it under the terms of the GNU Lesser General Public                                           |
// | License as published by the Free Software Foundation; either                                         |
// | version 2.1 of the License, or (at your option) any later version.                                   |
// |                                                                                                      |
// | This library is distributed in the hope that it will be useful,                                      |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
// | Lesser General Public License for more details.                                                      |
// |                                                                                                      |
// | You should have received a copy of the GNU Lesser General Public                                     |
// | License along with this library; if not, write to the Free Software                                  |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: annuaire_backoffice.php,v 1.6 2007-04-11 08:30:12 neiluj Exp $
/**
* programme principal du module annuaire_moteur
*
* programme principal du module annuaire_moteur
*
*@package annuaire
//Auteur original :
*@author        Alexandre Granier <alexandre@tela-botanica.org>
//Autres auteurs :
*@author        Aucun
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.6 $
// +------------------------------------------------------------------------------------------------------+
*/

// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+

// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+
include_once 'configuration/bottin.config.inc.php';
include_once INS_CHEMIN_APPLI.'bibliotheque/annuaire.fonct.php';
include_once INS_CHEMIN_APPLI.'bibliotheque/annuaire_backoffice.fonct.php';
include_once INS_CHEMIN_APPLI.'bibliotheque/inscription.class.php';
include_once INS_CHEMIN_APPLI.'bibliotheque/inscription.fonct.php';
$lang=INS_LANGUE_DEFAUT;
define ("ANN_MAIL_TOUS", 1) ;
define ("ANN_MAIL_TOUS_ENVOIE", 2) ;

// Recherche parametres menu actif : ils ne sont pas present dans le contexte, quel dommage !
$requete_menu =  'SELECT gm_application_arguments '.
                 'FROM gen_menu '.
                 'WHERE gm_id_menu = '.$_GET['menu'];         
$resultat_menu = $GLOBALS['_GEN_commun']['pear_db']->query($requete_menu);
$info_menu = $resultat_menu->fetchRow(DB_FETCHMODE_OBJECT);
$resultat_menu->free();
if (isset($info_menu->gm_application_arguments)) {
        $arguments = explode(' ', $info_menu->gm_application_arguments);
        for ($i = 0; $i < count($arguments); $i++) {
                $attr = explode('=', $arguments[$i]);
                if ($attr[0] != '') {
                $info_application->$attr[0] = (isset($attr[1]) ? $attr[1] : '');
                }
        }
}
//cas de l'annuaire admin papyrus, on modifie certaines constantes
if ($info_application->type_annuaire==1) {
        include_once INS_CHEMIN_APPLI.'configuration/annuaire_backoffice.config.inc.php';
}

function afficherContenuCorps () {
    global $statut ;

    if (!$GLOBALS['AUTH']->getAuth())  {
        $res = AUTH_formulaire_login() ;
    } else {
        if (isset($_REQUEST[INS_CHAMPS_ID])) {
            include_once (INS_CHEMIN_APPLI.'bibliotheque/edition_fiche.php');
            $GLOBALS['ins_url']->addQueryString (INS_CHAMPS_ID, $_REQUEST[INS_CHAMPS_ID]) ;
            return putFrame() ;
        }
        if (isset ($_GET['action'])) {
            include_once (INS_CHEMIN_APPLI.'bibliotheque/mail_tous.php') ;
            return putFrame() ;
        }
        if (isset($_REQUEST['ajouter'])) {
                return ajouterInscrit() ;       
        }
        $res = "<div>".mkengine()."</div>\n" ;
    }
    return $res ;
}

?>