function isArray(obj){
		return(typeof(obj.length)=="undefined")?false:true;
	}

	function checkForm(poForm){
		for(i=0; i<poForm.elements.length; i++){
			if(poForm.elements[i].required == "true"){
				switch (poForm.elements[i].type) {
					case "text":
					case "password":
					case "textarea":
					case "file":
						if(poForm.elements[i].value == ""){
							alert(poForm.elements[i].friendly);
							poForm.elements[i].focus();
							return false;
						}
						break;
					case "radio":
						elradio = eval("poForm."+poForm.elements[i].name);
						checado = false;
						if(isArray(elradio)){
							for(j=0; j<elradio.length; j++){
								if(elradio[j].checked)
									checado = true;
							}
						} else{
							if(elradio.checked)
								checado = true;
						}
						if(!checado){
							if(isArray(elradio)){
								alert(elradio[0].friendly);
								elradio[0].focus();
							} else{
								alert(elradio.friendly);
								elradio.focus();
							}
							return false;
						}
						break;
					case "checkbox":
						maximum = 0;
						if(poForm.elements[i].maximum != ""){
							maximum = poForm.elements[i].maximum*1;
						}
						elcheck = eval("poForm."+poForm.elements[i].name);
						checado = 0;
						if(isArray(elcheck)){
							for(j=0; j<elcheck.length; j++){
								if(elcheck[j].checked)
									checado++;
							}
						} else{
							if(elcheck.checked)
								checado++;
						}
						if(checado==0){
							if(isArray(elcheck)){
								alert(elcheck[0].friendly);
								elcheck[0].focus();
							} else{
								alert(elcheck.friendly);
								elcheck.focus();
							}
							return false;
						} else{
							if(maximum > 0){
								if(checado > maximum){
									alert("No puede seleccionar mas de "+maximum+" opciones");
									elcheck[0].focus();
									return false;
								}
							}
						}
						break;
					case "select-one":
						if(poForm.elements[i].selectedIndex < 1){
							alert(poForm.elements[i].friendly);
							poForm.elements[i].focus();
							return false;
						}
						break;
					case "select-multiple":
						if(poForm.elements[i].selectedIndex < 1){
							alert(poForm.elements[i].friendly);
							poForm.elements[i].focus();
							return false;
						}
						break;
				}
			}
		}
		return true;
	}

	function emailCheck(emailStr) {
		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) {
//			alert("Email address seems incorrect (check @ and .'s)")
			return false
		}
		var user=matchArray[1]
		var domain=matchArray[2]
		if (user.match(userPat)==null) {
//		    alert("The username doesn't seem to be valid.")
		    return false
		}
		var IPArray=domain.match(ipDomainPat)
		if (IPArray!=null) {
			for (var i=1;i<=4;i++) {
				if (IPArray[i]>255) {
//					alert("Destination IP address is invalid!")
					return false
				}
			}
			return true
		}
		var domainArray=domain.match(domainPat)
		if (domainArray==null) {
//			alert("The domain name doesn't seem to be valid.")
			return false
		}
		var atomPat=new RegExp(atom,"g")
		var domArr=domain.match(atomPat)
		var len=domArr.length
		if (domArr[domArr.length-1].length<2 || domArr[domArr.length-1].length>3) {
//			alert("The address must end in a three-letter domain, or two letter country.")
			return false
		}
		if (len<2) {
//			var errStr="This address is missing a hostname!"
			alert(errStr)
			return false
		}
		return true;
	}

function sendfriend(){
	var tmp = window.open("index.cfm?fuseaction=root.friend", "friend", "width=450,height=500");
}

function executive(){
	var tmp = window.open("index.cfm?fuseaction=root.executive", "executive", "width=450,height=500");
}