<?php
/* 
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */
    require_once ( PATH_MODULE.SEPARADOR.'interfaces'.SEPARADOR.'grupo_inv'.SEPARADOR.'IFACEgrupo_investigacion.php');
    require_once ( PATH_MODULE.SEPARADOR.'tablas'.SEPARADOR.'TBgrupo_investigacion.php');
    require_once ( PATH_MODULE.SEPARADOR.'tablas'.SEPARADOR.'TBLineas_inv.php');

    
    // include_dir( 'root.tablas' );


    /* Procedimiento: ver_info_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Despliega informacion del grupo de investigacion
     * Parametros:
     *
     */
    function ver_info_grupo_inv() {
        try {

            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv = $_GET['grupo_inv'];


            // despliega informacion del semillero
            $obIFACEGrup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre

            $output = $obIFACEGrup_inv->ver_info_grupo_inv($nuIdGrupoInv);

            return $output;
        } catch (Exception $e) {
              //form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());

        }
    }



    /* Procedimiento: ver_info_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Despliega informacion del grupo de investigacion
     * Parametros:
     *
     */
    function edicion_grupo_inv() {
        try {

            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv = $_GET['grupo_inv'];
//            $sbNombGrupoInv = $_POST['idNombreGrupoInv'];
//            $sbDescripcion = $_POST['idDescripcion'];

            // despliega interface de edicion de grupo d einvestigacion
            $obIFACEGrup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre
            $output = $obIFACEGrup_inv->edicion_grupo_inv($nuIdGrupoInv);

            return $output;
        } catch (Exception $e) {
              //form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());

        }
    }

    /* Procedimiento: adicion_int_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Listado de integrantes a adicionar en el grupo de investigacion
     * Parametros:
     *
     */

    function lista_integ_adic_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv = $_GET['grupo_inv'];

            // despliega interface de edicion de grupo d einvestigacion
            $obIFACEGrup_inv = new IFACEgrupo_investigacion(); 
            $output = $obIFACEGrup_inv->lista_integ_adic_grupo_inv($nuIdGrupoInv);

            return $output;
        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

     /* Procedimiento: reg_integ_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Registra integrantes nuevos al grupo de investigacion
     * Parametros:
     *
     */

    function reg_integ_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $arrayIntegrantes = $_POST['integrantes'];
            $nuIdGrupoInv = $_POST['grupo_inv'];

            $obIntegGrupInv = new TBintegrantes_grup_inv();
            //Recorre arreglo de integrantes y los registra como integrantes
            ////del grupo
            if ($arrayIntegrantes) {
                foreach($arrayIntegrantes as $nuIndice=>$nuIdIntegrante) {

                    $obIntegGrupInv->fnuInserUpdateEstado($nuIdGrupoInv,
                                                          $nuIdIntegrante);
                }
            }
            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);

        } catch (Exception $e) {
              pRollback();
              return t($e->getMessage());

        }
    }



    /* Procedimiento: update_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Actualiza informacion del grupo de investigacion
     * Parametros:
     *
     */

    function update_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv = $_POST['idGrupoInv'];
            //Nombre grupo de investigacion
            $sbNombreGrupoInv = str_replace('\'', '',$_POST['idNombreGrupoInv']);
            //descripcion del grupo investigacion
            $sbDescripcGrupoInv =  str_replace('\'', '', $_POST['idDescripcion']);

            $sbHistoria =  str_replace('\'', '',$_POST['idHistoria']);
            $sbMision =  str_replace('\'', '',$_POST['idMision']);
            $sbObjetivos =  str_replace('\'', '',$_POST['idObjetivos']);
            $sbRedes_academicas =  str_replace('\'', '',$_POST['idRedes_academicas']);
            $sbEventos_organizados =  str_replace('\'', '',$_POST['idEventos_organizados']);
            $sbContacto =  str_replace('\'', '',$_POST['idContacto']);
            $sbPersonal_soporte =  str_replace('\'', '',$_POST['personal_soporte']);

            $obTBGrupoInv = new TBgrupo_investigacion();
            //actualiza informacion de grupo de investigacion
            $obTBGrupoInv->pUpdate($nuIdGrupoInv ,
                                   $sbNombreGrupoInv,
                                   $sbDescripcGrupoInv,
                                   $sbHistoria,
                                   $sbMision,
                                   $sbObjetivos,
                                   $sbRedes_academicas,
                                   $sbEventos_organizados,
                                   $sbContacto,
                                   $sbPersonal_soporte);
            
            $sbUrl_imagen_grupo = fLoafFileForm('imagen_perfil',
                                                PATH_IMAGENES,
                                                $nuIdGrupoInv,
                                                FILE_EXISTS_REPLACE);
            if ($sbUrl_imagen_grupo) {
                $obTBGrupoInv->pUpdUrl_imagen_grupo($nuIdGrupoInv,
                                                    $sbUrl_imagen_grupo);
            }
            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /* Procedimiento: update_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Actualiza informacion del grupo de investigacion
     * Parametros:
     *
     */

    function elim_integ_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];
            $nuIdIntGrupoInv = $_GET['integ_grup_inv'];
            
            $obTBIntGrupoInv = new TBintegrantes_grup_inv();
            //desactiva registro de grupo de investigacion
            $obTBIntGrupoInv->fupdEstadoIntegrante($nuIdIntGrupoInv,
                                                   'N');

            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /**************************************************************************/
    /***********************  SEMILLEROS **************************************/
    /**************************************************************************/

    /*
     * Procedimiento: ver_info_semillero
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Despliega informacion de semillero
     * Parametros:
     *
     */
    function ver_info_semillero() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de semillero
            $nuIdSemillero = $_GET['semillero'];

            // despliega informacion del semillero
            $obIFACEListGrup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre

            $output = $obIFACEListGrup_inv->ver_info_semillero($nuIdSemillero);

            return $output;
        } catch (Exception $e) {
              //form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());

        }
    }



    /*
     *  Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Registra y despliega interface de resultado de creacion de semillero
     * Parametros:
     *
     */
    function semillero_registrado() {
        try {
            $sbNombre = str_replace('\'', '',$_POST['nombre']);
            $sbDescripcion = str_replace('\'', '',$_POST['descripcion']);
            $nuGrupo_inv = $_POST['grupo_inv'];
            $sbObjetivos = $_POST['objetivos'];
			$sbContacto = $_POST['contacto'];
            //Sube imagen al servidor
             $validators = array();
             $dest = PATH_IMAGENES;
	     $file = file_save_upload('imagen', $validators, $dest);
             
	     if($file == 1) {
                 
                 $sbUrlFotoUsuario = $file->filename;
                 
	         //form_set_error('myform', t("Failed to save the file."));
	     }
 
            $userid = fnuUserId();

            $obTbGrupo_Inv = new TBgrupo_investigacion();
            
            //Registra datos en base de datos
            $nuLastIndex = $obTbGrupo_Inv->fnuInsertRecord($userid,
                                                           1,
                                                           $nuGrupo_inv,
                                                           $sbNombre,
                                                           $sbDescripcion,
                                                           $sbUrlFotoUsuario,
														   $sbObjetivos,
														   $sbContacto);
            if ($nuLastIndex != NULL) {
                pCommit();
                //Despliega semillero registrado
                $row = $obTbGrupo_Inv->frowRecord($nuLastIndex);
                // despliega interface de registro insertado correctamente
                $obIFACEgrup_inv = new IFACEgrupo_investigacion(); 
                $output = $obIFACEgrup_inv->ver_info_semillero($nuLastIndex);
            }
            return $output;
        } catch (Exception $e) {
              pRollback();
              form_set_error( 'Error', t($e->getMessage()));
        }
    }


    /* Procedimiento: edicion_semillero
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Despliega informacion de semillero en modo de edicion
     * Parametros:
     *
     */
    function edicion_semillero() {
        try {

            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdSemilero = $_GET['semillero'];

            // despliega interface de edicion de semillero
            $obIFACEGrup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre
            $output = $obIFACEGrup_inv->edicion_semillero($nuIdSemilero);

            return $output;
        } catch (Exception $e) {
              //form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());

        }
    }


