Libreria SAMURAI_Perm en Perl casi lista. Falta getObservaciones y verificar que...

[mecon/samurai.git] / sistema / www / consultas / consultas.php

diff --git a/sistema/www/consultas/consultas.php b/sistema/www/consultas/consultas.php
index e6baaaf388c813d989ac867007ac599040e58e9a..a25d2ea921b591084a508c924998733f1dc033cb 100644 (file)
--- a/sistema/www/consultas/consultas.php
+++ b/sistema/www/consultas/consultas.php
@@ -23,32 +23,46 @@
 //VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
 $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
 //}}}
-    //VEO SI HAY QUE ELEGIR EN QUE SISTEMA TRABAJAR {{{
-    if (!@$_SESSION['samurai']['id_sistema']) {
-        header('Location: ./../sel-sistema?redirect=consultas/consultas');    
-    }
-    // }}}  
 //REQUIRE ONCE {{{
     require_once 'MECON/HTML/Tabla.php';
     require_once 'MECON/HTML/Link.php';
     require_once 'MECON/HTML/Image.php';
 // }}}
 //CREO LOS OBJETOS NECESARIOS {{{
-    $TABLA =& new MECON_HTML_Tabla ('width="500"', 'claro');
-    $LINK_PHP_CONSTANTES =& new MECON_HTML_Link ('php-constantes',
-            'Bajar la definicion de constantes de un sistema.');
-    $LINK_INFO_SISTEMAS =& new MECON_HTML_Link('sistemas', 'Ver informacion
+    $TABLA =& new HTML_Table('width="500" align="right"');
+    $LINK0 =& new MECON_HTML_Link('sistemas', 'Ver informacion
             de los sistemas.', array('accion'=>'info_listado'));
-    $LINK_ACTIVAR_SISTEMAS =& new MECON_HTML_Link('sistemas', 'Activar
+    $LINK1 =& new MECON_HTML_Link('sistemas', 'Activar
             Sistemas.', array('accion'=>'activar_sistema'));
-    $LINK_INFO_USUARIOS =& new MECON_HTML_Link('info-usuarios', 'Ver informacion
-            de los usuarios.');
+    $LINK2 =& new MECON_HTML_Link('usuarios', 'Ver informacion
+            de los usuarios.', array('accion'=>'filtrar'));
+    $LINK3 =& new MECON_HTML_Link ('php-constantes',
+            'Bajar la definicion de constantes de un sistema.');
+    
+    $IMG0 =& new MECON_HTML_Image('../images/verinfodesist.gif');
+    $IMG1 =& new MECON_HTML_Image('../images/activar.gif');
+    $IMG2 =& new MECON_HTML_Image('../images/verusuario.gif');
+    $IMG3 =& new MECON_HTML_Image('../images/bajar.gif');
+    
+    $IMG4 =& new MECON_HTML_Image('/MECON/images/blanco.gif');
+    
+    $LINK00 =& new MECON_HTML_Link('sistemas', $IMG0, 
+            array('accion'=>'info_listado'));
+    $LINK11 =& new MECON_HTML_Link('sistemas', $IMG1, 
+            array('accion'=>'info_listado'));
+    $LINK22 =& new MECON_HTML_Link('sistemas', $IMG2, 
+            array('accion'=>'info_listado'));
+    $LINK33 =& new MECON_HTML_Link('sistemas', $IMG3, 
+            array('accion'=>'info_listado'));
 //}}}    
 //AGREGO LA INFO A LAS TABLAS {{{
-    $TABLA->addRow(array($LINK_PHP_CONSTANTES->toHtml()), 'align="center"');
-    $TABLA->addRow(array($LINK_INFO_SISTEMAS->toHtml()) , 'align="center"');
-    $TABLA->addRow(array($LINK_ACTIVAR_SISTEMAS->toHtml()) , 'align="center"');
-    $TABLA->addRow(array($LINK_INFO_USUARIOS->toHtml()) , 'align="center"');
+    $TABLA->addRow(array($LINK00->toHtml(),$LINK0->toHtml()), 'align="left"');
+    $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
+    $TABLA->addRow(array($LINK11->toHtml(),$LINK1->toHtml()), 'align="left"');
+    $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
+    $TABLA->addRow(array($LINK22->toHtml(),$LINK2->toHtml()), 'align="left"');
+    $TABLA->addRow(array($IMG4->toHtml()), 'colspan="2"');
+    $TABLA->addRow(array($LINK33->toHtml(),$LINK3->toHtml()), 'align="left"');
 //}}}
 //DIBUJO LA PAGINA {{{
     $MARCO->addBodyContent($TABLA);