<?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: lun jul  7 13:30:05 ART 2003
// | Author:  Martin Marrese <mmarre@mecon.gov.ar>
// +----------------------------------------------------------------------+
//
// $Id$
// 
//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
$SAMURAI_PERM->setSistema(SAMURAI_PERM);
if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
    $SAMURAI_PERM->setSistema($_SESSION['samurai']['id_sistema']);
    $SAMURAI_PERM->chequear(SAMURAI_PERM_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_MODIF, SAMURAI_PERM_DEVELOPER);
}
$MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
//}}}

// REQUIRE_ONCE {{{
    require_once 'MECON/HTML/QuickForm.php';
    require_once 'MECON/HTML/Tabla.php';
    require_once 'MECON/HTML/Error.php';
    require_once 'SAMURAI/Perfil.php';
    require_once 'SAMURAI/Permiso.php';
    require_once 'SAMURAI/Sistema.php';
    require_once 'MECON/HTML/Image.php';
// }}}
//CREO LOS OBJETO NECESARIOS {{{
    if (@$_GET['id_perfil']) {
        $id_perfil = $_GET['id_perfil'];
    }
    elseif (@$_POST['id_perfil']) {
        $id_perfil = $_POST['id_perfil'];
    }
    else {
        $id_perfil = null;
    }
    $FORM = new MECON_HTML_QuickForm ('perfiles_abm','post','perfiles-abm');
    $SISTEMA = new SAMURAI_Sistema ($DB, $_SESSION['samurai']['id_sistema']);
    $PERFIL = new SAMURAI_Perfil ($DB, $id_perfil,
            $_SESSION['samurai']['id_sistema']);

    if ($PERFIL->getResponsable()) {
        $responsable = $PERFIL->getResponsable();
    }
    else {
        $responsable = $_SESSION['usuario'];
    }
    
    if (!@$_GET['id_perfil']) {
        if (@$_GET['desc_perfil']) {
            $PERFIL->setDescripcion(@$_GET['desc_perfil']);
        }
        else {
            $PERFIL->setDescripcion(@$_POST['desc_ant']);
        }
    }
    $descripcion = $PERFIL->getDescripcion();
// }}}
//OBTENGO LOS PERMISOS DEL SISTEMA {{{
    $ASOCIACIONES = $SISTEMA->getAsociaciones();
    $PERMISOS = array ();
    foreach ($ASOCIACIONES as $as) {
        $clave = $as['id'].'##'.$as['obs'];
        $texto = ($as['obs'] != '') ? $as['desc'].' - '.$as['obs']: $as['desc'];
        $PERMISOS[$clave] = $texto;
    }
// }}}
//AGREGO LOS ELEMENTOS DEL FORM {{{
    if (@$PERMISOS) {
        $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 ('select', 'permisos'   , 'Permisos'   , $PERMISOS, array('size' => '5', 'multiple' => 'true'));
        $FORM->addElement ('hidden', 'responsable', $responsable);
        $group[] = HTML_QuickForm::createElement('submit', 'aceptar' , 'Grabar');
        $group[] = HTML_QuickForm::createElement('submit', 'cancelar', 'Cancelar', array ('onClick' => 'javascript:window.location=\'perfiles\';return false;'));
        $FORM->addGroup($group,'botones');
    }
    else {
        $ERROR = new MECON_HTML_Error('El sistema no posee permisos asociados.');
    }
// }}}
//AGREGO LAS REGLAS DE VALIDACION {{{
    $FORM->addRule ('permisos', 'Se debe seleccionar al menos un permiso', 'required');
// }}}
//CARGO LOS DATOS SI YA EXISTEN EN BASE {{{
    if (isset($_GET['accion']) && $_GET['accion'] != '') {
        //MODIFICACION
        $id_perfil    =& $FORM->getElement  ('id_perfil'  );
        $desc_perfil  =& $FORM->getElement  ('desc_perfil');
        $permisos     =& $FORM->getElement  ('permisos'   );
        $responsable  =& $FORM->getElement  ('responsable');
        $group        =& $FORM->getElement  ('botones'    );
        $group        =& $group->getElements('aceptar'    );
        $aceptar      =& $group[0];

        $permisos->setSelected($PERFIL->getPermisos());
        
        if ($PERFIL->getResponsable() != '') {
            $responsable->setValue($PERFIL->getResponsable());
        }

        //Modifico el valor del boton
        $aceptar->setValue('Modificar');
            
        //ELIMINACION -> modifico el valor del boton
        if ($_GET['accion'] == 'e') {
            $aceptar->setValue('Eliminar');
            $aceptar->updateAttributes(array ('onClick' => 'javascript:if (confirm(\'¿Esta Seguro?\')) return true;return false;'));
            $FORM->freeze();
        }
    }
// }}}
//VALIDO EL FORMULARIO {{{
    if ($FORM->validate()) {
        // VEO SI SE CANCELO {{{
        $botones = $FORM->getSubmitValue('botones');
        if (@$botones['cancelar']) {
            header('Location: perfiles');
        }
        // }}}
        else {
            $id_perfil    =& $FORM->getElement  ('id_perfil'  );
            $desc_perfil  =& $FORM->getElement  ('desc_perfil');
            $permisos     =& $FORM->getElement  ('permisos'   );
            $responsable  =& $FORM->getElement  ('responsable');
            $group        =& $FORM->getElement  ('botones'    );
            $group        =& $group->getElements('aceptar'    );
            $aceptar      =& $group[0];
      
            $PERFIL->setDescripcion($desc_perfil->_text     );
            $PERFIL->setResponsable($responsable->getValue());
            $PERFIL->setPermisos   ($permisos->getSelected()); //Le asigno al perfil los permisos seleccionados
            
            //Grabo y verifico si se produjo algun error
            $res = $PERFIL->guardarDatos($aceptar->getValue());

            if (PEAR::isError($res)) {
                $ERROR = new MECON_HTML_Error($res->getMessage());
                if ($aceptar->getValue() == 'Eliminar') {
                    $FORM->freeze();
                }
            }
            else {
                $FORM->freeze();
                header('Location: perfiles');
            }
        }
    }
// }}}
//DIBUJO LA PAGINA {{{
    $imagen = new MECON_HTML_Image('/MECON/images/vinetas_flecha_doble.gif');
    $row    = array ($imagen->toHtml().'&nbsp;<b>SISTEMA: '.$SISTEMA->getNombre().'</b>');
    $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);
    }
    $MARCO->addBody($FORM);
    $MARCO->display();
//
//FIN
?>