]> git.llucax.com Git - mecon/intranet.git/blob - sistema/www/servicios.php
Se pasa Php2Embperl_Session.epl al repositorio scripts y se actualiza documentacion.
[mecon/intranet.git] / sistema / www / servicios.php
1 <?
2   require_once '../local_lib/HTML_DietMarco.php';
3   require_once '../local_lib/HTML_Servicio.php';
4   require_once 'AI/Servicio.php';
5 //  require_once 'AI/DB.php';
6   require_once 'DB.php';
7  
8   $n_serv = 0;
9   if(isset($_GET['servicios']))
10       $n_serv = $_GET['servicios'];
11   $serv = new AI_Servicio($n_serv);
12   $nombre_corto = 'Servicios';
13   //$bd = AI_DB::Connect();
14   $bd = DB::Connect('mysql://intranet:intranet@bal747f/intranet');
15   if($n_serv != 0)
16   {
17     $link = $_SERVER["SCRIPT_NAME"];
18
19     $row = $bd->getRow("SELECT nombre, servicio_padre
20                         FROM servicio
21                         WHERE servicio = $n_serv");
22     $padre = $row[1];
23     $nombre[] = $row[0];
24     $nombre_corto = $row[0];
25     $i = 0;
26     if(is_null($row))
27       $nombre = "Esta pagina no esta cargada en AI!";
28     else
29     {
30       while($padre != 0)
31       {
32         $row = $bd->getRow("SELECT nombre, servicio_padre
33                             FROM servicio
34                             WHERE servicio = $padre");
35         $i++;
36         if(!($i%2))
37         {
38           $tmp = new MECON_HTML_Link("servicios.php",
39                                      $row[0],
40                                      array('servicios' => $padre),
41                                      array('class' => 'copete_titulo_vinculos'));
42           $nombre[] = $tmp->toHTML();
43         }
44         $padre = $row[1];
45       }
46       $nombre = implode(' >> ', array_reverse($nombre));
47     }
48   }else
49     $nombre = 'Servicios';//Nombre por default
50   $m = new HTML_DietMarco('servicios', $nombre);
51 //  $m->addTitle('Servicios');
52   $serv->cargar($bd);
53   $serv->cargarHijos($bd, true, AI_SERVICIO_ORDEN_LONG_HIJOS);
54   $col_par = '';
55   $col_impar = '';
56   $impar = true;
57   $otro = false;
58   foreach($serv->getHijos() as $s)
59   {
60       $sh =& new HTML_Servicio($s->servicio);
61       if($impar)
62       {
63         $col_impar .= $sh->toHTML().'<br>';
64         if ($otro) $otro = false;
65         else
66         {
67           $impar = false;
68           $otro = true;
69         }
70       }
71       else
72       {
73         $col_par .= $sh->toHTML().'<br>';
74         if ($otro) $otro = false;
75         else
76         {
77           $impar = true;
78           $otro = true;
79         }
80       }
81   }
82   $m->addStyleSheet($sh->getCSS());
83   $tabla =& new HTML_Table(array('width' => 760,
84                                  'cellspacing' => 10));
85   $tabla->addRow(array($col_impar, $col_par), array('valign'=>'top'));
86   $m->addBodyContent($tabla);
87
88   $m->display();
89 ?>