function valForm(oForm){
	var elem=oForm.elements;
	var len=elem.length;
	var i=0;
	var ok=true;
	for(i=0;i<len;i++){
		if(!elem[i].disabled){
			if(elem[i].type.toUpperCase()=="TEXT")
				if(elem[i].value=="" || elem[i].value==null) ok=false;
			if(elem[i].type.toUpperCase()=="PASSWORD")
				if(elem[i].value=="" || elem[i].value==null) ok=false;
			if(elem[i].type.toUpperCase()=="SELECT-ONE")
				if(elem[i].selectedIndex==-1) ok=false;
			if(elem[i].type.toUpperCase()=="TEXTAREA")
				if(elem[i].value=="" || elem[i].value==null) ok=false;
			if(elem[i].type.toUpperCase()=="FILE")
				if(elem[i].value=="" || elem[i].value==null) ok=false;				
		}	
	}
	if(!ok) alert('Debe llenar todos los campos requeridos');
	return ok;
}

function checkPoll(oForm){
	var elem=oForm.elements;
	var len=elem.length;
	var i=0;
	var ok=false;
	var curRadio="init";
	for(i=0;i<len;i++){
		if(!elem[i].disabled && elem[i].type.toUpperCase()=="RADIO"){
			if(curRadio!=elem[i].name){
				if(!ok && curRadio!='init') break;	
				else ok=false;
				curRadio=elem[i].name;
			}
			if(elem[i].checked) ok=true;
		}	
	}
	if(!ok) alert('Debe contestar todas las preguntas.\nLa pregunta '+curRadio.substr(1,curRadio.length)+' no ha sido contestada.');
	return ok;
}

function checkNumericValue(oText){
	if(oText.value.match(/[A-Za-z\s]+/g)){
		alert('El valor de este campo debe ser Numerico');
		oText.value="";
		oText.focus();
	}
}

function checkSameValue(obj1,obj2){
	var ok=obj1.value==obj2.value;
	if(!ok) alert('El valor de los campos de contraseņa deben ser iguales');
	return ok;	
}

function checkOrClearAll(oForm,checked,exceptId){
	var elem=oForm.elements;
	var len=elem.length;
	for(var i=0;i<len;i++){
		if((elem[i].type.toUpperCase()=="CHECKBOX") && (elem[i].name!=exceptId)){ 						
			if(elem[i].checked!=checked){
				elem[i].checked=!checked;
				elem[i].click();
			}
		}
	}	
}

function addToMails(mail,recipient,filter){
	if(mail!=filter){
		var coma=(recipient.value.length!=0)?',':'';
		recipient.value+=coma;
		recipient.value+=mail;
	}
}

function removeFromMails(mail,recipient){
	var mails=recipient.value;
	var arrayMails=mails.split(mail);
	var updatedMails="";
	for(var i=0;i<arrayMails.length;i++)
		updatedMails+=arrayMails[i];
	updatedMails=updatedMails.replace(/\,\,/g,',');
	updatedMails=updatedMails.replace(/^\,|\,$/g,'');	
	recipient.value=updatedMails;
}

function valNumCheck(ids,limit){
	var arrayIds=ids.split(",");
	var len=arrayIds.length;
	var id;
	var t=0;
	var ok;
	for(var i=0;i<len;i++)
		if(document.getElementById(arrayIds[i]).checked)t++;
	ok=(t<=limit);
	if(!ok) alert('Maximo '+limit+' opciones');
	return ok;
}

function checkSelected(namePatter,len,limit){
	var ok=true;
	var e;
	var count=0;
	for(var i=1;i<=len;i++){
		e=window.document.getElementById(''+namePatter+i);
		if(e.checked)count++;
		if(count>limit){
			ok=false;
			break;
		}
	}	
	if(!ok) alert('Solo puede seleccionar '+limit);
	return ok;
}