function verifica_mail(t_mail)
{
	if ((t_mail.lastIndexOf(" ")!=-1) || (t_mail.lastIndexOf("@")==-1) || (t_mail.lastIndexOf(".")<=(t_mail.lastIndexOf("@")+1)) || (t_mail.lastIndexOf(".")==(t_mail.length-1))) return false;
		else return true;
}

function verifica_check(formulario)
{
	var t=0;
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			if (elemento.checked == true) t=1;
		}
	}
	if(t==0) return false;
		else return true;
}

function comprobar_campos(formulario,check)
{
	//Comprovamos los requeridos
	for (var i=1;i<formulario.elements.length;i++)
	{
		var e = formulario.elements[i],bvar;
		if (e.tipo=="requerido")
		{
			if (e.value=="")
			{
				alert(idi_campo + e.label + idi_campo_no_vacio);
				if (e.dato!='textarea') e.focus();
				return false;
			}
		}		
	}
	
	//Comprovar tipo de dato
	for (var i=1;i<formulario.elements.length;i++)
	{
		var e = formulario.elements[i],bvar;
		var valor;
		if (e.value!="")
		{
			switch (e.dato)
			{
				case "numerico":
					valor = parseFloat(e.value);
					if (isNaN(valor))
					{
						alert(idi_campo + e.label + idi_numero);
						e.focus();
						return false;
					}
				break;
				case "mail":
					if (!verifica_mail(e.value))
					{
						alert(idi_campo + e.label + idi_mail);
						e.focus();
						return false;
					}
				break;
			}
		}
	}
	
	if (check==1)
	{
		if (!verifica_check(formulario))
		{
			alert(idi_susctibirse);
			return false;
		}
	}
	return true;
}

function comprueba_contador(formulario)
{
	mas_conta=150;
	if (formulario.conta.value>mas_conta)
	{
		alert(idi_sms+mas_conta+idi_sms_maximo);
		return false;
	}
	
	if (!comprobar_campos(formulario,0)) return false;
		else return true
}

function comprueba_seleccion(formulario)
{
	var t=0;
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			if (elemento.checked == true) t=1;
		}
	}
	if(t==0)
	{
		alert(idi_destinatario);
		return false;
	}
	else return true;
}

function comprueba_sms(formulario)
{
	var t=0;
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			if (elemento.checked == true) t=1;
		}
	}
	if(t>formulario.sms.value)
	{
		alert(idi_sms);
		return false;
	}
	else if (comprueba_seleccion(formulario)) return true;
		else return false;
}

function sele_todos(formulario)
{
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			if (elemento.checked == false) elemento.checked = true;
		}
	}
}

function sele_ninguno(formulario)
{
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			if (elemento.checked == true) elemento.checked = false;
		}
	}
}

function sele_cambio(formulario)
{
	for (var i=0;i < formulario.elements.length;i++)
	{
		var elemento=formulario.elements[i];
		if(elemento.type=='checkbox')
		{
			elemento.checked = !elemento.checked;
		}
	}
}

function enviar_prueba(formulario,form2)
{
	if ((comprobar_campos(form2,0)) && (comprobar_campos(formulario,0)))
	{
		formulario.titulo.value=form2.titulo_TXT.value;
		formulario.cuerpo.value=form2.cuerpo_TXT.value;
	}
	else return false;
}

function enviar_prueba_portada(formulario,form2)
{
	if ((comprobar_campos(form2,0)) && (comprobar_campos(formulario,0)))
	{
		formulario.titulo.value=form2.titulo_TXT.value;
	}
	else return false;
}

function enviar_mail(formulario)
{
	if (comprobar_campos(formulario,0))
	{
		formulario.submit();
	}
}

function enviar_mail_portada(formulario)
{
	if (comprobar_campos(formulario,0))
	{
		formulario.enviar.disabled="true";
		envio=window.open('envio_mail.php?id_mensaje='+formulario.mensaje_id.value+'&titulo='+formulario.titulo_TXT.value,'envio','left=50,top=50,width=400,height=160,scrollbars=no,status=no,menubar=no,resizable=no');
		window.location='admin.php?task=news_hist';
	}
}

function ver_modulos ()
{
	modulos=window.open("modulos.php","modulos","left=450,top=50,width=435,height=500,scrollbars=yes,status=no,menubar=no,resizable=no");
}

function habilita(id,valor) 
{
	window.location='hab.php?id=' + id + '&valor=' + valor;
}

function ver_boletines(pagina) 
{
	boletin=window.open(pagina,'boletin','width=700,height=400,scrollbars=yes');
}

function borra(id,tabla,variables) 
{
	if (confirm(idi_borrar)) 
	{
		window.location='borrar.php?id='+id+'&tabla='+tabla+variables;
	}
}

function m_busqueda() 
{
	if (document.getElementById("busqueda").style.display=="none") document.getElementById("busqueda").style.display="";
		else document.getElementById("busqueda").style.display="none"
}

function imprimir(nombre,email,orden,id) 
{
	ventana=window.open('imprimir.php?b_nombre=' + nombre + '&b_mail=' + email + '&orden=' + orden + '&id=' + id,'ventana','scrollbars=yes,resizable=no,height=550,width=667,screenX=700,screenY=500');
}

function previsualizar() 
{
	ventana=window.open('prev.php','_blank','left=50,top=50,width=730,height=480,scrollbars=yes');
}

function contador()
{
	document.formu.conta.value=document.formu.mensaje.value.length;
}

function info_ampli(id) 
{
	info_suscrip=window.open('suscriptor_info.php?id=' + id,'info_suscrip','width=700,height=400,scrollbars=yes');
}

function ver_sms(id) 
{
	info_sms=window.open('sms.php?id=' + id,'info_sms','width=300,height=250,scrollbars=yes');
}

function ver_mails_envio(id) 
{
	mails_envio=window.open('mails_envio.php?id=' + id,'mails_envio','width=500,height=350,scrollbars=yes');
}

function ver_help(archivo,titulo)
{
	help=window.open("help.php?archivo="+archivo+"&titulo="+titulo,"help","left=0,top=0,width=1040,height=788,scrollbars=yes,status=no,menubar=no,resizable=yes");
}

function comprar_sms()
{
	sms_buy=window.open("comprar_sms.php","sms_buy","left=0,top=0,width=370,height=270,scrollbars=no,status=no,menubar=no,resizable=no");
}

function ocultar_carga() 
{
	document.getElementById('div_cargando').style.visibility='hidden'; 
} 