
<!--
//Fecha Compatible
var isnMonths=new Array("Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
var isnDays= new Array("Domingo","Lunes","Martes","Miercoles","Jueves","Viernes","Sabado","Domingo");
today=new Date();
function getFullYear(today)
{
var rightYear = today.getYear();
if (rightYear < 1000) rightYear += 1900;
return rightYear;
}

//Refrescar pagina si cambia tamanyo en Nav4
function MM_reloadPage(init) {
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);


function IrA(sPagina){
	with (document.frmCuerpo){
		target="_self";
		action = sPagina + ".asp"	;
		submit();
	}
}

function ValidarCorreo(sCorreo){
 var x = sCorreo; 
 var filter = /^([a-zA-Z0-9_\.\-])+\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9])+$/; 
 if (filter.test(x)) 
     return false;
  else return true; 
}

function filtraCaracteres (input) {
	// Añadir a la cadena miFiltro los caracteres que se desean eliminar.
	cadenaFiltrada=input.replace(/\'/gi, "&rsquo;");
	return cadenaFiltrada;
}

function compareDate(d1, d2){
	if ((d1.constructor==Date)&&(d2.constructor==Date)){					
			var lDifference =  d2.getTime()-d1.getTime();
			var msInDay = (1000*60*60*24) //milisegundos en un dia
			var iDays = Math.round(lDifference/msInDay);
			return (iDays);		
	}else return null;
}

function isDate (year, month, day){   
		var daysInMonth = new Array(31,29,31,30,31,30,31,31,30,31,30,31);		
		function isInteger(s){
			var reInteger = /^\d+$/
			return reInteger.test(s)
		}
		function isIntegerInRange (s, a, b){		
			if (!isInteger(s)) return false;    
			var num = parseInt(s,10);
			return ((num >= a) && (num <= b));
		}
		function daysInFebruary (year){    
			return (  ((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0) ) ) ? 29 : 28 );
		}
		function isDay(s){
			return isIntegerInRange(s, 1, 31)
		}
		function isMonth(s){
			return isIntegerInRange(s,0, 11)
		}
		function isYear(s){
			if (!isInteger(s)) return false;
			//return ((s.length == 2) || (s.length == 4));
			// only four digit years  &  greater than 0!!			
			return ((s.length == 4)&&(s>1899));
		}
		// aqui empieza la validación
    if (! (isYear(year) && isMonth(month) && isDay(day)) ) return false;
    var intYear = parseInt(year,10);
    var intMonth = parseInt(month,10);
    var intDay = parseInt(day,10);
		// para todos los meses menos Febrero    
    if (intDay > daysInMonth[intMonth]) return false; 
    if ((intMonth == 1) && (intDay > daysInFebruary(intYear))) return false;
    return true;
}




function checkDate(sDate){	
	var sCharSeparator = "/";
	var bReturnIsDate
	if (sDate.indexOf("-",0)>0) sCharSeparator = "-"		
	if (sDate.indexOf(sCharSeparator, 0) < 1) return null	
	var vDate = sDate.split(sCharSeparator);	
	bReturnIsDate = isDate(vDate[2],vDate[1]-1, vDate[0])
	if (bReturnIsDate){
		var DateInitial =  new Date(1900, 0, 1);
		var DateFinal = new Date (2079,5,1);
		var DateTest = new Date (vDate[2],vDate[0]-1, vDate[1]);
		var DaysInitial = compareDate (DateInitial, DateTest);
		var DaysFinal = compareDate (DateInitial, DateFinal)
		if (( DaysInitial >= 0) && (DaysInitial<DaysFinal)) return true;
		else return false;
	}
	else return false
}



function CambiarPorBR(sCadena) {
	var sAux;
	sAux = sCadena.split('\r\n');	// For Windows-based clients
	sCadena = sAux.join('<BR>');
	sAux = sCadena.split('\n');		// For UNIX-based clients
	sCadena = sAux.join('<BR>');
	sAux = sCadena.split('\r');		// For Mac-based clients
	sCadena = sAux.join('<BR>');
	
    return sCadena;
}

function CambiarBRPorFinLinea(sCadena) {
    
	var sAux;
	sAux = sCadena.split('&rsquo;');
	sCadena = sAux.join("'");
	sAux = sCadena.split('<BR>');	// For Windows-based clients
	sCadena = sAux.join('\r\n');
    return sCadena;
}

// -->