]> git.llucax.com Git - mecon/meconlib.git/blob - test/HTML/arbol.php
Se arreglan bugs reportados por Myrna.
[mecon/meconlib.git] / test / HTML / arbol.php
1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 tw=80 fdm=marker:
2 -------------------------------------------------------------------------------
3                              Ministerio de Economía
4                                     meconlib
5 -------------------------------------------------------------------------------
6 This file is part of meconlib.
7
8 meconlib is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2 of the License, or (at your option)
11 any later version.
12
13 meconlib is distributed in the hope that it will be useful, but WITHOUT
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
15 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
16  
17 You should have received a copy of the GNU General Public License; if not,
18 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
19 Boston, MA  02111-1307  USA
20 -------------------------------------------------------------------------------
21 Creado: jue jul 17 15:32:52 ART 2003
22 Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>
23 -------------------------------------------------------------------------------
24 $Id: Arbol.php 237 2003-07-17 22:41:48Z mmarre $
25 -----------------------------------------------------------------------------*/
26
27 require_once '../../lib/MECON/HTML/Arbol.php';
28
29 $dat = array( // Datos {{{
30     array(
31         'titulo' => 'Nivel0a',
32         'link' => 'blabla',
33         'id' => 1,
34         'sub' => array(//sub0 {{{
35             array(
36                 'titulo' => 'Nivel1a',
37                 'link' => 'blabla',
38                 'id' => 2,
39                 'sub' => array(//sub1 {{{
40                     array(
41                         'titulo' => 'Nivel3a',
42                         'link' => 'blabla',
43                         'id' => 5,
44                         'activado' => 1
45                     ),
46                     array(
47                         'titulo' => 'Nivel3b',
48                         'link' => 'blabla',
49                         'id' => 9,
50                         'sub' => array(//sub2 {{{
51                             array(
52                                 'titulo' => 'Nivel4',
53                                 'link' => 'blabla',
54                                 'id' => 8,
55                             )
56                         )//sub2 }}}
57                     ),
58                     array(
59                         'titulo' => 'Nivel3c',
60                         'link' => 'blabla',
61                         'id' => 7,
62                     )
63                 )//sub1 }}}
64             ),
65             array(
66                 'titulo' => 'Nivel1b',
67                 'link' => 'blabla',
68                 'id' => 13,
69                 'activado' => 1
70             ),
71             array(
72                 'titulo' => 'Nivel1c',
73                 'link' => 'blabla',
74                 'id' => 45,
75             )
76         )//sub0 }}}
77     ),
78     array(
79         'titulo' => 'Nivel0b',
80         'link' => 'blabla',
81         'id' => 16,
82     ),
83     array(
84         'titulo' => 'Nivel0c',
85         'link' => 'blabla',
86         'id' => 21,
87     )
88 ); // }}}
89
90 $arbol = new MECON_HTML_Arbol($dat, 'MI TITULO', '?raiz=');
91 echo '<link rel="stylesheet" href="'.$arbol->getCSS().'">';
92 echo $arbol->toHTML();
93 echo '<SELECT name="id">';
94 foreach ($arbol->toArray(false) as $id => $val) {
95     echo '<OPTION value="'.$id.'">'.$val.'</OPTION>';
96 }
97 echo '</SELECT>';
98 echo '<SELECT name="id">';
99 foreach ($arbol->toArray(true) as $id => $val) {
100     echo '<OPTION value="'.$id.'">'.$val.'</OPTION>';
101 }
102 echo '</SELECT>';
103 $arbol->setActivo(16);
104 echo $arbol->toHTML();
105 echo '<SELECT name="id">';
106 foreach ($arbol->toArray() as $id => $val) {
107     echo '<OPTION value="'.$id.'">'.$val.'</OPTION>';
108 }
109 echo '</SELECT>';
110 echo "<PRE>Raiz\n";
111 echo $arbol->toString();
112 echo '</PRE>';
113
114 ?>