function mensajeayuda(ayuda,isPopUp){
	if(isPopUp)
		window.opener.parent.ayuda.ayudaiframe.document.getElementById('celdaayuda').innerHTML= ayuda;
	else
		parent.ayuda.ayudaiframe.document.getElementById('celdaayuda').innerHTML= ayuda;
}

function conmutar()
{
alert(cliente.nombre.disable)
	if (cliente.nombre.disable)
	{
		cliente.nombre.disable=false;	
	}
	else
	{
		cliente.nombre.disable=true;
	}
}
function alternarbusqueda(){
	//Obtener la posición x del menu a ocultar
	
	var titulobuscador = document.getElementById('titulobuscador').value;
	switch (titulobuscador){
	case 'Buscador Básico':
	ocultar='basico';
	mostrar='avanzado';
	document.getElementById('titulobuscador').value='Buscador Avanzado';
	document.getElementById('tipobuscador').value='Ir a Buscador Básico >>';
	document.getElementById('contenedor').style.height='145px';
	
	break;
	case 'Buscador Avanzado':
	document.getElementById('titulobuscador').value='Buscador Básico';
	document.getElementById('tipobuscador').value='Ir a Buscador Avanzado >>';
	document.getElementById('contenedor').style.height='37px';
	ocultar='avanzado';
	mostrar='basico';
	break;
	}
	
	var posicion_x = 0;
	obj=document.getElementById(ocultar)
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			posicion_x += obj.offsetLeft
			obj = obj.offsetParent;
		}
	}
	else if (obj.x)
		posicion_x += obj.x;


	
	//Obtener la posición y del menu a ocultar
	
	obj=document.getElementById(ocultar)
	var posicion_y = 0;
	if (obj.offsetParent)
	{
		while (obj.offsetParent)
		{
			posicion_y += obj.offsetTop
			obj = obj.offsetParent;
		}
	}
	else if (obj.y)
		posicion_y += obj.y;

	if (document.getElementById('offset').value==5)
	{
	posicion_x=posicion_x+5;
	posicion_y=posicion_y+5;
	document.getElementById('offset').value=0;
	}
	//ocultamos todos los menús
	parent.principal.document.getElementById(ocultar).style.visibility= 'hidden';
	//mostramos el actual centrado 
	parent.principal.document.getElementById(mostrar).style.visibility= 'visible';
	parent.principal.document.getElementById(mostrar).style.position= 'absolute';
	parent.principal.document.getElementById(mostrar).style.display= 'block';
	parent.principal.document.getElementById(mostrar).style.top= posicion_y;
	parent.principal.document.getElementById(mostrar).style.left= posicion_x;	

}
function cambiar(imagen) { 
parent.superior.document.images['cabecera'].src=imagen
}



/*
 * A JavaScript implementation of the RSA Data Security, Inc. MD5 Message
 * Digest Algorithm, as defined in RFC 1321.
 * Version 2.1 Copyright (C) Paul Johnston 1999 - 2002.
 * Other contributors: Greg Holt, Andrew Kepert, Ydnar, Lostinet
 * Distributed under the BSD License
 * See http://pajhome.org.uk/crypt/md5 for more info.
 */

/*
 * Configurable variables. You may need to tweak these to be compatible with
 * the server-side, but the defaults work in most cases.
 */
var hexcase = 0;  /* hex output format. 0 - lowercase; 1 - uppercase        */
var b64pad  = ""; /* base-64 pad character. "=" for strict RFC compliance   */
var chrsz   = 8;  /* bits per input character. 8 - ASCII; 16 - Unicode      */

/*
 * These are the functions you'll usually want to call
 * They take string arguments and return either hex or base-64 encoded strings
 */
function hex_md5(s){ return binl2hex(core_md5(str2binl(s), s.length * chrsz));}
function b64_md5(s){ return binl2b64(core_md5(str2binl(s), s.length * chrsz));}
function str_md5(s){ return binl2str(core_md5(str2binl(s), s.length * chrsz));}
function hex_hmac_md5(key, data) { return binl2hex(core_hmac_md5(key, data)); }
function b64_hmac_md5(key, data) { return binl2b64(core_hmac_md5(key, data)); }
function str_hmac_md5(key, data) { return binl2str(core_hmac_md5(key, data)); }

