//	Creada por	: Manuel Moya
//	Fecha		: 19-05-2000
//	Objetivo	: Verifiaca si la fecha es correcta develve 
//	Resultados	: 0 Correcto, 1 dia malo, 2 mes malo, 3 ano malo
//	Parametros	: dia , mes , ano

function ValidaFecha(intDia, intMes, intAno)
{
	if ( intDia == null )	{ return "1"; }
	if ( !EsNumero(intDia) ){ return "1"; }
	if ( intDia <= 0 )		{ return "1"; }
	if ( intDia > 31 )		{ return "1"; }
	if ( intMes == null )	{ return "2"; }
	if ( intMes <= 0 )		{ return "2"; }
	if ( intAno == null )	{ return "3"; }
	if ( intAno <= 0 )		{ return "3"; }
	if ( !EsNumero(intAno) ){ return "3"; }
	if ( intAno < 1900 )	{ return "4"; }
	
	if ( intDia > 0 && intMes > 0 && intAno > 0 )
	{
		if ( intMes == 2 && intDia == 29 && (intAno % 400) == 0 && (intAno % 100 == 0) )
		{ return "0"; }
		Dias = new Array(13)
		Dias[1] = 31; Dias[2] = 28; Dias[3] = 31; Dias[4] = 30; Dias[5] = 31; Dias[6] = 30; Dias[7] = 31;
		Dias[8] = 31; Dias[9] = 30; Dias[10] = 31;	Dias[11] = 30;	Dias[12] = 31;
		if ( intDia > Dias[intMes] )
		{ return "1"; }
		return "0";
	}
}
function RetMsgFech(objDia, objMes, objAno){
	var iDia = getValorSelect(objDia);
	var iMes = getValorSelect(objMes);
	var iAno = objAno.value;
	
	switch ( ValidaFecha(iDia,iMes,iAno) ) {
		case "1":
			alert("Ha ingresado erróneamente el día");
			selCombox(objDia,1); return(false); break;
		case "2":
			alert("Ha ingresado erróneamente el mes");
			selCombox(objMes,iMes);	return(false); break;
		case "3":
			alert("Ha ingresado erróneamente el año");
			objAno.focus();	return(false); break;
		case "4":
			alert("El año debe ser mayor a 1900");
			objAno.focus();	return(false); break;
	} 
	return(true);
}
function RetMsgFechSinCmb(objDia, objMes, objAno){
	var iDia = objDia.value;
	var iMes = getValorSelect(objMes);
	var iAno = objAno.value;
	
	switch ( ValidaFecha(iDia,iMes,iAno) ) {
		case "1":
			alert("Ha ingresado erróneamente el día");
			objDia.focus(); return(false); break;
		case "2":
			alert("Ha ingresado erróneamente el mes");
			selCombox(objMes,iMes);	return(false); break;
		case "3":
			alert("Ha ingresado erróneamente el año");
			objAno.focus();	return(false); break;
		case "4":
			alert("El año debe ser mayor a 1900");
			objAno.focus();	return(false); break;
	} 
	return(true);
}
