// JavaScript Document

var base_url;
var script_url;
base_url = '';
script_url = '';

//used for DHTML navigation
function s_show(){return false}
function s_hide(){return false}
if(window.event+''=='undefined')event=0
//used for DHTML navigation

function LoadPage(subnavid) {
	if (document.getElementById(subnavid) != null) {
	document.getElementById(subnavid).className = "SideNavDataOn";
	}
}



function ELink() {
	 var a=ELink.arguments;
	 var name = "";
	 var domain = "cgr.org";
	 var text = "";
	 if (a[0] != null) {
		 name = a[0];
	 }
	 if (a[2] != null && a[2] != "") {
		 domain = a[2];
	 }
	 if (a[1] != null && a[1] != "") {
		 text = a[1];
	 } else {
		 text = name + "@" + domain;
	 }
	 document.write("<a href=\"mailto:" + name + "@" + domain + "\">" + text + "</a>");
}

function changeLocation(menuObj)
{
   var i = menuObj.selectedIndex;

   if(i > 0)
   {
      window.location = menuObj.options[i].value;
   }
}



//used in left nav to indicate the current page
function showon(indicatorname) {
	var indicatorname = indicatorname
	if (indicatorname != null) {
	indicatorname.src = "images/n_bullet.gif"
	};
}
//used in left nav to indicate the current page

function open_bio( url )
{
	biowin = window.open( url, 'biowin', 'toolbar=no,location=no,directories=no,status=no,menubar=yes,scrollbars=yes,resizable=1,copyhistory=no,width=730,height=700' );
	biowin.focus();
}



function open_popwin( url )
{
	popwin = window.open( url, 'popwin', 'toolbar=no,location=no,directories=no,status=no,menubar=yes,scrollbars=yes,resizable=1,copyhistory=no,width=730,height=700' );
	popwin.focus();
}



function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
  }
  

function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  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 MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}


//**** START: Date Functions *****/
function measure(n) {

	this.length=n;

	for (var i=1;i<=n;i++) {

		this[i]=0 }

	return this

}

month=new measure(12);
month[1]="January"
month[2]="February"
month[3]="March"
month[4]="April"
month[5]="May"
month[6]="June"
month[7]="July"
month[8]="August"
month[9]="September"
month[10]="October"
month[11]="November"
month[12]="December"

day=new measure(7);
day[1]="Sunday"
day[2]="Monday"
day[3]="Tuesday"
day[4]="Wednesday"
day[5]="Thursday"
day[6]="Friday"
day[7]="Saturday"


function WriteDate() {
	display=new Date();
	document.write(month[display.getMonth()+1]+" "+display.getDate()+", "+display.getFullYear()+".");
}
//**** END: Date Functions ****//

function WriteEndDateField() {
	display=new Date();
	thisdate = display.getDate();
	thismonth = display.getMonth()+1
	thisyear = display.getFullYear()
	if (thisdate < 10) {
		datetext = "0" + thisdate.toString();
	} else {
		datetext = thisdate.toString();
	}
	if (thismonth < 10) {
		monthtext = "0" + thismonth.toString();
	} else {
		monthtext = thismonth.toString();
	}
	document.write("<input name=\"enddate\" type=\"text\" class=\"InputTextBox\" id=\"enddate\" size=\"15\" maxlength=\"10\" value=\""+monthtext+"/"+datetext+"/"+thisyear+"\">");
}

// Declaring valid date character, minimum year and maximum year
var dtCh= "/";

var minYear=1900;
var maxYear=2100;

function isInteger(s){
	var i;
    for (i = 0; i < s.length; i++){   
        // Check that current character is number.
        var c = s.charAt(i);
        if (((c < "0") || (c > "9"))) return false;
    }
    // All characters are numbers.
    return true;
}

function stripCharsInBag(s, bag){
	var i;
    var returnString = "";
    // Search through string's characters one by one.
    // If character is not in bag, append to returnString.
    for (i = 0; i < s.length; i++){   
        var c = s.charAt(i);
        if (bag.indexOf(c) == -1) returnString += c;
    }
    return returnString;
}

function daysInFebruary (year){
	// February has 29 days in any year evenly divisible by four,
    // EXCEPT for centurial years which are not also divisible by 400.
    return (((year % 4 == 0) && ( (!(year % 100 == 0)) || (year % 400 == 0))) ? 29 : 28 );
}
function DaysArray(n) {
	for (var i = 1; i <= n; i++) {
		this[i] = 31
		if (i==4 || i==6 || i==9 || i==11) {this[i] = 30}
		if (i==2) {this[i] = 29}
   } 
   return this
}