/*
 * Perform a simple self-test to see if the VM is working
 */
function md5_vm_test()
{
  return hex_md5("abc") == "900150983cd24fb0d6963f7d28e17f72";
}

/*
 * Calculate the MD5 of an array of little-endian words, and a bit length
 */
function core_md5(x, len)
{
  /* append padding */
  x[len >> 5] |= 0x80 << ((len) % 32);
  x[(((len + 64) >>> 9) << 4) + 14] = len;

  var a =  1732584193;
  var b = -271733879;
  var c = -1732584194;
  var d =  271733878;

  for(var i = 0; i < x.length; i += 16)
  {
    var olda = a;
    var oldb = b;
    var oldc = c;
    var oldd = d;

    a = md5_ff(a, b, c, d, x[i+ 0], 7 , -680876936);
    d = md5_ff(d, a, b, c, x[i+ 1], 12, -389564586);
    c = md5_ff(c, d, a, b, x[i+ 2], 17,  606105819);
    b = md5_ff(b, c, d, a, x[i+ 3], 22, -1044525330);
    a = md5_ff(a, b, c, d, x[i+ 4], 7 , -176418897);
    d = md5_ff(d, a, b, c, x[i+ 5], 12,  1200080426);
    c = md5_ff(c, d, a, b, x[i+ 6], 17, -1473231341);
    b = md5_ff(b, c, d, a, x[i+ 7], 22, -45705983);
    a = md5_ff(a, b, c, d, x[i+ 8], 7 ,  1770035416);
    d = md5_ff(d, a, b, c, x[i+ 9], 12, -1958414417);
    c = md5_ff(c, d, a, b, x[i+10], 17, -42063);
    b = md5_ff(b, c, d, a, x[i+11], 22, -1990404162);
    a = md5_ff(a, b, c, d, x[i+12], 7 ,  1804603682);
    d = md5_ff(d, a, b, c, x[i+13], 12, -40341101);
    c = md5_ff(c, d, a, b, x[i+14], 17, -1502002290);
    b = md5_ff(b, c, d, a, x[i+15], 22,  1236535329);

    a = md5_gg(a, b, c, d, x[i+ 1], 5 , -165796510);
    d = md5_gg(d, a, b, c, x[i+ 6], 9 , -1069501632);
    c = md5_gg(c, d, a, b, x[i+11], 14,  643717713);
    b = md5_gg(b, c, d, a, x[i+ 0], 20, -373897302);
    a = md5_gg(a, b, c, d, x[i+ 5], 5 , -701558691);
    d = md5_gg(d, a, b, c, x[i+10], 9 ,  38016083);
    c = md5_gg(c, d, a, b, x[i+15], 14, -660478335);
    b = md5_gg(b, c, d, a, x[i+ 4], 20, -405537848);
    a = md5_gg(a, b, c, d, x[i+ 9], 5 ,  568446438);
    d = md5_gg(d, a, b, c, x[i+14], 9 , -1019803690);
    c = md5_gg(c, d, a, b, x[i+ 3], 14, -187363961);
    b = md5_gg(b, c, d, a, x[i+ 8], 20,  1163531501);
    a = md5_gg(a, b, c, d, x[i+13], 5 , -1444681467);
    d = md5_gg(d, a, b, c, x[i+ 2], 9 , -51403784);
    c = md5_gg(c, d, a, b, x[i+ 7], 14,  1735328473);
    b = md5_gg(b, c, d, a, x[i+12], 20, -1926607734);

    a = md5_hh(a, b, c, d, x[i+ 5], 4 , -378558);
    d = md5_hh(d, a, b, c, x[i+ 8], 11, -2022574463);
    c = md5_hh(c, d, a, b, x[i+11], 16,  1839030562);
    b = md5_hh(b, c, d, a, x[i+14], 23, -35309556);
    a = md5_hh(a, b, c, d, x[i+ 1], 4 , -1530992060);
    d = md5_hh(d, a, b, c, x[i+ 4], 11,  1272893353);
    c = md5_hh(c, d, a, b, x[i+ 7], 16, -155497632);
    b = md5_hh(b, c, d, a, x[i+10], 23, -1094730640);
    a = md5_hh(a, b, c, d, x[i+13], 4 ,  681279174);
    d = md5_hh(d, a, b, c, x[i+ 0], 11, -358537222);
    c = md5_hh(c, d, a, b, x[i+ 3], 16, -722521979);
    b = md5_hh(b, c, d, a, x[i+ 6], 23,  76029189);
    a = md5_hh(a, b, c, d, x[i+ 9], 4 , -640364487);
    d = md5_hh(d, a, b, c, x[i+12], 11, -421815835);
    c = md5_hh(c, d, a, b, x[i+15], 16,  530742520);
    b = md5_hh(b, c, d, a, x[i+ 2], 23, -995338651);

    a = md5_ii(a, b, c, d, x[i+ 0], 6 , -198630844);
    d = md5_ii(d, a, b, c, x[i+ 7], 10,  1126891415);
    c = md5_ii(c, d, a, b, x[i+14], 15, -1416354905);
    b = md5_ii(b, c, d, a, x[i+ 5], 21, -57434055);
    a = md5_ii(a, b, c, d, x[i+12], 6 ,  1700485571);
    d = md5_ii(d, a, b, c, x[i+ 3], 10, -1894986606);
    c = md5_ii(c, d, a, b, x[i+10], 15, -1051523);
    b = md5_ii(b, c, d, a, x[i+ 1], 21, -2054922799);
    a = md5_ii(a, b, c, d, x[i+ 8], 6 ,  1873313359);
    d = md5_ii(d, a, b, c, x[i+15], 10, -30611744);
    c = md5_ii(c, d, a, b, x[i+ 6], 15, -1560198380);
    b = md5_ii(b, c, d, a, x[i+13], 21,  1309151649);
    a = md5_ii(a, b, c, d, x[i+ 4], 6 , -145523070);
    d = md5_ii(d, a, b, c, x[i+11], 10, -1120210379);
    c = md5_ii(c, d, a, b, x[i+ 2], 15,  718787259);
    b = md5_ii(b, c, d, a, x[i+ 9], 21, -343485551);

    a = safe_add(a, olda);
    b = safe_add(b, oldb);
    c = safe_add(c, oldc);
    d = safe_add(d, oldd);
  }
  return Array(a, b, c, d);

}

