// $Id$
//
-//require_once 'MECON/general.php';
-//prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
+/** \page page_samurai_html_perfil Perfil Embebido
-//REQUIRE ONCE GENERALES {{{
+\section page_samurai_html_perfil_descripcion Descripcion
+ Samurai provee de una funcion que permite embeber la funcionalidad de
+ perfiles dentro de aquellos sistemas que asi lo requieran.
+ Es completamente independiente del sistema en el cual trabaja y puede ser
+ agregado de cualquier manera (Seccion, Subseccion o Contenido) al sistema.
+
+ \note Es necesario para embeber los perfiles que se haya realizado un
+ session_start().
+
+\section page_samurai_html_perfil_funcionamiento Funcionamiento
+ Es una copia de la seccion Perfiles dentro de SAMURAI. Se relizan las mismas
+ verificaciones, tiene las mismas condiciones y se utilizan los mismos
+ permisos que en este.
+
+ \subsection page_samurai_html_perfil_funcionamiento_validaciones Validaciones y Condiciones
+ - Los espacios entre las palabras que componen el nombre de un
+ perfil son eliminados. Ej: Agregar Usuario
+ se cambia por Agregar Usuario.
+ - Es obligatorio que los perfiles contengan al menos un permiso.
+ - No puede haber dos perfiles con los mismos permisos.
+ - No se pueden borrar perfiles que esten asociados a usuarios.
+ - No se pueden ingresar pefiles nuevos que ya esten cargados.
+
+\section page_samurai_html_perfil_ejemplo Ejemplo
+ SAMURAI_HTML_Perfil agrega el contenido directamente en el marco que se este
+ utilizando.
+ Para embeber los perfiles hay que hacerlo de la siguiente manera
+
+ \code
+ include 'SAMURAI/HTML/Perfil.php';
+ SAMURAI_HTML_Perfil($MARCO, $ID_SISTEMA);
+ \endcode
+
+ \note $MARCO es el objeto MECON_Marco o el objeto HTML_DietMarco de
+ intranet.
+ $ID_SISTEMA es el identificador numerico en el cual se esta realizando la
+ accion de embeber.
+
+\section page_samurai_html_perfil_permisos Pasos Finales
+ Para que los usuarios puedan acceder a los perfiles embebidos es necesario
+ que en el sistema en el cual se este embebiendo se agregen los permisos que
+ utiliza la seccion Perfiles (enumerados mas abajo), y que estos mediante
+ perfiles se asignen a usuarios.
+ Esto implica que por lo menos un usuario tendra que ser cargado desde
+ SAMURAI para que este tenga acceso a la zona embebida.
+
+ Permisos
+ - perfil alta
+ - perfil baja
+ - perfil modificacion
+ - perfil tipo
+*/
+
+//REQUIRE ONCE {{{
require_once 'SAMURAI/DB.php';
require_once 'SAMURAI/Perm.php';
require_once 'SAMURAI/constantes.php';
require_once 'PEAR.php';
// }}}
-// Funciones para agregar la seccion SAMURAI_Perfil en los sistemas.
-// Con esto se pueden embeber el abm de perfiles como una seccion/subseccion mas
-// de un sistema cualquiera.
-// Es necesario para que funcione que se haya realizado un session_start()
-// antes, por ejemplo en el prepend.
-
- /**
- * Funcion que se encarga agregar los componentes necesarios al sistema para que
- * se pueda realizar un abm de perfiles.
- * Sin los parametros no funciona
- *
- * @param MECON_Marco &$MARCO Referencia al objeto MECON_Marco que se este utilizando en la pagina
- * @param int $id_sistema Identificador del sistema en el cual se esta trabajando
- *
- * @return void
- */
-//SAMURAI_Perfil_Html {{{
-function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
+/**
+ * Funcion que se encarga agregar los componentes necesarios al sistema para
+ * que se pueda realizar un abm de perfiles.
+@see \ref page_samurai_html_perfil
+ *
+ * @param MECON_Marco &$MARCO Referencia al objeto MECON_Marco que se este utilizando en la pagina
+ * @param int $id_sistema Identificador del sistema en el cual se esta trabajando
+ *
+ * @return void
+ */
+//SAMURAI_HTML_Perfil {{{
+function SAMURAI_HTML_Perfil(&$MARCO, $id_sistema) {
//INICIALIZO OBJETOS GENERALES {{{
//REALIZO CONEXION
$SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'], $id_sistema, $DB);
//}}}
+ if (@$_POST['samurai_accion'] == 'abm' || @$_GET['samurai_perfiles'] == 'abm') {
+ $OPCION = 'abm';
+ }
+ elseif (@$_POST['samurai_accion'] == 'nuevo' || @$_GET['samurai_perfiles'] == 'nuevo') {
+ $OPCION = 'nuevo';
+ }
+ else {
+ $OPCION = 'listado';
+ }
+
//POSIBLES ACCIONES
// listado -> Listado de los perfiles ya creados en el sistema.
// nuevo -> Pantalla de seleccion o de ingreso de un nuevo nombre.
// abm -> Formulario para la carga de la info del perfil.
//LISTADO {{{
- if ((!@$_GET['samurai_perfiles'] && !@$_POST['samurai_accion'])|| @$_GET['samurai_perfiles'] == 'listado') {
+ if ($OPCION == 'listado') {
//VEO SI PUEDE ACCEDER{{{
- $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL);
+ $SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_MODIF);
//}}}
//LINKS {{{
$aHref = '<a href="'.$_SERVER['PHP_SELF'].'?accion=##ACCION##&id_perfil=##NUEVO##&samurai_perfiles=abm">';
$TABLA3->addRow($row,'align=left');
//Agrego el link a nuevo
- if ($SAMURAI_PERM->tiene(SAMURAI_ALTA_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_ALTA)) {
$row = array ('<a href="'.$_SERVER['PHP_SELF'].'?samurai_perfiles=nuevo"><img src="/MECON/images/general_nuevo.gif" border="0">Ingresar Nuevo Perfil</a>');
$TABLA2->addRow($row,'align=right');
}
//Genero la cabecera de la tabla
- $row = array ('Id','Descripcion');
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ $row = array ('Id','Descripción');
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$row[] = 'Tipo';
}
- if ($SAMURAI_PERM->tiene(SAMURAI_MODI_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_MODIF)) {
$row[] = 'Modif.';
}
- if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_BAJA)) {
$row[] = 'Elim.';
}
$Elim = ereg_replace('##ACCION##', 'e' , $Elim );
$row = array ($perfil->getId(), $perfil->getDescripcion());
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$row[] = $perfil->getTipo();
}
- if ($SAMURAI_PERM->tiene(SAMURAI_MODI_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_MODIF)) {
$row[] = $Modif;
}
- if ($SAMURAI_PERM->tiene(SAMURAI_BAJA_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_BAJA)) {
$row[] = $Elim;
}
$TABLA->addRow($row);
}
// }}}
//AGREGO LA INFO AL MARCO {{{
- $MARCO->addBody($TABLA3);
- $MARCO->addBody($TABLA2->toHtml(1));
- $MARCO->addBody($TABLA);
+ $MARCO->addBodyContent($TABLA3);
+ $MARCO->addBodyContent($TABLA2->toHtml(1));
+ $MARCO->addBodyContent($TABLA);
//}}}
}
//}}}
//NUEVO {{{
- elseif (@$_GET['samurai_perfiles'] == 'nuevo' || @$_POST['samurai_accion'] == 'nuevo') {
+ elseif ($OPCION == 'nuevo') {
//VEO SI PUEDE ACCEDER{{{
- $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL);
+ $SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA);
//}}}
//CREO LOS OBJETO NECESARIOS {{{
$FORM =& new MECON_HTML_QuickForm ('samurai_perfiles','post',$_SERVER['PHP_SELF']);
//AGREGO LOS ELEMENTOS DEL FORM {{{
$FORM->addElement ('hidden', 'samurai_accion', 'nuevo');
$FORM->addElement ('header', 'cabecera' , 'Nuevo Perfil');
- $FORM->addElement ('select', 'perfiles' , 'Perfiles', '', array('size' => '1'));
+ $FORM->addElement ('select', 'perfiles' , 'Perfiles', null, array('size' => '1'));
$FORM->addElement ('text' , 'filtro' , 'Filtrar' , array('size' => '50'));
$FORM->addElement ('text' , 'descripcion', 'Nombre' , array('size' => '50'));
$group[] = HTML_QuickForm::createElement('submit', 'continuar', 'Continuar');
$perfiles =& $FORM->getElement('perfiles');
$descripcion =& $FORM->getElement('descripcion');
if (@$botones['cancelar']) {
- header('Location: '.$_SERVER['PHP_SELF']);
+ header('Location: '.$_SERVER['PHP_SELF'].'/');
}
if (!isset($botones['filtrar'])) {
$PERFILES = SAMURAI_Perfil::getArrayPerfiles($DB);
$res = '';
$tmp = $perfiles->getSelected();
if ((!@$descripcion->getvalue() && $tmp['0'] == '--') || ($descripcion->getvalue() && $tmp['0'] != '--')) {
- $res = new PEAR_Error("Debe seleccionar un perfil del combo o ingresar un nombre en la casilla correspondiente.<br>
- Solo una de las dos opciones.");
+ $res = new PEAR_Error("Debe seleccionar un perfil del combo o ingresar un nombre en la casilla correspondiente.<br>Solo una de las dos opciones.");
@$descripcion->setValue('');
}
elseif ($tmp['0'] != '--') {
//verificar que el sistema no tenga una asociacion con ese perfil
if (SAMURAI_Perfil::existeAsociacion($DB, $tmp['0'], $id_sistema)) {
- $res = new PEAR_Error("El sistema ya tiene asociado el perfil seleccionado,
- modifique sus permisos desde la seccion perfiles.");
+ $res = new PEAR_Error("El sistema ya tiene asociado el perfil seleccionado, modifique sus permisos desde la seccion perfiles.");
}
else {
header('Location: '.$_SERVER['PHP_SELF'].'?samurai_perfiles=abm&id_perfil='.$tmp['0']);
$rta = rtrim($rta);
//
if (SAMURAI_Perfil::existePerfil($DB, $rta)) {
- $res = new PEAR_Error("Ya existe un perfil con ese nombre, seleccionelo del combo.<br>
- Recuerde que varios espacios se reduciran a uno solo
- (Ej: Agregar Usuario -> Agregar Usuario)");
+ $res = new PEAR_Error("Ya existe un perfil con ese nombre, seleccionelo del combo.<br> Recuerde que varios espacios se reduciran a uno solo (Ej: Agregar Usuario -> Agregar Usuario)");
}
else {
$temp = ereg_replace(' ' , '%20', $rta); //Cambio los espacios por %20 para que no chille el netscape
$row = array ($imagen->toHtml().' <b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
$TABLA3->addRow($row,'align=left');
//}}}
- $MARCO->addBody($TABLA3);
+ $MARCO->addBodyContent($TABLA3);
if (isset($TABLA)) {
- $MARCO->addBody($TABLA);
+ $MARCO->addBodyContent($TABLA);
}
- $MARCO->addBody($FORM);
+ $MARCO->addBodyContent($FORM);
//}}}
}
//}}}
//ABM {{{
- elseif (@$_GET['samurai_perfiles'] == 'abm' || @$_POST['samurai_accion'] == 'abm') {
+ elseif ($OPCION == 'abm') {
//VEO SI PUEDE ACCEDER{{{
- $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL,SAMURAI_BAJA_PERFIL,SAMURAI_MODI_PERFIL);
+ $SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_MODIF);
//}}}
//CREO LOS OBJETO NECESARIOS {{{
if (@$_GET['id_perfil']) {
else {
$id_perfil = null;
}
+ //XXX OBTENGO LA ACCION {{{
+ switch (@$_REQUEST['accion']) {
+ case 'm':
+ $b_accion = 'Modificar';
+ $accion = 'm';
+ break;
+ case 'e':
+ $b_accion = 'Eliminar';
+ $accion = 'e';
+ break;
+ default:
+ $b_accion = 'Grabar';
+ $accion = '';
+ break;
+ }
+ //}}}
$FORM =& new MECON_HTML_QuickForm ('samurai_perfiles','post',$_SERVER['PHP_SELF']);
$SISTEMA =& new SAMURAI_Sistema ($DB, $id_sistema);
- $PERFIL =& new SAMURAI_Perfil ($DB, $id_perfil);
+ $PERFIL =& new SAMURAI_Perfil ($DB, $id_perfil, $id_sistema);
if ($PERFIL->getResponsable()) {
$responsable = $PERFIL->getResponsable();
$FORM->addElement ('header', 'cabecera', 'ABM Perfiles');
$FORM->addElement ('hidden', 'id_perfil', $id_perfil);
$FORM->addElement ('hidden', 'desc_ant' , $descripcion);
- $FORM->addElement ('static', 'desc_perfil', 'Descripcion', $descripcion);
+ $FORM->addElement ('static', 'desc_perfil', 'Descripción', $descripcion);
$FORM->addElement ('select', 'permisos' , 'Permisos' , $PERMISOS, array('size' => '5', 'multiple' => 'true'));
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$FORM->addElement ('select', 'tipo_perfil', 'Tipo Perfil', array('E' => 'Externo', 'I' => 'Interno', 'D' => 'Dios'), array ('size' => '1'));
}
$FORM->addElement ('hidden', 'responsable', $responsable);
- $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
+ $FORM->addElement ('hidden', 'accion', $accion);
+ $group[] = HTML_QuickForm::createElement('submit', 'aceptar', $b_accion);
$group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location=\''.$_SERVER['PHP_SELF'].'\';return false;'));
$FORM->addGroup($group,'botones');
}
$desc_perfil =& $FORM->getElement ('desc_perfil');
$permisos =& $FORM->getElement ('permisos' );
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$tipo_perfil =& $FORM->getElement ('tipo_perfil');
}
$responsable =& $FORM->getElement ('responsable');
$permisos->setSelected($PERFIL->getPermisos());
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$tipo_perfil->setSelected($PERFIL->getTipo());
}
}
// }}}
else {
+ $samurai_accion =& $FORM->getElement('samurai_accion');
+ $samurai_accion->setValue('listado');
$id_perfil =& $FORM->getElement ('id_perfil' );
$desc_perfil =& $FORM->getElement ('desc_perfil');
$permisos =& $FORM->getElement ('permisos' );
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
$tipo_perfil =& $FORM->getElement ('tipo_perfil');
$tipo_perfil_tmp = $tipo_perfil->getSelected();
}
$PERFIL->setResponsable($responsable->getValue());
$PERFIL->setPermisos ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
- if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
- $PERFIL->setTipo ($tipo_perfil_tmp['0'] );
+ if ($SAMURAI_PERM->tiene(SAMURAI_PERM_PERFIL_TIPO)) {
+ $PERFIL->setTipo($tipo_perfil_tmp['0']);
}
//Grabo y verifico si se produjo algun error
}
else {
$FORM->freeze();
- header('Location: '.$_SERVER['PHP_SELF']);
+ header('Location: '.$_SERVER ['PHP_SELF'].'/');
+ exit;
}
}
}
$TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
$TABLA3->addRow($row,'align=left');
- $MARCO->addBody($TABLA3);
+ $MARCO->addBodyContent($TABLA3);
if (isset($ERROR)) {
- $MARCO->addBody($ERROR);
+ $MARCO->addBodyContent($ERROR);
}
- $MARCO->addBody($FORM);
+ $MARCO->addBodyContent($FORM);
//}}}
}
//}}}
}
+//}}}
?>