/* Procedimiento: update_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Actualiza informacion del grupo de investigacion
     * Parametros:
     *
     */

    function update_semillero() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdSemillero = $_POST['semillero'];
            //Nombre grupo de investigacion
            $sbNombreSemillero =  str_replace('\'', '',$_POST['NombreSemillero']);
            //descripcion del grupo investigacion
            $sbDescripc =  str_replace('\'', '',$_POST['idDescripcion']);
			$sbObjetivos =  str_replace('\'', '',$_POST['Objetivos']);
			$sbContacto =  str_replace('\'', '',$_POST['Contacto']);

            $obTBGrupoInv = new TBgrupo_investigacion();
            //actualiza informacion de grupo de investigacion
            $obTBGrupoInv->pUpdate($nuIdSemillero ,
                                   $sbNombreSemillero,
                                   $sbDescripc,
								   '',
                         			'',
                         			$sbObjetivos,
                         			'',
                         	        '',
                        			$sbContacto,
                         			'' );

            $sbUrl_imagen_grupo = fLoafFileForm('imagen_perfil',
                                                PATH_IMAGENES,
                                                $nuIdSemillero,
                                                FILE_EXISTS_REPLACE);
            if ($sbUrl_imagen_grupo) {
                $obTBGrupoInv->pUpdUrl_imagen_grupo($nuIdSemillero,
                                                    $sbUrl_imagen_grupo);
            }
            pCommit();

            drupal_goto('telematica/ver_info_semillero','semillero='.$nuIdSemillero);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }





    /* Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Despliega listado de grupos de investigacion
     * Parametros:
     *
     */
    function listado_grupo_inv() {
        try {
            // Se obtienen parametros de URL
            $nuIdDepartamento = $_GET['departamento'];
            $sbNombre = $_GET['nombre'];
            $sbCadenaConsulta = $_GET['CadenaConsulta'];

            // despliega interface de listado de grupos de investigacion
            $obIFACEListGrup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre
            $output = $obIFACEListGrup_inv->listado_grupo_inv($nuIdDepartamento,
                                                              $sbNombre,
                                                              $sbCadenaConsulta);
            
            return $output;
        } catch (Exception $e) {
              pRollback();
              // form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());
        }
    }

/* Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Procedimiento: listado_semilleros
     * Descripcion: Despliega listado de grupos de investigacion
     * Parametros:
     *
     */
    function listado_semilleros() {
        try {
            // Se obtienen parametros de URL
            $nuIdDepartamento = $_GET['departamento'];
            $nuIdGrupoInv = $_GET['grupo_inv'];


            // despliega interface de listado de grupos de investigacion
            $obIFACE_Grup_inv = new IFACEgrupo_investigacion(); // Creamos un carro con nombre
            $output = $obIFACE_Grup_inv->listado_semilleros($nuIdDepartamento,
                                                            $nuIdGrupoInv);

            return $output;
        } catch (Exception $e) {
              pRollback();
              // form_set_error( 'Error', t($e->getMessage()));
              return t($e->getMessage());
        }
    }


    /* Procedimiento: lista_integ_adic_semilleros
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Listado de integrantes a adicionar al semillero
     * Parametros:
     *
     */

    function lista_integ_adic_semilleros() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de semillero
            $nuIdSemillero = $_GET['semillero'];

            // despliega interface de edicion de grupo d einvestigacion
            $obIFACEGrup_inv = new IFACEgrupo_investigacion();
            $output = $obIFACEGrup_inv->lista_integ_adic_semillero($nuIdSemillero);

            return $output;
        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /* Procedimiento: reg_integ_semillero
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Registra integrantes nuevos al semillero
     * Parametros:
     *
     */

    function reg_integ_semillero() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $arrayIntegrantes = $_POST['integrantes'];
            $nuIdGrupoInv = $_POST['grupo_inv'];

            $obIntegGrupInv = new TBintegrantes_grup_inv();
            //Recorre arreglo de integrantes y los registra como integrantes
            ////del grupo
            if ($arrayIntegrantes) {
                foreach($arrayIntegrantes as $nuIndice=>$nuIdIntegrante) {
                    $obIntegGrupInv->fnuInsertRecord($nuIdGrupoInv,
                                                     $nuIdIntegrante);
                }
            }
            pCommit();
            drupal_goto('telematica/ver_info_semillero','semillero='.$nuIdGrupoInv);

        } catch (Exception $e) {
              pRollback();
              return t($e->getMessage());

        }
    }


    /* Procedimiento: elim_integ_semillero
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Elimina integrantes del semillero
     * Parametros:
     *
     */

    function elim_integ_semillero() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];
            $nuIdIntGrupoInv = $_GET['integ_grup_inv'];

            $obTBIntGrupoInv = new TBintegrantes_grup_inv();
            //actualiza informacion de grupo de investigacion
            $obTBIntGrupoInv->fdeleteRecord($nuIdIntGrupoInv);

            pCommit();
            drupal_goto('telematica/ver_info_semillero','semillero='.$nuIdGrupoInv);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /* Procedimiento: adicion_int_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Listado de integrantes a adicionar en el grupo de investigacion
     * Parametros:
     *
     */

    function lista_lin_inv_adic_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv = $_GET['grupo_inv'];

            // despliega interface de adicion de lineas de investigacion
            $obIFACEGrup_inv = new IFACEgrupo_investigacion();
            $output = $obIFACEGrup_inv->lista_lin_inv_adic_grupo_inv($nuIdGrupoInv);

            return $output;
        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }
    /* Procedimiento: reg_integ_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Registra integrantes nuevos al grupo de investigacion
     * Parametros:
     *
     */

    function add_lin_inv_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $arrayLinInv = $_POST['linea_inv'];
            $nuIdGrupoInv = $_POST['grupo_inv'];

            $obTBLineas_inv = new TBLineas_inv();
            //Recorre arreglo de integrantes y los registra como integrantes
            ////del grupo
            if ($arrayLinInv) {
                foreach($arrayLinInv as $nuIndice=>$nuId) {
                    $obTBLineas_inv->fAddRegLinInvXGrupInv($nuIdGrupoInv,
                                                           $nuId);
                }
            }
            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);

        } catch (Exception $e) {
              pRollback();
              return t($e->getMessage());

        }
    }

    /* Procedimiento: update_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Actualiza informacion del grupo de investigacion
     * Parametros:
     *
     */

    function elim_linea_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];
            $nuIdLineaInv    = $_GET['linea_grup_inv'];

            $obTBLineas_inv = new TBLineas_inv();
            //actualiza informacion de grupo de investigacion
            $obTBLineas_inv->fdelLinInvGrupInv($nuIdLineaInv);

            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }
    
    /* Procedimiento: update_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Actualiza informacion del grupo de investigacion
     * Parametros:
     *
     */

    function lista_integ_grupo_inv_rol() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];
            $sbRol           = $_GET['rol'];

            $obIFaceGrupoInv = new IFACEgrupo_investigacion();
            $sbOutput = $obIFaceGrupoInv->lista_integ_grupo_inv_rol($nuIdGrupoInv, $sbRol);
            return $sbOutput;

        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /* Procedimiento: list_integ_ant_grupo_inv
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Lista integrantes que hicieron parte del grupo de investigacion
     * Parametros:
     *
     */

    function list_integ_ant_grupo_inv() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];

            $obIFaceGrupoInv = new IFACEgrupo_investigacion();
            $sbOutput = $obIFaceGrupoInv->list_integ_ant_grupo_inv($nuIdGrupoInv);
            return $sbOutput;

        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }

    /* Procedimiento: eli_semillero
     * Autor: Alexis Ocaciones Garcia
     * Fecha: 10-ABR-2011
     * Descripcion: Elimina semillero
     * Parametros:
     *
     */

    function eliminacion_semillero() {
        try {
            /******** Se obtienen parametros de URL *************************/
            //Id de grupo de investigacion
            $nuIdGrupoInv    = $_GET['grupo_inv'];
            $nuIdSemillero   = $_GET['semillero'];

            $obTBGrupoInv = new TBgrupo_investigacion();
            $obTBIntGrupoInv = new TBintegrantes_grup_inv();

            //Elimina integrantes semillero
            $obTBIntGrupoInv->fdeleteGrupoInv($nuIdSemillero);
            //Elimina semillero
            $obTBGrupoInv->fdeleteRecord($nuIdSemillero);
            //


            pCommit();
            drupal_goto('telematica/ver_info_grup_inv','grupo_inv='.$nuIdGrupoInv);


        } catch (Exception $e) {
              return t($e->getMessage());

        }
    }