/*
 * These functions implement the four basic operations the algorithm uses.
 */
function md5_cmn(q, a, b, x, s, t)
{
  return safe_add(bit_rol(safe_add(safe_add(a, q), safe_add(x, t)), s),b);
}
function md5_ff(a, b, c, d, x, s, t)
{
  return md5_cmn((b & c) | ((~b) & d), a, b, x, s, t);
}
function md5_gg(a, b, c, d, x, s, t)
{
  return md5_cmn((b & d) | (c & (~d)), a, b, x, s, t);
}
function md5_hh(a, b, c, d, x, s, t)
{
  return md5_cmn(b ^ c ^ d, a, b, x, s, t);
}
function md5_ii(a, b, c, d, x, s, t)
{
  return md5_cmn(c ^ (b | (~d)), a, b, x, s, t);
}

/*
 * Calculate the HMAC-MD5, of a key and some data
 */
function core_hmac_md5(key, data)
{
  var bkey = str2binl(key);
  if(bkey.length > 16) bkey = core_md5(bkey, key.length * chrsz);

  var ipad = Array(16), opad = Array(16);
  for(var i = 0; i < 16; i++)
  {
    ipad[i] = bkey[i] ^ 0x36363636;
    opad[i] = bkey[i] ^ 0x5C5C5C5C;
  }

  var hash = core_md5(ipad.concat(str2binl(data)), 512 + data.length * chrsz);
  return core_md5(opad.concat(hash), 512 + 128);
}

