//Global dhtml use with CSS pages for tooltips 
function adminNavigation(lNavAction)
{
 var oForm = document.grisNav;
 switch(lNavAction){
		//Remove site news
		case 1:
			oForm.lAct.value = 2;
			oForm.action = 'CBAddRemove.asp'
			break;
		//Remove site links	
		case 2:
			oForm.lAct.value = 3;
			oForm.action = 'CBAddRemove.asp'
			break;
		//Edit my homepage	
		case 3:
			oForm.lAct.value = 1;
			oForm.bPro.value = 0;
			oForm.bNew.value = 0;
			oForm.action = 'AdminResearcher.asp'
			break;
		//Associate homepage with a species	
		case 4:
			oForm.lAct.value = 1;
			oForm.bNew.value = document.formResearcher.bNew.value;
			oForm.bPro.value = document.formResearcher.bPro.value;
			oForm.eID.value = document.formResearcher.eID.value;
			oForm.action = 'CBAddRemove.asp'
			break;
		//Edit my profile	
		case 5:
			oForm.lAct.value = 3;
			oForm.bNew.value = 0;
			oForm.bPro.value = 1;
			oForm.action = 'AdminResearcher.asp'
			break;
		//Edit a species	
		case 6:
			oForm.lid.value = 3;
			oForm.bIsDel.value = 0;
			oForm.action = 'AdminChooser.asp'
			break;
		//Add a species	
		case 7:
			oForm.bNew.value = 1
			oForm.action = 'AdminSpecies.asp'			
			break;
		//Edit a researcher site
		case 8:
			oForm.lid.value = 2;
			oForm.bIsDel.value = 0;
			oForm.action = 'AdminChooser.asp'
			break;
		//Edit a researcher profile
		case 9:
			oForm.lid.value = 2;
			oForm.bPro.value = 1;
			oForm.action = 'AdminChooser.asp'
			break;
		//New researcher profile
		case 10:
			oForm.bNew.value = 1;
			oForm.bPro.value = 1;
			oForm.lAct.value = 3;
			oForm.action = 'AdminResearcher.asp'
			break;
		case 15:
			oForm.action = 'GrinAdmin.asp'
			break;
		case 21:
			oForm.lAct.value = 4;
			oForm.action = 'CBAddRemove.asp'
			break;
		case 22:
			oForm.lAct.value = 5;
			oForm.action = 'CBAddRemove.asp'
			break;
		case 67:
			oForm.lid.value = 3;
			oForm.bIsDel.value= 1;
			oForm.action = 'AdminChooser.asp'
			break;
		case 75:
			oForm.lAct.value=1;
			oForm.lSpecID.value = document.speciesQuery.lSpecID.value;
			oForm.action = 'AdminSpeciesExtended.asp'
			break;
		case 76:
			oForm.lid.value = 2;
			oForm.bIsDel.value= 1;
			oForm.action = 'AdminChooser.asp'
			break;
		case 77:
			oForm.lAct.value=6;
			oForm.lSpecID.value = document.speciesQuery.lSpecID.value;
			oForm.action = 'CBAddRemove.asp'
			break;
		case 78:
			oForm.action = 'AdminSpecies.asp'			
			break;
		case 82:
			oForm.action = 'AdminMailbox.asp'
			break;
		case 83:
			oForm.action = 'AdminMailCompose.asp'
			break;
		case 87:
			oForm = document.delMail
			oForm.action = 'AdminMailbox.asp'
			break;		
		case 31:
			oForm.lAct.value = 8;
			oForm.action = 'CBAddRemove.asp'
			break;
		case 32:
			oForm.lAct.value = 7;
			oForm.action = 'CBAddRemove.asp'
			break;
		case 34:
			oForm.lAct.value = 1;
			oForm.bNew.value = document.formResearcher.bNew.value;
			oForm.bPro.value = document.formResearcher.bPro.value;
			oForm.eID.value = document.formResearcher.eID.value;
			oForm.action = 'AdminSequence.asp'
			break;
		case 90:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1007
			oForm.action = 'AdminSequence.asp'
			break;	
		case 91:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 2
			oForm.action = 'AdminSequence.asp'
			break;
		case 92:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 3
			oForm.action = 'AdminSequence.asp'
			break;
		case 93:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 4
			oForm.action = 'AdminSequence.asp'
			break;
		case 94:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1000
			oForm.action = 'AdminSequence.asp'
			break;
		case 95:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1001
			oForm.action = 'AdminSequence.asp'
			break;
		case 96:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1002
			oForm.action = 'AdminSequence.asp'
			break;
		case 97:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1003
			oForm.action = 'AdminSequence.asp'
			break;
		case 98:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1004
			oForm.action = 'AdminSequence.asp'
			break;		
		case 99:
			oForm.eID.value = document.optionQuery.eID.value;
			oForm.lAct.value = 1006
			oForm.action = 'AdminSequence.asp'
			break;	
 }
   	oForm.method = 'post';
 	oForm.submit(); 
}
function show(object) {
	// Check that the layer actually exists before trying to write.  Prevents JS error
	if (document.layers && document.layers[object] != null)
	    document.layers[object].visibility = 'visible';
	else if (document.all)
	    document.all[object].style.visibility = 'visible';
}
function hide(object) {
	if (document.layers && document.layers[object] != null)
	    document.layers[object].visibility = 'hidden';
	else if (document.all)
	    document.all[object].style.visibility = 'hidden';
}
function PopUpWin(sPage, lWidth, lHeight,sScroll)
{
	if(!lWidth)
		lWidth = 680;
	if(!lHeight)
		lHeight = 400;
	if(!sScroll)
		sScroll = 'no';
	mywin = open(sPage,'PopUp','width=' + lWidth + ',height=' + lHeight + ',scrollbars=' + sScroll + ',toolbar=no,location=no,status=no,resizable=yes,menubar=no');
	if(mywin)
		mywin.focus();
}

