Se sacan las secciones de noticias de MEconDAV, se sacan los nombres de los

sistemas de SAMURAI para generar el Menu. Todo hecho quick&dirty.

diff --git a/doc/uml.xmi b/doc/uml.xmi
index 264131fe8e5c854c625992a41ef2678a23e80b3f..7e5ad51b9e548717b585a26618cd282c8c2092f0 100644 (file)
--- a/doc/uml.xmi
+++ b/doc/uml.xmi
@@ -9,7 +9,7 @@
   <XMI.metamodel xmi.name="UML" href="UML.xml" xmi.version="1.3" />
  </XMI.header>
  <XMI.content>
-  <docsettings viewid="412" documentation="" uniqueid="511" />
+  <docsettings viewid="412" documentation="" uniqueid="514" />
   <umlobjects>
    <UML:Class stereotype="" package="AI" xmi.id="413" abstract="0" documentation="Servicio." name="AI_Servicio" static="0" scope="200" >
     <UML:Operation stereotype="" package="" xmi.id="465" type="void" abstract="0" documentation="" name="AI_Servicio" static="0" scope="200" >
@@ -56,7 +56,11 @@ x2c:get" name="hijos" static="0" scope="202" />
      <UML:Parameter stereotype="" package="" xmi.id="1" value="" type="DB" abstract="0" documentation="DB de donde borrar." name="db" static="0" scope="200" />
     </UML:Operation>
     <UML:Operation stereotype="" package="" xmi.id="502" type="Sistema" abstract="0" documentation="" name="__clone" static="0" scope="200" />
-    <UML:Attribute stereotype="" package="" xmi.id="437" value="0" type="int" abstract="0" documentation="ID del sistema (ID en SAMURAI)." name="sistema" static="0" scope="200" />
+    <UML:Attribute stereotype="" package="" xmi.id="437" value="0" type="int" abstract="0" documentation="ID del sistema (ID en SAMURAI).
+FIXME - preguntar a gonzalo si le sirve." name="sistema" static="0" scope="200" />
+    <UML:Attribute stereotype="" package="" xmi.id="513" value="''" type="string" abstract="0" documentation="Nombre del sistema (sólo de lectura, extraído de SAMURAI).
+FIXME - preguntar a gonzalo si le sirve." name="nombre" static="0" scope="200" />
+    <UML:Attribute stereotype="" package="" xmi.id="514" value="''" type="string" abstract="0" documentation="Descripción del sistema (sólo de lectura, extraído de SAMURAI)." name="descripcion" static="0" scope="200" />
     <UML:Attribute stereotype="" package="" xmi.id="438" value="null" type="HTML_Imagen" abstract="0" documentation="Ícono del sistema." name="icono" static="0" scope="200" />
     <UML:Attribute stereotype="" package="" xmi.id="439" value="''" type="string" abstract="0" documentation="Enlace a donde se encuentra el sistema." name="link" static="0" scope="200" />
     <UML:Attribute stereotype="" package="" xmi.id="440" value="''" type="string" abstract="0" documentation="Enlace a la ayuda del sistema." name="link_ayuda" static="0" scope="200" />
@@ -87,6 +91,9 @@ x2c:include: PEAR.php" name="PEAR_Error" static="0" scope="200" />
     <UML:Operation stereotype="" package="" xmi.id="499" type="PEAR_Error" abstract="0" documentation="" name="cargarHijos" static="0" scope="200" >
      <UML:Parameter stereotype="" package="" xmi.id="1" value="" type="DB" abstract="0" documentation="DB de donde cargar los hijos." name="db" static="0" scope="200" />
     </UML:Operation>