/*
 * Add integers, wrapping at 2^32. This uses 16-bit operations internally
 * to work around bugs in some JS interpreters.
 */
function safe_add(x, y)
{
  var lsw = (x & 0xFFFF) + (y & 0xFFFF);
  var msw = (x >> 16) + (y >> 16) + (lsw >> 16);
  return (msw << 16) | (lsw & 0xFFFF);
}

/*
 * Bitwise rotate a 32-bit number to the left.
 */
function bit_rol(num, cnt)
{
  return (num << cnt) | (num >>> (32 - cnt));
}

/*
 * Convert a string to an array of little-endian words
 * If chrsz is ASCII, characters >255 have their hi-byte silently ignored.
 */
function str2binl(str)
{
  var bin = Array();
  var mask = (1 << chrsz) - 1;
  for(var i = 0; i < str.length * chrsz; i += chrsz)
    bin[i>>5] |= (str.charCodeAt(i / chrsz) & mask) << (i%32);
  return bin;
}

/*
 * Convert an array of little-endian words to a string
 */
function binl2str(bin)
{
  var str = "";
  var mask = (1 << chrsz) - 1;
  for(var i = 0; i < bin.length * 32; i += chrsz)
    str += String.fromCharCode((bin[i>>5] >>> (i % 32)) & mask);
  return str;
}

/*
 * Convert an array of little-endian words to a hex string.
 */
function binl2hex(binarray)
{
  var hex_tab = hexcase ? "0123456789ABCDEF" : "0123456789abcdef";
  var str = "";
  for(var i = 0; i < binarray.length * 4; i++)
  {
    str += hex_tab.charAt((binarray[i>>2] >> ((i%4)*8+4)) & 0xF) +
           hex_tab.charAt((binarray[i>>2] >> ((i%4)*8  )) & 0xF);
  }
  return str;
}

/*
 * Convert an array of little-endian words to a base-64 string
 */
function binl2b64(binarray)
{
  var tab = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  var str = "";
  for(var i = 0; i < binarray.length * 4; i += 3)
  {
    var triplet = (((binarray[i   >> 2] >> 8 * ( i   %4)) & 0xFF) << 16)
                | (((binarray[i+1 >> 2] >> 8 * ((i+1)%4)) & 0xFF) << 8 )
                |  ((binarray[i+2 >> 2] >> 8 * ((i+2)%4)) & 0xFF);
    for(var j = 0; j < 4; j++)
    {
      if(i * 8 + j * 6 > binarray.length * 32) str += b64pad;
      else str += tab.charAt((triplet >> 6*(3-j)) & 0x3F);
    }
  }
  return str;
}

function borrar(id,texto,item,pagina)
{
	if(confirm("¿Esta seguro de que desea borrar "+texto+"\""+item+"\"?")){
		direccion=pagina+"?idobjeto="+id;
		window.location.replace(direccion);
}
}

function eliminar(id,texto,item,pagina)
{
	if(confirm("¿Esta seguro de que desea borrar "+texto+"\""+item+"\"?")){
		direccion=pagina+"?id="+id;
		window.location.replace(direccion);
}
}

function confirmar(url)
{
	if(confirm("¿Esta seguro de que desea autorizar todo?")){
		window.location.replace(url);
}
}
function enviar(url)
{		
window.location.replace(url);
}

function ocultarfila(id_fila) {
	document.all[id_fila].style.display = "none";
}

function mostrarfila(id_fila) {
	document.all[id_fila].style.display = "block";
}

function selectordirecciones() {
	id_fila="cliente"+document.buscar.idcliente.value;
	id_filaocultar=document.buscar.filacontrol.value;
	if(id_filaocultar)
	document.all[id_filaocultar].style.display = "none";
	if(document.all[id_fila]){
		document.all[id_fila].style.display = "block";
		document.buscar.filacontrol.value=id_fila;
	}
	else
		document.buscar.filacontrol.value="";
}

