]> git.llucax.com Git - mecon/samurai.git/blobdiff - sistema/www/usuarios/usuarios-abm.php
Agrego documentacion funcional del Myrna. Agrego un permiso general de acceso a las...
[mecon/samurai.git] / sistema / www / usuarios / usuarios-abm.php
index 0541a2b08e9d16637844350d5bc14721f5ccdf35..9ef8a3923dc663a70276d29fa130cfc814a36536 100644 (file)
 // $Id$
 // 
 
+//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
+    if (!$SAMURAI_PERM->tiene(SAMURAI_DEVELOPER)) {
+//        header('Location: error')
+    }
+//}}}
 //REQUIRE ONCE {{{
     //MECON {{{
     require_once 'MECON/HTML/QuickForm.php';
@@ -76,7 +81,7 @@ if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
         }
         $FORM->addElement ('select', 'perfiles'   , 'Perfiles', $PERFILES, array('size' => '5', 'multiple' => 'true'));
         $FORM->addElement ('hidden', 'responsable', $_SESSION['samurai']['login']);
-        $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar', array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
+        $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
         $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location = \'usuarios\';return false;'));
         $FORM->addGroup($group,'botones');
     }
@@ -106,6 +111,7 @@ if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
             
         //ELIMINACION -> modifico el valor del boton
         if ($_GET['accion'] == 'e') {
+            $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
             $aceptar->setValue('Eliminar');
             $FORM->freeze();
         }
@@ -139,10 +145,10 @@ if (!@$_SESSION['samurai']['id_sistema'] || !@$_SESSION['samurai']['login']) {
             if ($aceptar->getValue() == 'Grabar') {
                 $res2 = $USUARIO->verificarAsociacionExistente();
             }
-            if (PEAR::isError($res)) {
+            if (@PEAR::isError($res)) {
                 $ERROR = new MECON_HTML_Error($res->getMessage());
             }
-            elseif (PEAR::isError($res2)) {
+            elseif (@PEAR::isError($res2)) {
                 $ERROR =new MECON_HTML_Error($res2->getMessage());
             }
             else {