Cambios varios para que funcione bien con Netscape (Aunque ya no se si es asi)

[mecon/samurai.git] / lib / SAMURAI / HTML / Perfil.php

diff --git a/lib/SAMURAI/HTML/Perfil.php b/lib/SAMURAI/HTML/Perfil.php
index 931d707b19bc13999fe1efa78aacefbfbaf8fb2a..a1e1e5a878bc174ace3611c048c675e0171313ef 100644 (file)
--- a/lib/SAMURAI/HTML/Perfil.php
+++ b/lib/SAMURAI/HTML/Perfil.php
@@ -20,8 +20,6 @@
 // $Id$
 //
 
-//require_once 'MECON/general.php';
-//prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
 
 //REQUIRE ONCE GENERALES {{{
 require_once 'SAMURAI/DB.php';
@@ -53,9 +51,12 @@ require_once 'PEAR.php';
      *
      * @return void
      */
-//SAMURAI_Perfil_Html {{{
-function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
+//SAMURAI__HTML_Perfil {{{
+function SAMURAI_HTML_Perfil(&$MARCO, $id_sistema) {
 
+    $_SESSION['samurai']['id_sistema'] = $id_sistema;
+    $_SESSION['samurai']['login'] = $_SESSION['usuario'];
+    
     //INICIALIZO OBJETOS GENERALES {{{
     //REALIZO CONEXION
     $tmp = new SAMURAI_DB();
@@ -64,13 +65,24 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
     $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);
         //}}}
@@ -139,7 +151,7 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
     }
     //}}}
     //NUEVO {{{
-    elseif (@$_GET['samurai_perfiles'] == 'nuevo' || @$_POST['samurai_accion'] == 'nuevo') {
+    elseif ($OPCION == 'nuevo') {
         //VEO SI PUEDE ACCEDER{{{
         $SAMURAI_PERM->chequear(SAMURAI_ALTA_PERFIL);
         //}}}
@@ -166,7 +178,7 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
             $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);
@@ -245,7 +257,7 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
     }
     //}}}
     //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);
         //}}}
@@ -357,6 +369,8 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
                 }
                 // }}}
                 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'   );
@@ -375,7 +389,7 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
                     $PERFIL->setPermisos   ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
                     
                     if ($SAMURAI_PERM->tiene(SAMURAI_TIPO_PERFIL)) {
-                        $PERFIL->setTipo       ($tipo_perfil_tmp['0']   );
+                        $PERFIL->setTipo($tipo_perfil_tmp['0']);
                     }
                     
                     //Grabo y verifico si se produjo algun error
@@ -389,7 +403,8 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
                     }
                     else {
                         $FORM->freeze();
-                        header('Location: '.$_SERVER['PHP_SELF']);
+                        header('Location: '.$_SERVER ['PHP_SELF'].'/');
+                        exit;
                     }
                 }
             }
@@ -400,7 +415,6 @@ function SAMURAI_Perfil_Html(&$MARCO, $id_sistema) {
             $TABLA3 = new MECON_HTML_Tabla ('cellspacing=0');
             $TABLA3->addRow($row,'align=left');    
 
-            $MARCO->addTitle('ABM Perfil');
             $MARCO->addBody($TABLA3);
             if (isset($ERROR)) {
                 $MARCO->addBody($ERROR);