function FP_openNewWindow(w,h,nav,loc,sts,menu,scroll,resize,name,url) {//v1.0
 var windowProperties=''; if(nav==false) windowProperties+='toolbar=no,'; else
  windowProperties+='toolbar=yes,'; if(loc==false) windowProperties+='location=no,'; 
 else windowProperties+='location=yes,'; if(sts==false) windowProperties+='status=no,';
 else windowProperties+='status=yes,'; if(menu==false) windowProperties+='menubar=no,';
 else windowProperties+='menubar=yes,'; if(scroll==false) windowProperties+='scrollbars=no,';
 else windowProperties+='scrollbars=yes,'; if(resize==false) windowProperties+='resizable=no,';
 else windowProperties+='resizable=yes,'; if(w!="") windowProperties+='width='+w+',';
 if(h!="") windowProperties+='height='+h; if(windowProperties!="") { 
  if( windowProperties.charAt(windowProperties.length-1)==',') 
   windowProperties=windowProperties.substring(0,windowProperties.length-1); } 
 window.open(url,name,windowProperties);
}

function validarFecha(cadena){
	var Fecha= new String(cadena)	// Crea un string
	var RealFecha= new Date()	// Para sacar la fecha de hoy
	// Cadena Año
	var Ano= new String(Fecha.substring(Fecha.lastIndexOf("/")+1,Fecha.length))
	// Cadena Mes
	var Mes= new String(Fecha.substring(Fecha.indexOf("/")+1,Fecha.lastIndexOf("/")))
	// Cadena Día
	var Dia= new String(Fecha.substring(0,Fecha.indexOf("/")))

	// Valido el año
	if (isNaN(Ano) || Ano.length<2 ){
        //alert('Año inválido')
		return false
	}
	// Valido el Mes
	if (isNaN(Mes) || parseFloat(Mes)<1 || parseFloat(Mes)>12){
		//alert('Mes inválido')
		return false
	}
	// Valido el Dia
	if (isNaN(Dia) || parseFloat(Dia)<1 || parseFloat(Dia)>31){
		//alert('Día inválido')
		return false
	}
	if (Mes==4 || Mes==6 || Mes==9 || Mes==11 || Mes==2) {
		if (Dia>30) {
			//alert('Día inválido')
			return false
		}
		if (Mes==2 && (Ano%4==0 && Ano%100!=0 || Ano%400==0) && Dia > 29)//es bisiesto
		 	return false;
		if (Mes==2 && !(Ano%4==0 && Ano%100!=0 || Ano%400==0) && Dia > 28)// NO es bisiesto
			return false;
		}
	return true;
}

function redondear(cantidad, decimales) {
	var cantidad = parseFloat(cantidad);
	var decimales = parseFloat(decimales);
	decimales = (!decimales ? 2 : decimales);
	return Math.round(cantidad * Math.pow(10, decimales)) / Math.pow(10, decimales);
}


/*Funcion para controlar 2 checkbox que no este pulsado a la vez*/ 
function controlOnclick(control,controlado,dependiente){ 
  if(!document.getElementById(control).checked){
	document.getElementById(controlado).disabled=true;
	document.getElementById(dependiente).disabled=false;
	
	}	
	else{
	document.getElementById(controlado).disabled=false;
	}
	document.getElementById(controlado).checked=false;

}

/*Funcion para controlar 2 checkbox que alternativos*/ 
function controlOnclicks(control,controlado){ 
  if(document.getElementById(control).checked){
	document.getElementById(controlado).disabled=true;
	}	
	else{
	document.getElementById(controlado).disabled=false;
	}
	document.getElementById(controlado).checked=false;

}  
function pressenter(formped){
	var key_intro=13;
	if (key_intro==event.keyCode)
		validaModificarlinea(formped)
	return false;
}
function validatelefonofijo(telefono){	
	var correcto = true;
	var tlf = document.getElementById(telefono).value;
	if (tlf == ""){
		correcto=false;
		alert("Debe rellenar el campo 'Teléfono'.");
	}
	else{
		var primerdigito = new String(tlf.substring(0,1));
		if( (primerdigito!= '8' && primerdigito!='9') || tlf.length<9){
			correcto=false;
			alert("Debe rellenar el campo 'Teléfono' corréctamente.");
		}
	}
	return correcto;
}