function IsDate(dtStr){
	var daysInMonth = DaysArray(12)
	var pos1=dtStr.indexOf(dtCh)
	var pos2=dtStr.indexOf(dtCh,pos1+1)
	var strMonth=dtStr.substring(0,pos1)
	var strDay=dtStr.substring(pos1+1,pos2)
	var strYear=dtStr.substring(pos2+1)
	strYr=strYear
	if (strDay.charAt(0)=="0" && strDay.length>1) strDay=strDay.substring(1)
	if (strMonth.charAt(0)=="0" && strMonth.length>1) strMonth=strMonth.substring(1)
	for (var i = 1; i <= 3; i++) {
		if (strYr.charAt(0)=="0" && strYr.length>1) strYr=strYr.substring(1)
	}
	month=parseInt(strMonth)
	day=parseInt(strDay)
	year=parseInt(strYr)
	if (pos1==-1 || pos2==-1){
		//alert("The date format should be : mm/dd/yyyy.")
		return false
	}
	if (strMonth.length<1 || month<1 || month>12){
		//alert("Please enter a valid month")
		return false
	}
	if (strDay.length<1 || day<1 || day>31 || (month==2 && day>daysInFebruary(year)) || day > daysInMonth[month]){
		//alert("Please enter a valid day.")
		return false
	}
	if (strYear.length != 4 || year==0 || year<minYear || year>maxYear){
		//alert("Please enter a valid 4 digit year between "+minYear+" and "+maxYear)
		return false
	}
	if (dtStr.indexOf(dtCh,pos2+1)!=-1 || isInteger(stripCharsInBag(dtStr, dtCh))==false){
		//alert("Please enter a valid date.")
		return false
	}
return true
}


function ValidateSearchForm(thisform)
{
			if (!IsDate(thisform.fromdate.value, "/", "m|d|y"))
			{
				alert("Please enter a valid date in the format of mm/dd/yyyy.");
				thisform.fromdate.focus();
				return false;
			}
			
			if (!IsDate(thisform.enddate.value, "/", "m|d|y"))
			{
				alert("Please enter a valid date in the format of mm/dd/yyyy.");
				thisform.enddate.focus();
				return false;
			}
}




function MM_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

function ShowPositionedLayer(thisimg, thislayer, xoffset, yoffset) {
	x = s_getStart("x", thisimg);
	y = s_getStart("y", thisimg);
	objlayer = MM_findObj(thislayer);
	objlayer.style.left = x+xoffset;	
	objlayer.style.top = y+yoffset;
	MM_showHideLayers(thislayer,'','show');
}

// SAMPLE FUNCTION USED FOR RELATIVE POSITIONING
s_ua=navigator.userAgent.toLowerCase();
s_dl=document.getElementById?1:0;
s_iE=document.all&&!window.innerWidth&&s_ua.indexOf("msie")!=-1?1:0;
s_oP=s_ua.indexOf("opera")!=-1&&document.clear?1:0;
s_oP7=s_oP&&document.appendChild?1:0;
s_oP7m=s_oP&&!s_oP7?1:0;
s_nS=s_dl&&!document.all&&s_ua.indexOf("opera")==-1?1:0;
s_nS4=document.layers?1:0;
s_kNv=s_ua.indexOf("konqueror")!=-1?parseFloat(s_ua.substring(s_ua.indexOf("konqueror/")+10)):0;
s_kN=s_kNv>=2.2?1:0;s_kN3p=s_kNv>=3?1:0;
s_kN31p=s_kNv>=3.1?1:0;s_kN32p=s_kNv>=3.2?1:0;
s_mC=s_ua.indexOf("mac")!=-1?1:0;
s_sF=s_mC&&s_ua.indexOf("safari")!=-1?1:0;
s_iE5M=s_mC&&s_iE&&s_dl?1:0;
s_iE4M=s_mC&&s_iE&&!s_dl?1:0;
s_iE4=!s_mC&&s_iE&&!s_dl?1:0;
s_ct=0;

function s_getStart(a, img){
var bodyStyleMarginTop=0;// specify manually to kill a bug in Opera 5/6
var o=document.images[img];if(!o)return a=="x"?-630:0;
if(s_nS4)return a=="x"?o.x:o.y;
var oP,oC,ieW;oP=o.offsetParent;oC=a=="x"?o.offsetLeft:o.offsetTop;
ieW=s_iE&&!s_mC?1:0;
while(oP){if(ieW&&oP.tagName&&oP.tagName.toLowerCase()=="table"&&oP.border&&oP.border>0)oC++;oC+=a=="x"?oP.offsetLeft:oP.offsetTop;oP=oP.offsetParent};
if(s_kN31p&&!s_kN32p){return a=="x"?(document.body.style&&document.body.style.marginLeft?parseInt(document.body.style.marginLeft)+oC:document.body.marginWidth?parseInt(document.body.marginWidth)+oC:document.body.leftMargin?parseInt(document.body.leftMargin)+oC:oC+10):(document.body.style&&document.body.style.marginTop?parseInt(document.body.style.marginTop)+oC:document.body.marginHeight?parseInt(document.body.marginHeight)+oC:document.body.topMargin?parseInt(document.body.topMargin)+oC:oC+10)};
return s_oP7m?a=="x"?oC:oC+bodyStyleMarginTop:s_iE5M?a=="x"?oC+parseInt(document.body.currentStyle.marginLeft):oC+parseInt(document.body.currentStyle.marginTop):oC};
/*
 All browsers have problems with finding the real position of an
 element on the page in certain cases. I have tried to go round some
 browser bugs with the above function- that's why it's so long & complex.
*/
// SAMPLE FUNCTION USED FOR RELATIVE POSITIONING


