+++ /dev/null
-<?php
-// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
-// +----------------------------------------------------------------------+
-// | PHP Version 4 |
-// +----------------------------------------------------------------------+
-// | Copyright (c) 1997-2003 The PHP Group |
-// +----------------------------------------------------------------------+
-// | This source file is subject to version 2.02 of the PHP license, |
-// | that is bundled with this package in the file LICENSE, and is |
-// | available at through the world-wide-web at |
-// | http://www.php.net/license/2_02.txt. |
-// | If you did not receive a copy of the PHP license and are unable to |
-// | obtain it through the world-wide-web, please send a note to |
-// | license@php.net so we can mail you a copy immediately. |
-// +----------------------------------------------------------------------+
-// | Created: jue oct 2 12:33:34 ART 2003
-// | Author: Martin Marrese <mmarre@mecon.gov.ar>
-// +----------------------------------------------------------------------+
-//
-// $Id$
-//
-
-//Require_once {{{
- //PEAR{{{
- require_once 'HTML/Table.php';
- //}}}
- //Mecon {{{
- require_once 'MECON/HTML/Tabla.php';
- require_once 'MECON/HTML/Image.php';
- require_once 'MECON/HTML/Link.php';
- //}}}
- //Samurai {{{
- require_once 'SAMURAI/Sistema.php';
- require_once 'SAMURAI/Usuario.php';
- require_once 'SAMURAI/Perfil.php';
- require_once 'SAMURAI/Permiso.php';
- //}}}
-//}}}
-
-//Verifico si se tiene acceso a la pagina {{{
- $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
-//}}}
-
-//Obtengo el id del sistema {{{
- $id_sist = (@$_REQUEST['id_sist']) ? $_REQUEST['id_sist'] : null;
-//}}}
-
-//Creo la tabla volver {{{
- $T_VOLVER =& new HTML_Table('width="760"');
- $IMG_VOLVER =& new MECON_HTML_Image('/MECON/images/general_anterior.gif');
- $LINK_VOLVER =& new MECON_HTML_Link('', $IMG_VOLVER);
-//}}}
-
-//LISTADO {{{
-if (@!$id_sist) {
- //Creo los objetos necesarios {{{
- $T_SISTEMAS =& new MECON_HTML_Tabla();
- $IMG =& new MECON_HTML_Image('/MECON/images/general_ir4.gif');
- $LINK =& new MECON_HTML_Link('sistemas-activar');
- //}}}
-
- //Obtengo la lista de sistemas (habilitados y no habilitados) {{{
- $sistemas = SAMURAI_Sistema::getSistemas($DB, false);
- //}}}
-
- //Agrego la informacion a la tabla de sistemas {{{
- $T_SISTEMAS->addRow(array('Listado de Sistemas Inactivos'), 'cabecera
- colspan="4"');
- $T_SISTEMAS->addRow(array('Id', 'Nombre', 'Descripcion', 'Activar'),
- 'titulo');
- //Agrego la info de los sistemas
- foreach ($sistemas as $sistema) {
- if (!$sistema->getEstado()) {
- $LINK->setContents($IMG);
- $LINK->setGetVars(
- array(
- 'id_sist' => $sistema->getId(),
- )
- );
- $row = array ( $sistema->getId(),
- $sistema->getNombre(),
- $sistema->getDescripcion(),
- $LINK->toHtml()
- );
- $T_SISTEMAS->addRow($row);
- }
- }
- $T_SISTEMAS->updateColAttributes(0, 'width="5%" align="center"');
- $T_SISTEMAS->updateColAttributes(1, 'width="20%" align="center"');
- $T_SISTEMAS->updateColAttributes(3, 'width="5%" align="center"');
- $T_SISTEMAS->updateRowAttributes(0, 'align="left"');
- //}}}
-
- //Agrego la informacion al marco {{{
- $LINK_VOLVER->setHref('consultas');
- $MARCO->addBodyContent($T_SISTEMAS);
- $MARCO->addTitle('Estadisticas de Sistemas');
- $MARCO->addBodyContent('<BR>');
- $T_VOLVER->addRow(array($LINK_VOLVER->toHtml()), 'align="left"');
- $MARCO->addBodyContent($T_VOLVER);
- //}}}
-}
-//}}}
-
-//ESTADISTICAS_SISTEMAS = INFORMACION DE UN SISTEMA {{{
-elseif (@!$accion || $accion == 'info_informacion') {
- //Creo los objetos necesarios {{{
- $T_SISTEMA =& new MECON_HTML_Tabla();
- $T_SISTEMA2 =& new MECON_HTML_Tabla();
- $T_EST =& new MECON_HTML_Tabla('width="300"');
- $SISTEMA =& new SAMURAI_Sistema($DB, $id_sist);
- $IMG_ACTIVO =& new MECON_HTML_Image('/MECON/images/general_tilde_azul.gif');
- $IMG_NACTIVO =& new MECON_HTML_Image('/MECON/images/general_cruz_roja.gif');
- $IMG_SEP =& new MECON_HTML_Image('../images/linea_separacion.gif');
-
- $LINK_USUARIOS =& new MECON_HTML_Link('sistemas', '', array('accion' =>
- 'info_informacion', 'subaccion' => 'info_usuarios',
- 'id_sist' => $id_sist));
- $LINK_PERFILES =& new MECON_HTML_Link('sistemas', '', array('accion' =>
- 'info_informacion', 'subaccion' => 'info_perfiles',
- 'id_sist' => $id_sist));
- $LINK_PERMISOS =& new MECON_HTML_Link('sistemas', '', array('accion' =>
- 'info_informacion', 'subaccion' => 'info_permisos',
- 'id_sist' => $id_sist));
- //}}}
-
- //Agrego la informacion del sistema seleccionado {{{
- $T_SISTEMA->addRow(array('Datos del Sistema Seleccionado'),'cabecera
- colspan="4"');
- $T_SISTEMA->addRow(array('Id', 'Nombre', 'Descripcion', 'Activo'),
- 'titulo');
- $T_SISTEMA->addRow(array(
- $SISTEMA->getId(),
- $SISTEMA->getNombre(),
- $SISTEMA->getDescripcion(),
- ($SISTEMA->getEstado()) ? $IMG_ACTIVO : $IMG_NACTIVO,
- )
- );
- $T_SISTEMA->updateColAttributes(0, 'width="5%" align="center"');
- $T_SISTEMA->updateColAttributes(1, 'width="20%" align="center"');
- $T_SISTEMA->updateColAttributes(3, 'width="5%" align="center"');
- $T_SISTEMA->updateRowAttributes(0, 'align="left"');
-
- $fch_ini =& $SISTEMA->getFechaInicio();
- $fch_fin =& $SISTEMA->getFechaFin();
- $fch_imp =& $SISTEMA->getFechaImplementacion();
-
- $T_SISTEMA2->addRow(array('Fecha Inicio', 'Fecha Fin', ' Fecha
- Imp', 'Contacto'), 'titulo');
- $T_SISTEMA2->addRow(array(
- ($fch_ini) ? $fch_ini->format("%d-%m-%Y") : '--',
- ($fch_fin) ? $fch_fin->format("%d-%m-%Y") : '--',
- ($fch_imp) ? $fch_imp->format("%d-%m-%Y") : '--',
- $SISTEMA->getContacto()
- )
- );
- $T_SISTEMA2->updateColAttributes(0, 'width="15%" align="center"');
- $T_SISTEMA2->updateColAttributes(1, 'width="15%" align="center"');
- $T_SISTEMA2->updateColAttributes(2, 'width="15%" align="center"');
- //}}}
-
- //Obtengo la info necesaria {{{
- $usuarios = SAMURAI_Usuario::_getLoginUsuarios($DB, $id_sist);
- $perfiles = SAMURAI_Perfil::_getIdPerfiles($DB, null, $id_sist);
- $permisos = SAMURAI_Permiso::_getIdPermisos($DB, $id_sist);
- //}}}
-
- //Agrego la informacion {{{
- $T_EST->addRow(array('Estadisticas'), 'cabecera colspan="3"');
- $T_EST->addRow(array('Usuarios', 'Perfiles', 'Permisos'), 'titulo');
- $T_EST->updateColAttributes(0, 'width="33%" align="center"');
- $T_EST->updateColAttributes(1, 'width="33%" align="center"');
- $T_EST->updateColAttributes(2, 'width="33%" align="center"');
-
- if (count($usuarios)) {
- $LINK_USUARIOS->setContents(count($usuarios));
- }
- else {
- $LINK_USUARIOS->setContents('0');
- $LINK_USUARIOS->setGetVars(array());
- $LINK_USUARIOS->setHref('#');
- }
- if (count($perfiles)) {
- $LINK_PERFILES->setContents(count($perfiles));
- }
- else {
- $LINK_PERFILES->setContents('0');
- $LINK_PERFILES->setGetVars(array());
- $LINK_PERFILES->setHref('#');
- }
- if (count($permisos)) {
- $LINK_PERMISOS->setContents(count($permisos));
- }
- else {
- $LINK_PERMISOS->setContents('0');
- $LINK_PERMISOS->setHref('#');
- $LINK_PERMISOS->setGetVars(array());
- }
-
-
-
- $T_EST->addRow(array(
- $LINK_USUARIOS->toHtml(),
- $LINK_PERFILES->toHtml(),
- $LINK_PERMISOS->toHtml(),
- )
- );
- //}}}
-
- //Actuo segun la subaccion {{{
- if (@$subaccion == 'info_usuarios') {
- $T_SUBACCION =& new MECON_HTML_Tabla();
-
- $usu = SAMURAI_Usuario::getUsuarios($DB, $id_sist);
- $T_SUBACCION->addRow(array('Datos de los Usuarios'), 'colspan="2"
- cabecera');
- $T_SUBACCION->addRow(array('Login', 'Nombre'), 'titulo');
- foreach ($usu as $u) {
- $T_SUBACCION->addRow(array($u->getLogin(), $u->getNombre()));
- }
-
- $T_SUBACCION->updateRowAttributes(0, 'align="left"');
- }
- elseif (@$subaccion == 'info_perfiles') {
- $T_SUBACCION =& new MECON_HTML_Tabla();
-
- $usu = SAMURAI_Perfil::getPerfiles($DB, '', $id_sist);
- $T_SUBACCION->addRow(array('Datos de los Perfiles'), 'colspan="2"
- cabecera');
- $T_SUBACCION->addRow(array('Id', 'Descripcion'), 'titulo');
- foreach ($usu as $u) {
- $T_SUBACCION->addRow(array($u->getId(), $u->getDescripcion()));
- }
-
- $T_SUBACCION->updateRowAttributes(0, 'align="left"');
- }
- elseif (@$subaccion == 'info_permisos') {
- $T_SUBACCION =& new MECON_HTML_Tabla();
-
- $T_SUBACCION->addRow(array('Datos de los Permisos'), 'colspan="3"
- cabecera');
- $T_SUBACCION->addRow(array('Id', 'Descripcion', 'Observacion'), 'titulo');
- foreach ($SISTEMA->getAsociaciones() as $asoc) {
- $T_SUBACCION->addRow(array($asoc['id'], $asoc['desc'],
- $asoc['obs']));
- }
- $T_SUBACCION->updateRowAttributes(0, 'align="left"');
- }
- //}}}
-
- //Agrego la informacion al marco {{{
- $LINK_VOLVER->setHref('sistemas');
- $LINK_VOLVER->setGetVars(array('accion' => 'info_listado'));
- $MARCO->addBodyContent($T_SISTEMA);
- $MARCO->addBodyContent($T_SISTEMA2);
- $MARCO->addBodyContent($IMG_SEP);
- $MARCO->addBodyContent($T_EST);
-
- if (@$subaccion) {
- $MARCO->addBodyContent($IMG_SEP);
- $MARCO->addBodyContent($T_SUBACCION);
- }
-
- $MARCO->addTitle('Estadisticas de Sistemas');
- $MARCO->addBodyContent('<BR>');
- $T_VOLVER->addRow(array($LINK_VOLVER->toHtml()), 'align="left"');
- $MARCO->addBodyContent($T_VOLVER);
- //}}}
-}
-//}}}
-
-//MUESTRO LA INFORMACION {{{
- $MARCO->display();
- exit;
-//}}}
-
-?>
--- /dev/null
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:
+// +----------------------------------------------------------------------+
+// | PHP Version 4 |
+// +----------------------------------------------------------------------+
+// | Copyright (c) 1997-2003 The PHP Group |
+// +----------------------------------------------------------------------+
+// | This source file is subject to version 2.02 of the PHP license, |
+// | that is bundled with this package in the file LICENSE, and is |
+// | available at through the world-wide-web at |
+// | http://www.php.net/license/2_02.txt. |
+// | If you did not receive a copy of the PHP license and are unable to |
+// | obtain it through the world-wide-web, please send a note to |
+// | license@php.net so we can mail you a copy immediately. |
+// +----------------------------------------------------------------------+
+// | Created: jue oct 2 13:03:34 ART 2003
+// | Author: Martin Marrese <mmarre@mecon.gov.ar>
+// +----------------------------------------------------------------------+
+//
+// $Id$
+//
+
+//Require_once {{{
+ //PEAR{{{
+ require_once 'HTML/Table.php';
+ //}}}
+ //Mecon {{{
+ require_once 'MECON/HTML/Tabla.php';
+ require_once 'MECON/HTML/Image.php';
+ require_once 'MECON/HTML/Link.php';
+ require_once 'MECON/Usuario.php';
+ require_once 'MECON/Dependencia.php';
+ require_once 'MECON/HTML/QuickForm.php';
+ //}}}
+ //Samurai {{{
+ require_once 'SAMURAI/Sistema.php';
+ require_once 'SAMURAI/Usuario.php';
+ require_once 'SAMURAI/Perfil.php';
+ require_once 'SAMURAI/Permiso.php';
+ //}}}
+//}}}
+
+//Verifico si se tiene acceso a la pagina {{{
+ $SAMURAI_PERM->chequear(SAMURAI_PERM_DEVELOPER);
+//}}}
+
+//Obtengo la accion y el id del usuario {{{
+ $accion = (@$_REQUEST['accion']) ? $_REQUEST['accion'] : 'listado';
+ $subaccion = (@$_REQUEST['subaccion']) ? $_REQUEST['subaccion'] : null;
+ $login = (@$_REQUEST['login']) ? $_REQUEST['login'] : null;
+ $filtro = (@$_REQUEST['filtro']) ? $_REQUEST['filtro'] : null;
+//}}}
+
+//Creo la tabla volver {{{
+ $T_VOLVER =& new HTML_Table('width="760"');
+ $IMG_VOLVER =& new MECON_HTML_Image('/MECON/images/general_anterior.gif');
+ $LINK_VOLVER =& new MECON_HTML_Link('', $IMG_VOLVER);
+//}}}
+
+//Filtrar Usuarios {{{
+if (@!$accion || $accion == 'filtrar') {
+ //Creo los objetos necesarios {{{
+ $FORM =& new MECON_HTML_QuickForm ('usuarios_filtrar','post','usuarios');
+ $T_USUARIOS = new MECON_HTML_Tabla ('width="400"');
+ $FORM->renderer->setTable($T_USUARIOS);
+ //}}}
+
+ //Agrego los elementos al form {{{
+ $FORM->addElement ('header', 'cabecera', 'Filtrar Usuarios');
+ $f_accion =& $FORM->addElement ('hidden', 'accion', 'listado');
+ $f_texto =& $FORM->addElement ('text', 'filtro', 'Login@Organismo',
+ array('size' => '20'));
+ $group[] = HTML_QuickForm::createElement('submit', 'filtrar', 'Filtrar');
+ $FORM->addGroup($group,'botones');
+ //}}}
+
+ //Agrego la informacion al marco {{{
+ $LINK_VOLVER->setHref('consultas');
+ $MARCO->addBodyContent($FORM);
+ $MARCO->addTitle('Ver informacion de los usuarios');
+ $MARCO->addBodyContent('<BR>');
+ $T_VOLVER->addRow(array($LINK_VOLVER->toHtml()), 'align="left"');
+ $MARCO->addBodyContent($T_VOLVER);
+ //}}}
+}
+//}}}
+
+//Listado de usuarios filtrados {{{
+elseif ($accion == 'listado') {
+ //Creo los objetos necesarios {{{
+ $T_USUARIOS =& new MECON_HTML_Tabla();
+ $IMG_SEL =& new MECON_HTML_Image('/MECON/images/general_ir4.gif');
+ $LINK_SEL =& new MECON_HTML_Link('usuarios', $IMG_SEL);
+ //}}}
+
+ //Filtro los usuarios {{{
+ $usu_res = MECON_Usuario::filtrarUsuarios($DB, $filtro, null);
+ while ($usu_res->fetchInto($row)){
+ $usu[$row['login']] = $row['nombre'];
+ }
+ //}}}
+
+ //Armo la tabla de Usuarios {{{
+ $T_USUARIOS->addRow(array('Listado de Usuarios'), 'colspan="4" cabecera
+ align="left"');
+ $T_USUARIOS->addRow(array('Login', 'Nombre', 'Dependencia', 'Sel.'), 'titulo');
+ foreach ($usu as $key => $value) {
+ $u =& new MECON_Usuario(null, $key);
+ //BUSCO EL NOMBRE DE LA DEPENDENCIA {{{
+ $depen = MECON_Dependencia::buscarPorCodigo ($DB, $u->getCodep());
+ while ($depen->fetchInto($row)){
+ $dep = $row['nombre'];
+ }
+ //}}}
+ $LINK_SEL->setGetVars(array('accion'=>'info_usuario', 'login'
+ => $key));
+ $T_USUARIOS->addRow(array($key, $value, $dep, $LINK_SEL->toHtml()));
+ }
+ //}}}
+
+ //Agrego la informacion al marco {{{
+ $LINK_VOLVER->setHref('usuarios');
+ $LINK_VOLVER->setGetVars(array('accion' => 'filtrar'));
+ $MARCO->addBodyContent($T_USUARIOS);
+ $MARCO->addTitle('Seleccionar Usuario');
+ $MARCO->addBodyContent('<BR>');
+ $T_VOLVER->addRow(array($LINK_VOLVER->toHtml()), 'align="left"');
+ $MARCO->addBodyContent($T_VOLVER);
+ //}}}
+}
+//}}}
+
+//MUESTRO LA INFORMACION {{{
+ $MARCO->display();
+ exit;
+//}}}
+
+?>
projects / mecon / samurai.git / commitdiff