function validamovil(telefono){	
	var correcto = true;
	var tlf = document.getElementById(telefono).value;
	if (tlf == ""){
		correcto=false;
		alert("Debe rellenar el campo 'Móvil'.");
	}
	else{
		var primerdigito = new String(tlf.substring(0,1));
		if( primerdigito!= '6' || tlf.length<9){
			correcto=false;
			alert("Debe rellenar el campo 'Móvil' corréctamente.");
		}
	}
	return correcto;
}


/*
OPERADORES NECESARIOS PARA IDENTIFICAR
# fechas
@ numero
 cadenas obligadas a rellenar
· teléfono fijo
| teléfono móvil
% e-mail
& dni
$ código postal
*  cadena
*/

function validarformulario(par){
//DIVIDO LOS PARAMETROS POR COMAS
var campos=par.split(",");
//EXTRAIGO LA LONGITUD
var longitud=campos.length;
var correcto=true;
//CADENA QUE MUESTRA TODOS LOS ERRORES
var validacion="";

	for(var i = 0; i < longitud; i += 2)
	{
	 tipovalidacion="";
	 //tipovalidacion=new String(campos[i].substring(0,1));
	 tipovalidacion+=campos[i].substring(0,1);
	 idcampo=campos[i].replace(tipovalidacion,"");
	 texto=campos[i+1];
	 
		/*if (tipovalidacion=="#"){
	 	validacion+=validafecha(idcampo,texto);
	    }
	    
		if (tipovalidacion=="@"){
	 	validacion+=validanumero(idcampo,texto);
	    }		
	 
		if (tipovalidacion=="*"){
	 	validacion+=validacadena(idcampo,texto);
	    }		
	
		if (tipovalidacion=="·"){
	 	validacion+=validartelefono(idcampo,texto);
	    }		
	
		if (tipovalidacion=="|"){
	 	validacion+=validarmovil(idcampo,texto);
	    }		
	
		if (tipovalidacion=="%"){
	 	validacion+=validaemail(idcampo,texto);
	    }		
	
	
		if (tipovalidacion=="&"){
	 	validacion+=validadni(idcampo,texto);
	    }		

		if (tipovalidacion=="$"){
	 	validacion+=validapostal(idcampo,texto);
	    }*/
	    
		switch (tipovalidacion)
			 {
		   case "#":
		      validacion+=validafecha(idcampo,texto);
		      break;
		   case "@":
		      validacion+=validanumero(idcampo,texto);
		      break;
		   case "·":
		      validacion+=validartelefono(idcampo,texto);
		      break;
		   case "|":
		      validacion+=validarmovil(idcampo,texto);
		  	  break;
		   case "%":
		      validacion+=validaemail(idcampo,texto);
		      break;
			case "&":
		      validacion+=validadni(idcampo,texto);
		      break;
		   case "$":
		      validacion+=validapostal(idcampo,texto);
		      break;
		   case "*":
		      validacion+=validacadena(idcampo,texto);
		      break;
		   default:
		      alert("Operador introducido incorrecto.");
		      break;}			
	}
	
	if (validacion!=""){
		alert("Los errores cometidos son: "+validacion);
		correcto=false;
}
return correcto;
}


function validanumero(idcampo,texto){
	var cad="";
	if (document.getElementById(idcampo).value!=""){
		var numero=document.getElementById(idcampo).value;
		numero=numero.replace(",",".");
		if 	(isNaN(Number(numero)))
			cad="\nEl campo '"+texto+"' no es un numero.";
	}
	return cad;
}

function validacadena(idcampo,texto)
{
	var cad="";
	if (document.getElementById(idcampo).value=="")
		cad="\nEl campo '"+texto+"' esta vacio.";					
	return cad; 					
}


function validapostal(idcampo,texto){
	var cad="";
	if (document.getElementById(idcampo).value!=""){
		var tipopostal = /^\d{5}$/
		if 	(!tipopostal.test(document.getElementById(idcampo).value))
			cad="\nEl campo '"+texto+"' no es un código correcto.";
	}
	return cad; 					
}