+    <UML:Operation stereotype="" package="" xmi.id="512" type="array" abstract="0" documentation="Obtiene un array con una lista de secciones." name="getSeccionesArray" static="1" scope="200" >
+     <UML:Parameter stereotype="" package="" xmi.id="1" value="null" type="DB" abstract="0" documentation="Base de datos a usar para obtener los datos." name="db" static="0" scope="200" />
+    </UML:Operation>
     <UML:Operation stereotype="" package="" xmi.id="500" type="GrupoSecciones" abstract="0" documentation="" name="__clone" static="0" scope="200" />
     <UML:Attribute stereotype="" package="" xmi.id="487" value="0" type="int" abstract="0" documentation="ID del grupo de secciones." name="grupo" static="0" scope="200" />
     <UML:Attribute stereotype="" package="" xmi.id="488" value="''" type="string" abstract="0" documentation="Nombre." name="nombre" static="0" scope="200" />
@@ -122,14 +129,14 @@ x2c:get" name="hijos" static="0" scope="202" />
    <diagram snapgrid="0" showattsig="1" fillcolor="#ffffc0" showgrid="0" showopsig="1" usefillcolor="1" snapx="10" snapy="10" showatts="1" xmi.id="412" documentation="" type="402" showops="1" showpackage="0" name="Clases" localid="30000" showstereotype="0" showscope="1" font="Helvetica,8,-1,5,50,0,0,0,0,0" linecolor="#ff0000" >
     <widgets>
      <UML:ConceptWidget usesdiagramfillcolour="0" width="277" showattsigs="601" usesdiagramusefillcolour="0" x="300" linecolour="#ff0000" y="11" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="238" usefillcolor="1" showattributes="1" xmi.id="413" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
-     <UML:ConceptWidget usesdiagramfillcolour="0" width="277" showattsigs="601" usesdiagramusefillcolour="0" x="12" linecolour="#ff0000" y="241" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="154" usefillcolor="1" showattributes="1" xmi.id="416" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
+     <UML:ConceptWidget usesdiagramfillcolour="0" width="277" showattsigs="601" usesdiagramusefillcolour="0" x="12" linecolour="#ff0000" y="241" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="182" usefillcolor="1" showattributes="1" xmi.id="416" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
      <UML:ConceptWidget usesdiagramfillcolour="0" width="262" showattsigs="601" usesdiagramusefillcolour="0" x="302" linecolour="#ff0000" y="338" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="35" usefillcolor="1" showattributes="1" xmi.id="469" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
      <UML:ConceptWidget usesdiagramfillcolour="0" width="73" showattsigs="601" usesdiagramusefillcolour="0" x="397" linecolour="#ff0000" y="264" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#dcdcdc" height="24" usefillcolor="1" showattributes="0" xmi.id="471" showoperations="0" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
-     <UML:ConceptWidget usesdiagramfillcolour="0" width="277" showattsigs="601" usesdiagramusefillcolour="0" x="12" linecolour="#ff0000" y="11" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="210" usefillcolor="1" showattributes="1" xmi.id="486" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
+     <UML:ConceptWidget usesdiagramfillcolour="0" width="277" showattsigs="601" usesdiagramusefillcolour="0" x="12" linecolour="#ff0000" y="11" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="224" usefillcolor="1" showattributes="1" xmi.id="486" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
      <UML:ConceptWidget usesdiagramfillcolour="0" width="192" showattsigs="601" usesdiagramusefillcolour="0" x="345" linecolour="#ff0000" y="477" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="49" usefillcolor="1" showattributes="1" xmi.id="503" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
      <UML:ConceptWidget usesdiagramfillcolour="0" width="46" showattsigs="601" usesdiagramusefillcolour="0" x="418" linecolour="#ff0000" y="414" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#dcdcdc" height="24" usefillcolor="1" showattributes="0" xmi.id="504" showoperations="0" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
      <UML:ConceptWidget usesdiagramfillcolour="0" width="271" showattsigs="601" usesdiagramusefillcolour="0" x="24" linecolour="#ff0000" y="477" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#ffffc0" height="49" usefillcolor="1" showattributes="1" xmi.id="507" showoperations="1" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
