]> git.llucax.com Git - mecon/meconlib.git/blob - lib/MECON/Marco/MenuVertical.php
- Se cambiaron los nombres y ubicaciones de los archivos genericos (imagenes, estilos...
[mecon/meconlib.git] / lib / MECON / Marco / MenuVertical.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
3 // +----------------------------------------------------------------------+
4 // | PHP Version 4                                                        |
5 // +----------------------------------------------------------------------+
6 // | Copyright (c) 1997-2003 The PHP Group                                |
7 // +----------------------------------------------------------------------+
8 // | This source file is subject to version 2.02 of the PHP license,      |
9 // | that is bundled with this package in the file LICENSE, and is        |
10 // | available at through the world-wide-web at                           |
11 // | http://www.php.net/license/2_02.txt.                                 |
12 // | If you did not receive a copy of the PHP license and are unable to   |
13 // | obtain it through the world-wide-web, please send a note to          |
14 // | license@php.net so we can mail you a copy immediately.               |
15 // +----------------------------------------------------------------------+
16 // | Created: Tue Apr 29 12:35:45 2003
17 // | Author:  Martin Marrese <mmarre@mecon.gov.ar>
18 // +----------------------------------------------------------------------+
19 //
20 // $Id$
21 // $Author$
22 // $URL$
23 // $Date$
24 // $Rev$
25 //
26
27 #require_once 'PEAR.php';
28
29
30 // +X2C includes
31 require_once 'MECON/Marco/Menu.php';
32 // ~X2C
33
34 // +X2C Class 103 :MenuVertical
35 /**
36  * Clase que se encarga del manejo de los menues verticales
37  *
38  * @access public
39  */
40 class MenuVertical extends Menu {
41     // ~X2C
42
43
44     // +X2C Operation 110
45     /**
46      * Constructor. Recibe el nombre del directorio en donde esta instalado el sistema
47      *
48      * @param  array $configuracion Configuracion del sistema
49      *
50      * @return void
51      * @access public
52      */
53     function MenuVertical($configuracion = null) // ~X2C
54     {
55         parent::Menu($configuracion);
56     }
57     // -X2C
58
59     // +X2C Operation 141
60     /**
61      * Funcion para agregar el cuerpo de la pagina a la pagina
62      *
63      * @param  string $body Cuerpo del mensaje para agregar a la pagina
64      * @param  string $titulo Titulo de la seccion seleccionada
65      *
66      * @return void
67      * @access public
68      */
69     function addBody($body, $titulo) // ~X2C
70     {
71         $c= count($this->_componentes); 
72         
73         $tmp = $this->_componentes;
74         $this->_componentes = array ();
75         $this->_armarArraySecciones($tmp);
76         
77         $TABLA = new HTML_Table('width=160 align="left" bgcolor="#FFFFFF" cellspacing="0" cellpadding="0" border="0" height="1"');             
78         $menu ='<img src="/MECON/images/general_carpeta0" border="0">&nbsp;<font face="Arial, Helvetica, sans-serif" size="2" color="#000000"><b>'.$titulo.'</b></font>';
79         $row = array ($menu);
80         $TABLA->addRow($row,'align="left" bgcolor="#FFFFFF" height="1"');        
81         $TABLA->updateCellAttributes(0,0,'colspan="2"');
82        
83         foreach ($this->_componentesVertical as $comp) {
84             $row = array ('<img src="/MECON/images/general_carp" border="0">',' ');
85             $TABLA->addRow($row);        
86             $TABLA->addRow($comp,'align="left" bgcolor="#FFFFFF" height="1"');
87             $TABLA->updateColAttributes(0,'align="right" width="34"');
88             $TABLA->updateColAttributes(1,'align="left"');
89         }
90         $TABLA->updateCellAttributes(0,0,'align="left"');
91         $row = array ($TABLA->toHtml());
92         $this->_tabla->addRow($row,'width=160 align="left" bgcolor="#FFFFFF" valign="top" rowspan="2"');
93  
94         $tmp='<BR>';
95         foreach ($body as $bod) {
96             if (is_object($bod)) {
97                 if (method_exists($bod,'toHtml')) {
98                     $tmp.=$bod->toHtml();
99                 }
100                 else {
101                     trigger_error('El metodo no existe! - '.get_class($bod).'::toHtml()', E_USER_WARNING);
102                 }                
103             }
104             else {
105                 $tmp.=$bod;
106             }
107         }        
108         $row = array ($tmp);
109         $this->_tabla->setCellContents  (1,1,$row);
110         $this->_tabla->setCellAttributes(1,1,'align="center" bgcolor="#FFFFFF"');
111
112         $this->_tabla->updateColAttributes (1,'width="600"');
113     }
114     // -X2C
115
116 } // -X2C Class :MenuVertical
117
118 ?>