$miejercicio = $ejercicio_general->obtener_uno($id_ejercicio);
 $miejercicio->set_numpregunta($num_preg);
 $fuentes = optional_param('fuentes', PARAM_TEXT);
 $miejercicio->set_fuentes($fuentes);
 $miejercicio->alterar();
 begin_sql();
 //Borro todas las respuestas y preguntas del ejercicio
 $preguntas = new ejercicios_ierc_preg();
 $mis_preguntas = $preguntas->obtener_todos_id_ejercicio($id_ejercicio);
 //Borro todas las respuestas
 foreach ($mis_preguntas as $pregunta) {
     $respuestas = new ejercicios_ierc_resp();
     $respuestas->borrar_id_pregunta($pregunta->get('id'));
 }
 //Borro todas las preguntas
 $preguntas->borrar_id_ejercicio($id_ejercicio);
 $num_cols = $_SESSION['IERC']['numPreguntas'];
 $num_cols = $num_cols + 1;
 //Para cada pregunta
 for ($i = 1; $i <= 1; $i++) {
     //$num_cols = optional_param('num_cabs',0,PARAM_INT);
     $log->write('num cols: ' . $num_cols);
     //Coger el texto de la pregunta
     switch ($tipo_origen) {
         case 1:
             //Es texto
             $pregunta = optional_param('pregunta' . $i, "", PARAM_TEXT);
             break;
         case 2:
             //Es audio
             $pregunta = 'audio' . $id_ejercicio . "_" . $i . ".mp3";