//Fuctions to mimmick LTrim,  RTrim, and Trim...
//==================================================================
//LTrim(string) : Returns a copy of a string without leading spaces.
//==================================================================
function LTrim(str)
/*
        PURPOSE: Remove leading blanks from our string.
        IN: str - the string we want to LTrim
*/
{
        var whitespace = new String(" \t\n\r");

        var s = new String(str);

        if (whitespace.indexOf(s.charAt(0)) != -1) {
            // We have a string with leading blank(s)...

            var j=0, i = s.length;

            // Iterate from the far left of string until we
            // don't have any more whitespace...
            while (j < i && whitespace.indexOf(s.charAt(j)) != -1)
                j++;


            // Get the substring from the first non-whitespace
            // character to the end of the string...
            s = s.substring(j, i);
        }

        return s;
}

//==================================================================
//RTrim(string) : Returns a copy of a string without trailing spaces.
//=================================================================//=
function RTrim(str)
/*
        PURPOSE: Remove trailing blanks from our string.
        IN: str - the string we want to RTrim

*/
{
        // We don't want to trip JUST spaces, but also tabs,
        // line feeds, etc.  Add anything else you want to
        // "trim" here in Whitespace
        var whitespace = new String(" \t\n\r");

        var s = new String(str);

        if (whitespace.indexOf(s.charAt(s.length-1)) != -1) {
            // We have a string with trailing blank(s)...

            var i = s.length - 1;       // Get length of string

            // Iterate from the far right of string until we
            // don't have any more whitespace...
            while (i >= 0 && whitespace.indexOf(s.charAt(i)) != -1)
                i--;


            // Get the substring from the front of the string to
            // where the last non-whitespace character is...
            s = s.substring(0, i+1);
        }

        return s;
}


//=============================================================
//Trim(string) : Returns a copy of a string without leading or trailing spaces
//=============================================================
        function Trim(str)
        /*
                PURPOSE: Remove trailing and leading blanks from our string.
                IN: str - the string we want to Trim

                RETVAL: A Trimmed string!
        */
        {
                return RTrim(LTrim(str));
        }



function validEmail(email) {
	 invalidChars = " /:,;"
	
	if (email == "") {	// cannot be empty
	    //alert("Please enter your email address.");
	    return false
         }
	for (i=0; i<invalidChars.length; i++) {	// does it contain any invalid characters?
	badChar = invalidChars.charAt(i)
	if (email.indexOf(badChar,0) > -1) {
	   return false
	}
      }
      atPos = email.indexOf("@",1)	// there must be one "@" symbol
      if (atPos == -1) {
	 return false
      }
      if (email.indexOf("@",atPos+1) != -1) {	// and only one "@" symbol
	  return false
      }
      periodPos = email.indexOf(".",atPos)
      if (periodPos == -1) {			// and at least one "." after the "@"
	 return false
      }
      if (periodPos+3 > email.length)	{ // must be at least 2 characters after the "."
	 return false
      }
      return true
}


function ValidateForm(thisform) {
if (thisform._required != null) {
	if (Trim(thisform._required.value).length != "") {
	var fieldnames = thisform._required.value.split(",");
	var errormsg = "The form can not be submitted. Please complete all required information.";
		for (m=0; m<fieldnames.length; m++) {
			fieldname = Trim(fieldnames[m]);
			if (thisform.elements[fieldname].length===undefined) {
				if (Trim(thisform.elements[fieldname].value).length=="") {
		   		alert(errormsg);
				thisform.elements[fieldname].focus();
				return false;
					}
				if (fieldname.indexOf("email")>0) {
					if (validEmail(Trim(thisform.elements[fieldname].value))==false) {
					alert("Please enter a valid email address.");
					thisform.elements[fieldname].focus();
					return false;
						}
					}
				}
			else {
				thischecked = -1
				for (i=0; i<thisform.elements[fieldname].length; i++) {
					if (thisform.elements[fieldname][i].checked || (thisform.elements[fieldname][i].selected && thisform.elements[fieldname][i].value.length!="")) {
					thischecked = i;
						}
					}
				if (thischecked == -1) {
					alert("Please make a selection in all required fields.");
					return false;
					thisform.elements[fieldname][0].focus;
					}
				
				}
			}
		}
	}
}