function validaemail(idcampo,texto){
	var cad="";
	if (document.getElementById(idcampo).value!=""){
		var tipo = /^(.+\@.+\..+)$/
		if 	(!tipo.test(document.getElementById(idcampo).value))
			cad="\nEl campo '"+texto+"' no es correcto.";
	}
	return cad; 						
}

function validadni(idcampo,texto){
	var cad="";
	var dnil=document.getElementById(idcampo).value;
	if (dnil!=""){
		var letra=new String(dnil.substring(dnil.length-1,dnil.length));
		var dni=dnil.replace(letra,"");
		var tabla = ["T","R","W","A","G","M","Y","F","P","D",
			     "X","B","N","J","Z","S","Q","V","H","L",
				 "C","K","E"];
		var modulo = dni%23;
		if (letra.toUpperCase() != tabla[modulo])
			cad="\nEl campo '"+texto+"' no es correcto. Introduzca la letra correctamente.";
	}
	return cad;		 
}


function validafecha(idcampo,texto){
	var cad="";
	var correcto = true;
	var Fecha = new String(document.getElementById(idcampo).value);	// Crea un string
	
	if (document.getElementById(idcampo).value!=""){
		var RealFecha = new Date();	// Para sacar la fecha de hoy
		// Cadena Año
		var Ano= new String(Fecha.substring(Fecha.lastIndexOf("/")+1,Fecha.length));
		// Cadena Mes
		var Mes= new String(Fecha.substring(Fecha.indexOf("/")+1,Fecha.lastIndexOf("/")));
		// Cadena Día
		var Dia= new String(Fecha.substring(0,Fecha.indexOf("/")));
	
		// Valido el año
		if (isNaN(Ano) || Ano.length<2 ){
	        //alert('Año inválido')
			correcto=false;
		}
		// Valido el Mes
		if (isNaN(Mes) || parseFloat(Mes)<1 || parseFloat(Mes)>12){
			//alert('Mes inválido')
			correcto=false;
		}
		// Valido el Dia
		if (isNaN(Dia) || parseFloat(Dia)<1 || parseFloat(Dia)>31){
			//alert('Día inválido')
			correcto=false;
		}
		if (Mes==4 || Mes==6 || Mes==9 || Mes==11 || Mes==2) {
			if (Dia>30) {
				//alert('Día inválido')
				correcto=false;
			}
			if (Mes==2 && (Ano%4==0 && Ano%100!=0 || Ano%400==0) && Dia > 29)//es bisiesto
				correcto=false;
			if (Mes==2 && !(Ano%4==0 && Ano%100!=0 || Ano%400==0) && Dia > 28)// NO es bisiesto
				correcto=false;
			}
			
		if (correcto==false)
			cad="\nEl campo '"+texto+"' no es correcto. El formato a segir es dd/mm/aaaa.";
	}
	return cad;
}

function validarmovil(idcampo,texto){
	var cad="";	
	var tlf = document.getElementById(idcampo).value;
	if (tlf == ""){
		//var cad="\nEl campo "+texto+" esta vacio.";
	}
	else{
		var primerdigito = new String(tlf.substring(0,1));
		if( primerdigito!= '6' || tlf.length<9){
		var cad="\nEl campo '"+texto+"' debe empezar por 6.";
		}
	}
	return cad;
}

function validartelefono(idcampo,texto){
	var cad="";	
	var tlf = document.getElementById(idcampo).value;
	if (tlf == ""){
		//var cad="\nEl campo "+texto+" esta vacio.";
	}
	else{
		var primerdigito = new String(tlf.substring(0,1));
		if( primerdigito!= '9' || tlf.length<9){
		var cad="\nEl campo '"+texto+"' debe empezar por 9.";
		}
	}
	return cad;
}
function popup(pagina){
var direccion = pagina;
window.open(direccion,"ventana","fullscreen=0,toolbar=0,menubar=0,Scrollbars=Yes,Width=800,Height=600");
}
function cerrar(){
window.close();
}