-     <UML:ConceptWidget usesdiagramfillcolour="0" width="146" showattsigs="601" usesdiagramusefillcolour="0" x="86" linecolour="#ff0000" y="410" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#dcdcdc" height="24" usefillcolor="1" showattributes="0" xmi.id="508" showoperations="0" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
+     <UML:ConceptWidget usesdiagramfillcolour="0" width="146" showattsigs="601" usesdiagramusefillcolour="0" x="86" linecolour="#ff0000" y="432" showopsigs="601" usesdiagramlinecolour="0" fillcolour="#dcdcdc" height="24" usefillcolor="1" showattributes="0" xmi.id="508" showoperations="0" showpackage="0" showscope="1" showstereotype="0" font="Helvetica,8,-1,5,50,0,0,0,0,0" />
     </widgets>
     <messages/>
     <associations>
@@ -142,7 +149,7 @@ x2c:get" name="hijos" static="0" scope="202" />
      <UML:AssocWidget totalcounta="2" indexa="1" totalcountb="2" indexb="1" widgetbid="508" widgetaid="507" documentation="" type="500" >
       <linepath>
        <startpoint startx="159" starty="477" />
-       <endpoint endx="159" endy="434" />
+       <endpoint endx="159" endy="456" />
       </linepath>
      </UML:AssocWidget>
      <UML:AssocWidget totalcounta="2" indexa="1" totalcountb="2" indexb="1" widgetbid="504" widgetaid="503" documentation="" type="500" >
@@ -176,6 +183,7 @@ x2c:get" name="hijos" static="0" scope="202" />
        <listitem open="0" type="815" id="496" label="cargar" />
        <listitem open="0" type="815" id="499" label="cargarHijos" />
        <listitem open="0" type="815" id="500" label="__clone" />
+       <listitem open="0" type="815" id="512" label="getSeccionesArray" />
        <listitem open="0" type="814" id="487" label="grupo" />
        <listitem open="0" type="814" id="489" label="grupo_padre" />
        <listitem open="0" type="815" id="497" label="guardar" />
@@ -208,11 +216,13 @@ x2c:get" name="hijos" static="0" scope="202" />
        <listitem open="0" type="815" id="461" label="borrar" />
        <listitem open="0" type="815" id="460" label="cargar" />
        <listitem open="0" type="815" id="502" label="__clone" />
+       <listitem open="0" type="814" id="514" label="descripcion" />
        <listitem open="0" type="815" id="459" label="guardar" />
        <listitem open="0" type="814" id="445" label="habilitado" />
        <listitem open="0" type="814" id="438" label="icono" />
        <listitem open="0" type="814" id="439" label="link" />
        <listitem open="0" type="814" id="440" label="link_ayuda" />
+       <listitem open="0" type="814" id="513" label="nombre" />
        <listitem open="0" type="814" id="437" label="sistema" />
       </listitem>
      </listitem>

diff --git a/lib/AI/Form.php b/lib/AI/Form.php
index 38e9262d7f3c3d290be1f01ecf622837178fb098..582d704ef4416a5d95265574ff03cf023552f138 100644 (file)
--- a/lib/AI/Form.php
+++ b/lib/AI/Form.php
@@ -1,5 +1,5 @@
 <?php
-// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
+// vim: set binary expandtab tabstop=4 softtabstop=4 shiftwidth=4:
 // +--------------------------------------------------------------------+
 // |                      Ministerio de Economía                        |
 // |                  AI (Administrador de Intranet)                    |
