]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/sistemas.php
Adapte la agenda a los nuevos estilos de MECON_HTML_Tabla
[mecon/intranet.git] / sistema / www / sistemas.php
1 <?php
2 // vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
3 // $Id$
4 require_once '../local_lib/HTML_DietMarco.php';
5 if(!isset($_SESSION['usuario']))
6 {
7   header('location: login?redirect=sistemas');
8   exit;
9 }
10 require_once '../local_lib/intranetdb.php';
11 require_once 'HTML/Table.php';
12 require_once 'MECON/HTML/Link.php';
13 require_once 'MECON/HTML/Image.php';
14 require_once 'DB.php';
15 require_once 'AI/Sistema.php';
16
17 define('COLUMNAS', 3);
18
19 $t = new HTML_Table(
20     array(
21         'width'         => '760',
22         'cellspacing'   => '0',
23         'cellpadding'   => '0',
24         'border'        => '0',
25     )
26 );
27
28 // Agrego fila con espaciados.
29 $img = new MECON_HTML_Image('/MECON/images/blanco', '', array('height' => 1));
30 $img->updateAttributes(array('width' => 46));
31 $fila[] = $img;
32 $img->updateAttributes(array('width' => 4));
33 $fila[] = $img;
34 $img->updateAttributes(array('width' => 190));
35 $fila[] = $img;
36 $img->updateAttributes(array('width' => 20));
37 $fila[] = $img;
38 $img->updateAttributes(array('width' => 46));
39 $fila[] = $img;
40 $img->updateAttributes(array('width' => 4));
41 $fila[] = $img;
42 $img->updateAttributes(array('width' => 190));
43 $fila[] = $img;
44 $img->updateAttributes(array('width' => 20));
45 $fila[] = $img;
46 $img->updateAttributes(array('width' => 46));
47 $fila[] = $img;
48 $img->updateAttributes(array('width' => 4));
49 $fila[] = $img;
50 $img->updateAttributes(array('width' => 190));
51 $fila[] = $img;
52 $t->addRow($fila);
53
54 $db = IntranetDB::connect();
55 $sistemas = AI_Sistema::getSistemas($db);
56
57 //$pct = intval(100/COLUMNAS) . '%';
58 $sistema = @array_shift($sistemas);
59 while ($sistema) {
60     $row = array();
61     for ($j = 1; $j <= COLUMNAS; $j++) {
62         if ($sistema) {
63             $img = new MECON_HTML_Image(
64                     "/sistemas/intranet/images/$sistema->icono",
65                     $sistema->nombre,
66                     array(
67                         'border' => 0,
68                         'width'  => '46',
69                         'height' => '46',
70                     )
71             );
72                         $row[] = new MECON_HTML_Link(
73                                 $sistema->link,
74                 $img,
75                                 array(),
76                         array(
77                                     'target' => '_blank',
78                                 )
79                     );
80             $row[] = '&nbsp;';
81                         $link = new MECON_HTML_Link(
82                                 $sistema->link,
83                 $sistema->nombre,
84                                 array(),
85                         array(
86                                     'target' => '_blank',
87                     'class' => 'intranet_sistemas_txt',
88                                 )
89                     );
90             $html = $link->toHtml() . ': ' . $sistema->descripcion;
91                 if ($sistema->link_ayuda) {
92                 $html .= '&nbsp;';
93                 $img = new MECON_HTML_Image(
94                         '/sistemas/intranet/images/sistemas_ayuda',
95                         '(?)'
96                 );
97                         $link = new MECON_HTML_Link(
98                                         $sistema->link_ayuda,
99                                         $img,
100                                         array(),
101                                         array(
102                         'target' => '_blank',
103                     )
104                                 );
105                 $html .= $link->toHtml();
106                         }
107             $row[] = $html;
108             $sistema = @array_shift($sistemas);
109         } else {
110             $row[] = '&nbsp;';
111             $row[] = '&nbsp;';
112             $row[] = '&nbsp;';
113         }
114         if ($j % (COLUMNAS)) {
115             $row[] = '&nbsp;';
116         }
117     }
118     $t->addRow(array('&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;', '&nbsp;'));
119     $t->addRow($row, array('class' => 'intranet_sistemas_txt'));
120 }
121
122 $m = new HTML_DietMarco('sistemas', 'Sistemas');
123 $m->addTitle('Sistemas');
124 $m->addStyleDeclaration('
125     .intranet_sistemas_txt {
126         color: #003366;
127         font-family: Arial, Helvetica, sans-serif;
128         font-size: 10pt;
129     }
130     A.intranet_sistemas_txt {
131         font-weight: bold;
132         text-decoration: none;
133     }'
134 );
135 $m->addBodyContent($t);
136 $m->display();
137     
138 ?>