//******************************************
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);
		}
	}
}