//------------------------------------------------------------------------------------------------------------------------------------	
	function vacio(campo)
	{
		if (eval(campo.value.length)==0)
			return 1;
		else
			return 0;
	}

//------------------------------------------------------------------------------------------------------------------------------------	
	function mail(mail)
	{
		var cont,ind1,ind2,ind3,ind4;
		mail=mail.value;
		cont=mail.length;
		ind1=mail.indexOf('@');
		ind2=mail.indexOf('.');
		ind3=mail.lastIndexOf('@');
		ind4=mail.lastIndexOf('.');
       	if ((ind1<=0)||(ind3>ind4)||(ind3!=ind1)||(ind4+2>cont)||(ind4+5<cont)||(ind3==ind4-1))
		{
			return 1;
		}
	}	
//------------------------------------------------------------------------------------------------------------------------------------	
	function validar_index(formulario)
	{
		if (vacio(formulario.login)||vacio(formulario.password))
		{
			var errores = "No debes dejar ningun campo vacio";
			window.open('./form_error.php?error='+errores,'ventana','width=780,height=300');
		}
		else 
			formulario.submit();
		//window.location.href="./aviso_migracion.php";	
	}

//------------------------------------------------------------------------------------------------------------------------------------		
	function mostrar_errores(errores)
	{
		document.write(errores);
	}	

//------------------------------------------------------------------------------------------------------------------------------------
	function validar_archivo_1(formulario)
	{
		if (document.formulario.documento.value == "") {
			var errores = "Debes seleccionar un archivo para mandar";
			window.open('../form_error.php?error='+errores,'ventana','width=780,height=300');
		} else {
			if((document.formulario.documento.value.substr(document.formulario.documento.value.length-5,5) != ".html") && (document.formulario.documento.value.substr(document.formulario.documento.value.length-5,5) != ".HTML") && (document.formulario.documento.value.substr(document.formulario.documento.value.length-4,5) != ".htm") && (document.formulario.documento.value.substr(document.formulario.documento.value.length-4,5) != ".HTM")){
				var errores = "El archivo debe tener la extensi&oacute;n .html o .htm";
				window.open('../teconecto/form_error.php?error='+errores,'ventana','width=780,height=300');
			} else {
				document.formulario.submit();
			}
		}
	}

//------------------------------------------------------------------------------------------------------------------------------------	
	function cargar_emergente_contactos()
	{
		existentes=campo_oculto.value;
		usuario=existentes.split(",");
		tipo_usuario=usuario[0].split("-");
		if (tipo_usuario[0]=="g")
		{
			for (i=0;i<contacto_arr.length;i++)
				contacto_arr[i].checked=1;
		}
		if (tipo_usuario[0]=="u")
		{
			for (i=0;i<(usuario.length-1);i++)
			{
				id=usuario[i].split("-");
				for (j=0;j<contacto_arr.length;j++)
				{
					
					if (contacto_arr[j].value==id[1])
						contacto_arr[j].checked=1;
					else
						contacto_arr[j].checked=0;	
				}
			}
		}
	}

//------------------------------------------------------------------------------------------------------------------------------------	
	function validar_emergente_contactos(id_grupo)
	{
		todos=1;
		campo_oculto.value="";
		nombres="";
		for (i=0;i<contacto_arr.length;i++)
		{
			if (contacto_arr[i].checked)
			{
				campo_oculto.value=campo_oculto.value+"u-"+contacto_arr[i].value+",";
				nombres=nombres+db_contactos[i]+"; ";
			}
			else
			{
				todos=0;
			}
		}
		
		
		if (todos)
		{
			campo_oculto.value="g-"+id_grupo+",";
			nombres="seleccionado todo el grupo";
		}
		capa.innerHTML=nombres;
		window.close();
	}
//------------------------------------------------------------------------------------------------------------------------------------
	function validar_preview()
	{
		if (vacio(formulario.asunto)) {
			var errores = "Por favor introduce el asunto del mensaje";
			window.open('../form_error.php?error='+errores,'ventana','width=780,height=300');
		} else
			formulario.submit();
	}
	
//------------------------------------------------------------------------------------------------------------------------------------
	function validar_seluser()
	{
		for (i=0;i<contactos_arr.length;i++)
		{
			formulario.contactos.value=formulario.contactos.value+contactos_arr[i].value;
		}
		if (vacio(formulario.contactos))
		{
			var errores = "Debes seleccionar algun contacto para hacer el envio ";
			window.open('../form_error.php?error='+errores,'ventana','width=780,height=300');
		}
		else
		{
			formulario.submit();
		}
	}

//------------------------------------------------------------------------------------------------------------------------------------
	function validar_estadisticas_principal(formulario)
	{
		if (vacio(formulario.clave))
		{
			if ((formulario.mes.value==0)&&(formulario.anio.value==0))
			{
				var errores = "No puede realizr busquedas sin determinar";
				window.open('../form_error.php?error='+errores,'ventana','width=780,height=300');
			}
			else
			{
				formulario.submit();
			}
		}
		else
		{
			formulario.submit();
		}
	}