@@ -82,7 +82,7 @@ class AI_Form extends MECON_HTML_QuickForm {
         if ($tipo == 'sistema') {
             require_once 'SAMURAI/Sistema.php';
             $sistemas = SAMURAI_Sistema::getArraySistemas(AI_DB::connect('../conf/DB.ini'));
-            $fId =& $this->addElement('select', $tipo, 'Sistema', $sistemas);
+            $fId        =& $this->addElement('select', $tipo, 'Sistema', $sistemas);
         }
         if ($accion & (AI_BAJA | AI_MODIF)) {
             if ($tipo == 'sistema') {
@@ -110,7 +110,7 @@ class AI_Form extends MECON_HTML_QuickForm {
         if ($tipo == 'grupo') {
             $fAntiguedad   =& $this->addElement('text', 'antiguedad', 'Antigüedad');
             $fSecciones    =& $this->addElement('select', 'secciones', 'Secciones',
-                array(1=>'test1', 'test2', 'test3', 'test4', 'test5', 'test6', 'test7', 'test8'),
+                AI_GrupoSecciones::getSeccionesArray(),
                 array('multiple' => 'multiple', 'size' => 5));
             $fMostrarHijos =& $this->addElement('checkbox', 'mostrar_hijos', 'Mostrar hijos');
             // Validación.
@@ -229,4 +229,4 @@ function listaImagenes($dir = '.', $prepend = '', $append = '') {
     return $lista;
 }
 
-?>
+?>
\ No newline at end of file

diff --git a/lib/AI/GrupoSecciones.php b/lib/AI/GrupoSecciones.php
index 23fa14a5edcc545a9f3beaa8cd12debf21f3ce96..c7d54d93d712844906c5b00e8356edce29fa2471 100644 (file)
--- a/lib/AI/GrupoSecciones.php
+++ b/lib/AI/GrupoSecciones.php
@@ -1,5 +1,5 @@
 <?php
-// vim: set expandtab tabstop=4 shiftwidth=4:
+// vim: set expandtab tabstop=4 shiftwidth=4 binary:
 // +--------------------------------------------------------------------+
 // |                      Ministerio de Economía                        |
 // |                  AI (Administrador de Intranet)                    |
@@ -294,6 +294,32 @@ class AI_GrupoSecciones {
     }
     // -X2C
 
+    // +X2C Operation 512
+    /**
+     * Obtiene un array con una lista de secciones.
+     *
+     * @param  DB $db Base de datos a usar para obtener los datos.
+     *
+     * @return array
+     * @access public
+     * @static
+     */
+    function getSeccionesArray($db = null) // ~X2C
+    {
+               if ($db === null) {
+                       $db =& DB::connect('mysql://mark:mark@intranet-db.mecon.ar/MEconDAV',
+                               array('persistent' => true));
+               }
+               if (DB::isError($db)) {
+                       return $db;
+               }
+               return $db->getAssoc('
+            SELECT   S.section_id, S.description
+            FROM     MEconDAV.Sections as S
+            ORDER BY description');
+    }
+    // -X2C
+
     // +X2C Operation 500
     /**
      * @return GrupoSecciones
@@ -307,4 +333,4 @@ class AI_GrupoSecciones {
 
 } // -X2C Class :AI_GrupoSecciones
 
-?>
+?>
\ No newline at end of file

diff --git a/lib/AI/Servicio.php b/lib/AI/Servicio.php
index b03c5a2c3a7a098225353ae261ff650f0c7a71f8..e83bfd19696784d6f4c3206f169cc5f99ee19f3b 100644 (file)
--- a/lib/AI/Servicio.php
+++ b/lib/AI/Servicio.php
@@ -296,4 +296,4 @@ class AI_Servicio {
 
 } // -X2C Class :AI_Servicio
 
-?>
+?>
\ No newline at end of file

diff --git a/lib/AI/Sistema.php b/lib/AI/Sistema.php
index db067010a70ed9411ee868f7b4540d6bdace31d9..84a074e0f8768230053eb22617205c705af6c86f 100644 (file)
--- a/lib/AI/Sistema.php
+++ b/lib/AI/Sistema.php
@@ -28,6 +28,8 @@
 //
 
 require_once 'AI/Error.php';
+// TODO - preguntar a gmeray si le sirve, yo no lo uso...
+require_once 'SAMURAI/Sistema.php';
 
 // +X2C Class 416 :AI_Sistema
 /**
@@ -45,6 +47,22 @@ class AI_Sistema {
      */
     var $sistema = 0;
 
+    /**
+     * Nombre del sistema (slo de lectura, extra?o de SAMURAI).
+     *
+     * @var    string $nombre
+     * @access public
+     */
+    var $nombre = '';
+
+    /**
+     * Descripcin del sistema (slo de lectura, extra?o de SAMURAI).
+     *
+     * @var    string $descripcion
+     * @access public
+     */
+    var $descripcion = '';
+
     /**
      * ?ono del sistema.
      *
@@ -124,10 +142,15 @@ class AI_Sistema {
         // Asigno valores al objeto.
         extract($row);
         $this->sistema    = $sistema;
-        $this->icono      = $icono; # FIXME - new HTML_Icono (o no?)
+        $this->icono      = $icono;
         $this->link       = $link;
         $this->link_ayuda = $link_ayuda;
         $this->habilitado = $habilitado;
+        // Obtengo datos de SAMURAI. FIXME - preguntar a marrese por manejo de errores.
+        // TODO - preguntar a gmeray si le sirve, yo no lo uso...
+        #$sist = new SAMURAI_Sistema($db, $sistema);
+        #$this->nombre       = $sist->getNombre();
+        #$this->descripcion  = $sist->getDescripcion();
         return true;
     }
     // -X2C

diff --git a/sistema/www/index.php b/sistema/www/index.php
index 4e88fabf51871a18ff8991cc046cb7529daf12d7..ce3d616d4a0192c7551c8dda39344da6d1fc95ca 100644 (file)
--- a/sistema/www/index.php
+++ b/sistema/www/index.php
@@ -29,8 +29,8 @@
 
 // Debug. {{{
 require_once 'PEAR.php';
-#PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
-PEAR::setErrorHandling(PEAR_ERROR_RETURN);
+PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
+#PEAR::setErrorHandling(PEAR_ERROR_RETURN);
 // }}}
 
 // Clase de error HTML (para mostrar errores) TODO - ver si se pasa a meconlib {{{
@@ -60,18 +60,21 @@ if (@$_SERVER['PATH_INFO']) {
         $require = 'AI/GrupoSecciones.php';
         $tabla   = 'grupo_secciones';
         $nombre  = "grupo de secciones";
+        $arbol   = 'NOTICIAS';
     } elseif ($tmp == 'servicio') {
         $tipo    = $tmp;
         $clase   = 'AI_Servicio';
         $require = 'AI/Servicio.php';
         $tabla   = $tipo;
         $nombre  = $tipo;
+        $arbol   = 'SERVICIOS';
     } elseif ($tmp == 'sistema') {
         $tipo    = $tmp;
         $clase   = 'AI_Sistema';
         $require = 'AI/Sistema.php';
         $tabla   = $tipo;
         $nombre  = $tipo;
+        $arbol   = 'SISTEMAS';
     } else { // No hay un objeto válido para administrar.
         header('Location: '.$_SERVER['SCRIPT_NAME']);
     }
@@ -224,8 +227,18 @@ if ($tipo) {
     if ($tipo == 'grupo' or $tipo == 'servicio') {
         $dbdata['nombre']   = 'nombre';
         $dbdata['id_padre'] = $tipo . '_padre';
+    } elseif ($tipo == 'sistema') { // FIXME - horrible!!!
+        $dbdata = array(
+            'db'            => &$db,
+            'tabla'         => "intranet.$tabla as A, samurai.sistema as S",
+            'id'            => "A.$tipo",
+            'nombre'        => 'S.nombre_sistema',
+            'prepend_link'  => $tipo.'?accion='.AI_MODIF.'&id=',
+            'where'         => 'S.id_sistema = A.sistema',
+            'order'         => 'asc',
+        );
     }
-    $arbol = new HTML_ArbolDB($dbdata, '/MECON/images/arbol_noticias.gif');
+    $arbol = new HTML_ArbolDB($dbdata, $arbol);
     $marco->addMenuVertical($arbol);
     // }}}