/**************************************************************************************/
// Funcion que comprueba fecha válida
/**************************************************************************************/
function isDate(dateStr) 
{
	var datePat = /^(\d{1,2})(\/|-)(\d{1,2})(\/|-)(\d{4})$/;
	var matchArray = dateStr.match(datePat); // is the format ok?
	day = matchArray[1]; // p@rse date into variables
	month = matchArray[3];
	year = matchArray[5];
	if (((month==4)||(month==6)||(month==9)||(month==11))&&(day==31)) return false;
	if (month == 2) { // check for february 29th
		var isleap = (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0));
		if (day > 29 || (day==29 && !isleap)) return false;		
	}
	return true; // date is valid
}

/******************************************************************************************/
// Función que comprueba los campos del formulario
/******************************************************************************************/
function Comprobar() 
{   
	var indic, email, pos_arroba, pos_punto , error;
	indic=[0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,24];
	error="";
    with(document.inscripcion)
	{
	    //comprobacion de campos no vacíos
        for (i = 0; i < indic.length; i++) {
				if (elements[indic[i]].value == "") {
                        alert("Por favor rellene todos los campos.")
                        elements[indic[i]].focus()
						error=1;
                        break
                }													
		 }
 	
		//comprobacion de campos con datos correctos DESHABILITADO PORQUE DABA MUCHOS PROBLEMAS A LA GENTE (Raúl)
//		indic=[16,20,21,22,23]
		//for (i = 0; i < indic.length; i++) {
				//if (isNaN(elements[indic[i]].value)) {
                  //      alert("Por favor, introduzca sólo números")
                    //    elements[indic[i]].focus()
						//error=1;
                        //break
             //   }													
		//}
		//if(error=="") if (!isNaN(elements[13].value)) {
		  //                alert("Por favor, introduzca su letra")
        		//          elements[13].focus()
						//  error=1;
				      //}													
      
		// Comprobación fecha de nacimiento válida
		if(error=="") 
		{
        	if(!isDate(Dia.value+"-"+Mes.value+"-"+Anyo.value))
			{ 	
				alert("Fecha incorrecta");
				Dia.focus();
				error=1;			
			}
		}
	}
		
	// Comprobacion de direccion e-mail
    if(error=="") 
  	{
				email=document.inscripcion.e_mail.value;
        		pos_arroba=email.lastIndexOf('@');
				if(pos_arroba==-1) error+="\n - No tiene ARROBA: '@'";
		 		pos_punto=email.lastIndexOf('.');			
		     	if(pos_punto<=pos_arroba+1)	error+="\n - No tiene nombre servidor o punto '.'";
				if(email.length-1<=pos_punto) error+="\n - No tiene nombre dominio";
				
				if(error) {
					alert("Error en la dirección de correo:"+error);	
					document.inscripcion.e_mail.focus();
				}
				
	}
	if(error=="") {
		document.inscripcion.submit();
 	}
	

}

/******************************************************************************************/
// Función que comprueba los campos del formulario
/******************************************************************************************/
function Comprobar_Erasmus() 
{   
	var indic, email, pos_arroba, pos_punto , error;
	indic=[0,1,2,3,4];
	error="";
    with(document.inscripcion)
	{
	    //comprobacion de campos no vacíos
        for (i = 0; i < indic.length; i++) {
				if (elements[indic[i]].value == "") {
                        alert("Por favor rellene todos los campos.")
                        elements[indic[i]].focus()
						error=1;
                        break
                }													
		 }
	}
		
	// Comprobacion de direccion e-mail
    if(error=="") 
	{
		email=document.inscripcion.e_mail.value;
      pos_arroba=email.lastIndexOf('@');
		if(pos_arroba==-1) error+="\n - No tiene ARROBA: '@'";
		pos_punto=email.lastIndexOf('.');			
		if(pos_punto<=pos_arroba+1)	error+="\n - No tiene nombre servidor o punto '.'";
		if(email.length-1<=pos_punto) error+="\n - No tiene nombre dominio";
			
		if(error) {
			alert("Error en la dirección de correo:"+error);	
			document.inscripcion.e_mail.focus();
		}
	}
	if(error=="") {
		document.inscripcion.submit();
 	}
	

}

/******************************************************************************************/
// Función que comprueba los caracteres introducidos son números / Letras / No comillas
/******************************************************************************************/
//function SoloNum() {
	//with(window.event){
		//if((keyCode < 48)||(keyCode > 57)) keyCode=0; }
//}

//function SoloLetr() {	
	//with(window.event) { if(keyCode < 58) keyCode=0; }
//}

function NoComillas() {
	with(window.event){
		if((keyCode == 34)||(keyCode == 39)) keyCode=0; }
}

/******************************************************************************************/
// Funciones creadas por el Dreamweaver para efectos varios
/******************************************************************************************/
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

/******************************************************************************************/
// Otras Funciones
/******************************************************************************************/