Subversion Repositories Applications.papyrus

Rev

Rev 4 | Rev 22 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4 jpm 1
<?php
2
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3
// +------------------------------------------------------------------------------------------------------+
4
// | PHP version 4.1                                                                                      |
5
// +------------------------------------------------------------------------------------------------------+
6
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7
// +------------------------------------------------------------------------------------------------------+
8
// | This library is free software; you can redistribute it and/or                                        |
9
// | modify it under the terms of the GNU Lesser General Public                                           |
10
// | License as published by the Free Software Foundation; either                                         |
11
// | version 2.1 of the License, or (at your option) any later version.                                   |
12
// |                                                                                                      |
13
// | This library is distributed in the hope that it will be useful,                                      |
14
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16
// | Lesser General Public License for more details.                                                      |
17
// |                                                                                                      |
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                                  |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
15 alex 22
// CVS : $Id: pap_initialisation.fonct.php,v 1.2 2004-06-18 15:51:27 alex Exp $
4 jpm 23
/**
24
* Bibliothèque de fonction pour l'initialisation de Papyrus.
25
*
26
* Cette bibliothèque contient des fonctions utilisé lors de l'initialisation de Papyrus.
27
*
28
*@package Papyrus
29
*@subpackage Fonctions
30
//Auteur original :
31
*@author        Alexandre GRANIER <alexadandre@tela-botanica.org
32
//Autres auteurs :
33
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org
34
*@copyright     Tela-Botanica 2000-2004
15 alex 35
*@version       $Revision: 1.2 $ $Date: 2004-06-18 15:51:27 $
4 jpm 36
// +------------------------------------------------------------------------------------------------------+
37
*/
38
 
39
// +------------------------------------------------------------------------------------------------------+
40
// |                                            LISTE des FONCTIONS                                       |
41
// +------------------------------------------------------------------------------------------------------+
42
 
15 alex 43
/** Fonction donnerIdPremiereApplicationLiee() - Renvoie l'id de la première application liée à un menu et l'id du menu.
4 jpm 44
*
15 alex 45
* Cette fonction recherche l'application liée à un menu et l'identifiant de ce menu, mais comme il peut
4 jpm 46
* ne pas y en avoir, elle cherche alors l'application du menu fils qui
47
* lui-même peut ne pas en avoir, etc...
48
*
49
* @param integer l'identifiant d'un menu.
15 alex 50
* @return array tableau associatif indexé avec gm_id_menu et gm_ce_application et leur valeur
4 jpm 51
*/
52
function donnerIdPremiereApplicationLiee($id_menu)
53
{
54
    global $db;
55
    $aso_application_info = array();
56
 
15 alex 57
    $requete =  'SELECT gm_id_menu, gm_ce_application '.
4 jpm 58
                'FROM gen_menu '.
59
                'WHERE gm_id_menu = '.$id_menu;
60
 
61
    $resultat = $db->query($requete) ;
62
    (DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
63
 
64
    $aso_application_info =& $resultat->fetchRow(DB_FETCHMODE_ASSOC);
65
 
66
    if ($aso_application_info['gm_ce_application'] == 0) {
67
        // Le menu demandé n'a pas d'application liée, nous cherchons celle du premièr menu fils.
68
        $requete_fils = 'SELECT gm_id_menu '.
69
                        'FROM gen_menu, gen_menu_relation '.
70
                        'WHERE gmr_id_menu_02 = '.$id_menu.' '.
71
                        'AND gmr_id_valeur = 1 '.
72
                        'AND gmr_id_menu_01 = gm_id_menu '.
73
                        'ORDER BY gmr_ordre ASC ';
74
 
75
        $resultat_fils = $db->query($requete_fils) ;
76
        (DB::isError($resultat_fils))
77
            ? die (BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils))
78
            : '' ;
79
 
80
        if ($resultat_fils->numRows() >= 1) {
81
            // Nous avons un menu fils, nous rappelons récursivement la fontion avec son identifiant
82
            // pour récuperer l'application liée.
83
            $ligne_fils = $resultat_fils->fetchRow(DB_FETCHMODE_OBJECT);
84
            $aso_application_info = donnerIdPremiereApplicationLiee($ligne_fils->gm_id_menu);
85
        }
86
        else {
87
            // Gestion des erreurs sur la recherche de l'application liée.
88
            die('ERREUR Génésia : aucune application trouvable pour le menu demandé. <br />'.
89
                'Menu : '.$id_menu.'<br />'.
90
                'Ligne n° : '. __LINE__ . '<br />'.
91
                'Fichier : '. __FILE__ . '<br />');
92
        }
93
    }
15 alex 94
    return $aso_application_info ;
4 jpm 95
}
96
 
97
/* +--Fin du code ----------------------------------------------------------------------------------------+
98
*
99
* $Log: not supported by cvs2svn $
15 alex 100
* Revision 1.1  2004/06/15 15:10:44  jpm
101
* Changement de nom et d'arborescence de Genesia en Papyrus.
102
*
4 jpm 103
* Revision 1.6  2004/04/28 12:04:40  jpm
104
* Changement du modèle de la base de données.
105
*
106
* Revision 1.5  2004/04/09 16:23:41  jpm
107
* Prise en compte des tables i18n.
108
*
109
* Revision 1.4  2004/04/02 16:34:03  jpm
110
* Modifications de commentaires des fonctions.
111
*
112
* Revision 1.3  2004/04/01 11:24:51  jpm
113
* Ajout et modification de commentaires pour PhpDocumentor.
114
*
115
* Revision 1.2  2004/03/31 16:53:05  jpm
116
* Modification du code vis à vis du modèle revision 1.9 de Génésia.
117
*
118
* Revision 1.1  2004/03/29 14:53:25  jpm
119
* Création du fichier et ajout de la fonction donnerIdPremiereApplicationLiee().
120
*
121
* +-- Fin du code ----------------------------------------------------------------------------------------+
122
*/
123
?>