//global is empty form validator	
function isblank(s)
{
	for(var i = 0; i < s.length; i++) {
			var c = s.charAt(i);
			if ((c != '') && (c != '\n') && (c != '\t')) return false;
		}
		return true;
}			 
//global decimal number checker
function isDecimal(v)
{
	oneDecimal = false
	inputStr = v.toString()
		for (var i = 0; i < inputStr.length; i++)
		{
		var oneChar = inputStr.charAt(i)
			if (i == 0 && oneChar == "-")
			{
				continue
			}
			if (oneChar == "." && !oneDecimal)
			{
				oneDecimal = true
				continue
			}
			if (oneChar < "0" || oneChar > "9")
			{
				return true
			}
		}
		return false
}		
//Global text field checker
function onlyText(f)
{
	var msg;
	var empty_fields = "";
	var errors = ""; 
		
	for(var i = 0; i < f.length; i++)
	{
	 var e = f.elements[i];
	 if (((e.type == "text") || (e.type == "textarea") || (e.type == "password")) && !e.optional)
	 {
	 	if ((e.value == null) || (e.value == "") || isblank(e.value))
		 {
		 	empty_fields += "\n       " + e.name;
			continue;
		 }
	 }
    }		

if (!empty_fields && !errors) return true;

msg = " ______________________________________________________________\n\n"
msg += "The form could not be submitted because of the following error(s). \n";
msg += "Please correct these error(s) and re-submit. \n";
msg += " ______________________________________________________________\n\n"
if (empty_fields)
	{
		msg += " - The following required field(s) are empty:"
			+ empty_fields + "\n";
			if (errors) msg += "\n";
	}
	msg += errors;
	alert(msg);
	return false;
}			
function Login()
{
	if(onlyText(document.loginForm)){
		document.loginForm.submit();
	}		
}


function PrintMe()
{
	var oForm;
	oForm = document.speciesQuery
	oForm.lType.value = 1;	
	oForm.target="_new";
	oForm.submit();
	setTimeout("document.speciesQuery.target = '_self'", "2000")
 }