// Chequea que al menos haya 1 checkbox en el Newsletter Subscription

function AbreVentana(link) {
	day = new Date();
	id = day.getTime();
	eval("page" + id + " = window.open('" + link + "', '" + id + "', 'toolbar=0,scrollbars=0,location=0,statusbar=0,menubar=0,resizable=0,width=440,height=200,left = 292,top = 284');");
}

function countCheckboxes() {
	var total = 0;
	divC = document.getElementsByTagName ("INPUT");
	for (i = 0 ; i < divC.length ; i++) {
		el = divC[i];
		if (el.name.indexOf("CAT") != -1) {
			if (el.checked == true) {
				total += 1;
			}
		}
	}
	if (total == 0) {
		return -1;
	} else {
		return 0;
	}
}

function checkNewsletter() {

	missinginfo = "";
	emailmal = "";
	
	if (document.form.eMail.value == "") {
		missinginfo += "\n       -  No ingreso su eMail";
	} else {
		emailStr = document.form.eMail.value;
		var checkTLD=1;
		var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
		var emailPat=/^(.+)@(.+)$/;
		var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
		var validChars="\[^\\s" + specialChars + "\]";
		var quotedUser="(\"[^\"]*\")";
		var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
		var atom=validChars + '+';
		var word="(" + atom + "|" + quotedUser + ")";
		var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
		var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
		var matchArray=emailStr.match(emailPat);
		
		if (matchArray==null) {
			emailmal = "mal";
		} else {
			var user=matchArray[1];
			var domain=matchArray[2];

			for (i=0; i<user.length; i++) {
				if (user.charCodeAt(i)>127) {
					emailmal = "mal";
				}
			}
			
			for (i=0; i<domain.length; i++) {
				if (domain.charCodeAt(i)>127) {
					emailmal = "mal";
				}
			}
			
			if (user.match(userPat)==null) {
				emailmal = "mal";
			}
			
			var IPArray=domain.match(ipDomainPat);
			if (IPArray!=null) {
				for (var i=1;i<=4;i++) {
					if (IPArray[i]>255) {
						emailmal = "mal";
					}
				}
			}
			
			var atomPat=new RegExp("^" + atom + "$");
			var domArr=domain.split(".");
			var len=domArr.length;
			for (i=0;i<len;i++) {
				if (domArr[i].search(atomPat)==-1) {
					emailmal = "mal";
				}
			}
			
			if (checkTLD && domArr[domArr.length-1].length!=2 &&
			domArr[domArr.length-1].search(knownDomsPat)==-1) {
				emailmal = "mal";
			}
			
			if (len<2) {
				emailmal = "mal";
			}
		}
	}
	
	if( emailmal == "mal" ) {
		missinginfo += "\n       -  Su eMail ingresado no es valido.";
	}
	
	if (document.form.Nombre.value == "") {
		missinginfo += "\n       -  No ingreso su Nombre";
	}
	
	if (document.form.Apellido.value == "") {
		missinginfo += "\n       -  No ingreso su Apellido";
	}
	
	if (countCheckboxes() == -1) {
		missinginfo += "\n       -  Debe seleccionar al menos 1 tema de su interes";
	}

	if (missinginfo != "") {
		missinginfo ="________________________________________________\n" +
		"  Hemos detectado el siguiente inconveniente:\n" +
		missinginfo + "\n________________________________________________" +
		"\n  Corrija el error y vuelva a realizar la accion.";
		alert(missinginfo);
		return false;
	}
	else return true;
}