function sVentanaEmergenteSinBarra(direccion,nombre,ancho,alto)
{	strAux="win2=window.open(direccion,nombre,'scrollbars=no,status=no,left="+(window.screen.width-ancho)/2+",top="+(window.screen.height-alto)/2+", directories=no, toolbar=no,width="+ancho+",height="+alto+"');";
	eval(strAux);
}
//*******************************************
function isFecha(objeto){	
	switch (objeto.value.length){	
		case 1:
			if (isNaN(objeto.value)){ objeto.value=""; }
			break;
		case 2:
			if (isNaN(objeto.value)){	
				if (isNaN(objeto.value.substring(0,1))){ objeto.value="";}
				else{	
					if (objeto.value.substring(1,2)=="/"){ objeto.value="0"+objeto.value; }
					else{ objeto.value=objeto.value.substring(0,1);}
				}
			}else{	
				if (parseFloat(objeto.value)>31){ objeto.value="31/"; }
				if (parseFloat(objeto.value)<1){ objeto.value="01/"; }
			}
			break;
		case 3:
			if (!isNaN(objeto.value.substring(2,3))){objeto.value=objeto.value.substring(0,2)+"/";}
			break;
		case 4:
			if (isNaN(objeto.value.substring(3,4))){objeto.value=objeto.value.substring(0,3);}
			break;
		case 5:
			if (isNaN(objeto.value.substring(3,5))){	
				if (isNaN(objeto.value.substring(3,4))){objeto.value=objeto.value.substring(0,4);}
				else{	
					if (objeto.value.substring(4,5)=="/"){	
						objeto.value=objeto.value.substring(0,3)+"0"+objeto.value.substring(3,5);
					}else{	
						objeto.value=objeto.value.substring(0,4);
					}
				}
			}else{	
				mes=parseFloat(objeto.value.substring(3,5))
				if (mes>12){ objeto.value=objeto.value.substring(0,3)+"12/"; }
				if (mes<1){	objeto.value=objeto.value.substring(0,3)+"01/"; }
			}
			mes=parseFloat(objeto.value.substring(3,5))
			dia=parseFloat(objeto.value.substring(0,2))
			if (mes==2 && dia>29){ objeto.value="29"+objeto.value.substring(2); }
			if ((mes==4 || mes==6 || mes==9 || mes==11) && dia>30){
				objeto.value=objeto.value="30"+objeto.value.substring(2);
			}
			if (dia<1){ objeto.value=objeto.value="01"+objeto.value.substring(2); }
			if (mes<1){ objeto.value=objeto.value=objeto.value.substring(0,3)+"01"; }
			break;
		case 6:
			if (!isNaN(objeto.value.substring(5,6))){objeto.value=objeto.value.substring(0,5)+"/"; }
			break;
		case 7:
		case 8:
		case 9:
			if (isNaN(objeto.value.substring(objeto.value.length-1,objeto.value.length)))
			{	objeto.value=objeto.value.substring(0,objeto.value.length-1);
			}
			break;
		case 10:
			if (isNaN(objeto.value.substring(9,10))){	
				objeto.value=objeto.value.substring(0,9);
			}else{	
				mes=parseFloat(objeto.value.substring(3,5))
				dia=parseFloat(objeto.value.substring(0,2))
				anho=parseFloat(objeto.value.substring(6,10))
				if (mes==2 && dia>28)
				{	if (!(anho % 4==0 && anho % 400!=0))
					{	objeto.value="28"+objeto.value.substring(2);
					}
				}
				if ((mes==4 || mes==6 || mes==9 || mes==11) && dia>30)
				{	objeto.value=objeto.value="30"+objeto.value.substring(2);
				}
				if (dia<1){	objeto.value=objeto.value="01"+objeto.value.substring(2); }
				if (mes<1){	objeto.value=objeto.value=objeto.value.substring(0,3)+"01"+objeto.value.substring(5); }
			}
			break;
	}
}
//***************************************
function fEnviaDatos2(istrNombre,istrFecha)
{	strAux="window.opener.document."+istrNombre+".value='"+istrFecha+"'";
	eval(strAux);
	window.close();
}
//****************************************
function fSoloFecha() 
{	if (((window.event.keyCode<47)||(window.event.keyCode>57))&& (window.event.keyCode!=8)) {  
		window.event.keyCode=""; 
		return false;
	}
}
//****************************************
function fConvertirFecha(objeto)
{	if (objeto.value.length<10)
	{	if (!isNaN(objeto.value.substring(0,1)) && objeto.value.substring(1,2)=="/")
		{	objeto.value="0"+objeto.value;
		}
		if (!isNaN(objeto.value.substring(3,4)) && objeto.value.substring(4,5)=="/")
		{	objeto.value=objeto.value.substring(0,3)+"0"+objeto.value.substring(3);
		}
	}
}