function valida_envia(valor){
	var pepez=0;
	for(i=0; ele=document.fvalida.elements[i]; i++){
	if (ele.type=='radio')
	if (ele.checked){pepez=1;break;}}
	if (pepez==1){
	     smutEngine(valor); //antes de guardar llamamos la siguiente función para que valide palabras obscenas y las reemplaze
	}else{
		 alert('Debe seleccionar alguna de las opciones');return;}
}
//*******************************************************
/*  
Las palabras aquí descritas pueden ser motivo de ofensa.
Aunque lo que se busca es evitar toda clase de palabras groseras en el sitio Web libreriatemis.com
*/
function smutEngine(valor) {
smut="#@&*%!#@&*%!#@&*%!"; /*Estas palabras obsenas no apareceran en los comentarios hechos en la encuesta se remplazaran por simbolos, luego se borraran*/
cmp="sexo babes shit fuck damn porno cum cunt prick pecker ass pussy verga marica gay culo nalgas nalga pene pipí jopo orinar senos teta tetas bulba vulva semen monda hp ijueputa hijueputa hijueputas tumadre chinga pinga perros perra zorra zorras malditas malditos malparida malparido imbeciles imbecil animales infeliz desgraciados cabrones cabron cabrón brutos bruto malnacido drogadicto drogadicta malnacida huevon huevonada huevones culo gonorrea gonorreas pirobos pirovos lamedores"
+"asshole pedophile man-boy man/boy dong twat ";
txt=document.fvalida.comentario.value;
tstx="";
for (var i=0;i<16;i++){
pos=cmp.indexOf(" ");
wrd=cmp.substring(0,pos);
wrdl=wrd.length
cmp=cmp.substring(pos+1,cmp.length);
while (txt.indexOf(wrd)>-1){
pos=txt.indexOf(wrd);
txt=txt.substring(0,pos)+smut.substring(0,wrdl)
+txt.substring((pos+wrdl),txt.length);
   }
}
 document.fvalida.comentario.value=txt;
 window.location="encuesta.php?id="+valor;
 document.fvalida.submit();
}
//*******************************************************


function valida_admin(valor,nom,pass){
//valido el usuario de ingreso a encuesta
	if (document.fadmin.nombreUsua.value.length==0){
		alert("Digite su nombre de usuario por favor")
		document.fadmin.nombreUsua.focus()
		return 0;
	}
	//valido el password 
	if (document.fadmin.contrasena.value.length==0){
		alert("Digite su contraseña de administrador por favor")
		document.fadmin.contrasena.focus()
		return 0;
	}
	window.location="../encuestas/ingreso_nuevo_login.php?valor="+valor+"&nombreUsua="+nom+"&contrasena="+pass;
	document.fadmin.submit();	
}

function valida_nueva_encuesta(vl,pregunta,consecutivo){
//valido si escribió alguna pregunta
	if (document.fnueva.pregunta.value.length==0){
		alert("Digite la pregunta para la encuesta por favor")
		document.fnueva.pregunta.focus()
		return 0;
	}
	//verif=vv variable de verificacion del usuario que ingresó
	window.location="../encuestas/ingreso_nuevo_login.php?confirmar="+vl+"&pregunta="+pregunta+"&vv="+0+"&consecutivo="+consecutivo;	
}

function validar_form_adjun(){
//valido datos para adjuntar el archivo
	if (document.formulario.Nombre.value.length<=1){
		alert("Digite su nombre por favor")
		document.formulario.Nombre.focus()
		return 0;
	}
	
	if (formulario.email.value.indexOf('@', 1) == -1 || formulario.email.value.indexOf('.', formulario.email.value.indexOf('@', 0)) == -1) {
		alert("Dirección de e-mail inválida"); 
		document.formulario.email.focus()
		return 0;
	}	
		
	if (document.formulario.asunto.value.length==0){
		alert("Digite el asunto por favor")
		document.formulario.asunto.focus()
		return 0;
	}
	if (document.formulario.archivo1.value.length==0){
		alert("No existen archivos adjuntos, verifique por favor")
		document.formulario.archivo1.focus()
		return 0;
	}
	document.formulario.submit();	
}

function valida_add_coment_admin(valor){
    if (document.form_coment_admin.comentario.value.length==0){
		alert("Digite el comentario por favor")
		document.form_coment_admin.comentario.focus()
		return 0;
	}
	document.form_coment_admin.submit();	
}

function validar_form_faq(){
//valido datos para enviar informacion de faq
	if (document.formulario_faq.de.value.length<=1){
		alert("Digite nombre y apellido por favor")
		document.formulario_faq.de.focus()
		return false;
	}
	
	if (formulario_faq.para.value.indexOf('@', 1) == -1 || formulario_faq.para.value.indexOf('.', formulario_faq.para.value.indexOf('@', 0)) == -1) {
		alert("Dirección de e-mail inválida"); 
		document.formulario_faq.para.focus()
		return false;
	}
	document.formulario_faq.submit();
}

/* validaciones para formularios de Tracking orders */
function validar_usua_TO(){
//valido datos para ingreso de usuario de tracking orders
	if (document.form_TO.usuario.value.length<=1){
		alert("Digite su nombre de usuario por favor")
		document.form_TO.usuario.focus()
		return 0;
	}
}