function resetflds(f, fld){
	f.CScholar1.value = ""
	
}

function putFocus()
{
	document.form1.Search.focus();
	document.form1.Search.select();
}	

function changename(f){    //changes collegename throughout form.
	f.Collegesg1.value = f.Collegede1.value
	f.Collegesg2.value = f.Collegede2.value
	f.Collegesg3.value = f.Collegede3.value
	f.Collegefa1.value = f.Collegede1.value
	f.Collegefa2.value = f.Collegede2.value
	f.Collegefa3.value = f.Collegede3.value
	f.CollegeDir1.value = f.Collegede1.value
	f.CollegeDir2.value = f.Collegede2.value
	f.CollegeDir3.value = f.Collegede3.value
}


function calcDirectExp(f){
	f.Tuition1.value = parseMoney(f.Tuition1.value)
	f.Books1.value = parseMoney(f.Books1.value)
	f.Room1.value = parseMoney(f.Room1.value)
	f.Personal1.value = parseMoney(f.Personal1.value)
	f.Tuition2.value = parseMoney(f.Tuition2.value)
	f.Books2.value = parseMoney(f.Books2.value)
	f.Room2.value = parseMoney(f.Room2.value)
	f.Personal2.value = parseMoney(f.Personal2.value)
	f.Tuition3.value = parseMoney(f.Tuition3.value)
	f.Books3.value = parseMoney(f.Books3.value)
	f.Room3.value = parseMoney(f.Room3.value)
	f.Personal3.value = parseMoney(f.Personal3.value)
	
	f.DirExp1.value = (f.Tuition1.value - 0) + (f.Books1.value - 0) + (f.Room1.value - 0) + (f.Personal1.value - 0)
	f.DirExp2.value = (f.Tuition2.value - 0) + (f.Books2.value - 0) + (f.Room2.value - 0) + (f.Personal2.value - 0)
	f.DirExp3.value = (f.Tuition3.value - 0) + (f.Books3.value - 0) + (f.Room3.value - 0) + (f.Personal3.value - 0)
	
	f.DirCost1.value = f.DirExp1.value
	f.DirCost2.value = f.DirExp2.value
	f.DirCost3.value = f.DirExp3.value
	
	f.Tuition1.value = formatMoney(f.Tuition1.value)
	f.Books1.value = formatMoney(f.Books1.value)
	f.Room1.value = formatMoney(f.Room1.value)
	f.Personal1.value = formatMoney(f.Personal1.value)
	f.DirExp1.value = formatMoney(f.DirExp1.value) 
	f.Tuition2.value = formatMoney(f.Tuition2.value)
	f.Books2.value = formatMoney(f.Books2.value)
	f.Room2.value = formatMoney(f.Room2.value)
	f.Personal2.value = formatMoney(f.Personal2.value)
	f.DirExp2.value = formatMoney(f.DirExp2.value) 
	f.Tuition3.value = formatMoney(f.Tuition3.value)
	f.Books3.value = formatMoney(f.Books3.value)
	f.Room3.value = formatMoney(f.Room3.value)
	f.Personal3.value = formatMoney(f.Personal3.value)
	f.DirExp3.value = formatMoney(f.DirExp3.value) 
	calcOutofPocket(f)
}

function calcGrants(f){
	f.CScholar1.value = parseMoney(f.CScholar1.value)
	f.OScholar1.value = parseMoney(f.OScholar1.value) 
	f.PGrant1.value = parseMoney(f.PGrant1.value)
	f.SEOG1.value = parseMoney(f.SEOG1.value)
	f.CGrant1.value = parseMoney(f.CGrant1.value)
	f.SGrant1.value = parseMoney(f.SGrant1.value)
	f.CScholar2.value = parseMoney(f.CScholar2.value)
	f.OScholar2.value = parseMoney(f.OScholar2.value) 
	f.PGrant2.value = parseMoney(f.PGrant2.value)
	f.SEOG2.value = parseMoney(f.SEOG2.value)
	f.CGrant2.value = parseMoney(f.CGrant2.value)
	f.SGrant2.value = parseMoney(f.SGrant2.value)
	f.CScholar3.value = parseMoney(f.CScholar3.value)
	f.OScholar3.value = parseMoney(f.OScholar3.value) 
	f.PGrant3.value = parseMoney(f.PGrant3.value)
	f.SEOG3.value = parseMoney(f.SEOG3.value)
	f.CGrant3.value = parseMoney(f.CGrant3.value)
	f.SGrant3.value = parseMoney(f.SGrant3.value)
	
	f.totSGrant1.value = (f.CScholar1.value - 0) + (f.OScholar1.value - 0) + (f.PGrant1.value - 0) + (f.SEOG1.value - 0) + (f.CGrant1.value - 0) + (f.SGrant1.value - 0) //calculates total scholarships and grants for college 1
f.totSGrant2.value = (f.CScholar2.value - 0) + (f.OScholar2.value - 0) + (f.PGrant2.value - 0) + (f.SEOG2.value - 0) + (f.CGrant2.value - 0) + (f.SGrant2.value - 0) //calculates total scholarships and grants for college 2
f.totSGrant3.value = (f.CScholar3.value - 0) + (f.OScholar3.value - 0) + (f.PGrant3.value - 0) + (f.SEOG3.value - 0) + (f.CGrant3.value - 0) + (f.SGrant3.value - 0) //calculates total scholarships and grants for college 3

	
	f.CScholar1.value = formatMoney(f.CScholar1.value)
	f.OScholar1.value = formatMoney(f.OScholar1.value) 
	f.PGrant1.value = formatMoney(f.PGrant1.value)
	f.SEOG1.value = formatMoney(f.SEOG1.value)
	f.CGrant1.value = formatMoney(f.CGrant1.value)
	f.SGrant1.value = formatMoney(f.SGrant1.value)
	f.CScholar2.value = formatMoney(f.CScholar2.value)
	f.OScholar2.value = formatMoney(f.OScholar2.value) 
	f.PGrant2.value = formatMoney(f.PGrant2.value)
	f.SEOG2.value = formatMoney(f.SEOG2.value)
	f.CGrant2.value = formatMoney(f.CGrant2.value)
	f.SGrant2.value = formatMoney(f.SGrant2.value)
	f.CScholar3.value = formatMoney(f.CScholar3.value)
	f.OScholar3.value = formatMoney(f.OScholar3.value) 
	f.PGrant3.value = formatMoney(f.PGrant3.value)
	f.SEOG3.value = formatMoney(f.SEOG3.value)
	f.CGrant3.value = formatMoney(f.CGrant3.value)
	f.SGrant3.value = formatMoney(f.SGrant3.value)
	
	calcTotFinAid(f)
	calcOutofPocket(f)
}

function calcLoans(f){

	f.FedPerkins1.value = parseMoney(f.FedPerkins1.value)
	f.FedStafford1.value = parseMoney(f.FedStafford1.value)
	f.FedPlus1.value = parseMoney(f.FedPlus1.value)
	f.OtherLn1.value = parseMoney(f.OtherLn1.value)
	f.FedPerkins2.value = parseMoney(f.FedPerkins2.value)
	f.FedStafford2.value = parseMoney(f.FedStafford2.value)
	f.FedPlus2.value = parseMoney(f.FedPlus2.value)
	f.OtherLn2.value = parseMoney(f.OtherLn2.value)
	f.FedPerkins3.value = parseMoney(f.FedPerkins3.value)
	f.FedStafford3.value = parseMoney(f.FedStafford3.value)
	f.FedPlus3.value = parseMoney(f.FedPlus3.value)
	f.OtherLn3.value = parseMoney(f.OtherLn3.value)
	
	f.TotLn1.value = (f.FedPerkins1.value - 0) + (f.FedStafford1.value - 0) + (f.FedPlus1.value - 0) + (f.OtherLn1.value - 0)
	f.TotLn2.value = (f.FedPerkins2.value - 0) + (f.FedStafford2.value - 0) + (f.FedPlus2.value - 0) + (f.OtherLn2.value - 0)
	f.TotLn3.value = (f.FedPerkins3.value - 0) + (f.FedStafford3.value - 0) + (f.FedPlus3.value - 0) + (f.OtherLn3.value - 0)
	
	f.FedPerkins1.value = formatMoney(f.FedPerkins1.value)
	f.FedStafford1.value = formatMoney(f.FedStafford1.value)
	f.FedPlus1.value = formatMoney(f.FedPlus1.value)
	f.OtherLn1.value = formatMoney(f.OtherLn1.value)
	f.FedPerkins2.value = formatMoney(f.FedPerkins2.value)
	f.FedStafford2.value = formatMoney(f.FedStafford2.value)
	f.FedPlus2.value = formatMoney(f.FedPlus2.value)
	f.OtherLn2.value = formatMoney(f.OtherLn2.value)
	f.FedPerkins3.value = formatMoney(f.FedPerkins3.value)
	f.FedStafford3.value = formatMoney(f.FedStafford3.value)
	f.FedPlus3.value = formatMoney(f.FedPlus3.value)
	f.OtherLn3.value = formatMoney(f.OtherLn3.value)
		
	calcTotFinAid(f)
	calcOutofPocket(f)
}

function calcTotFinAid(f){
	f.totSGrant1.value = parseMoney(f.totSGrant1.value)
	f.totSGrant2.value = parseMoney(f.totSGrant2.value)
	f.totSGrant3.value = parseMoney(f.totSGrant3.value)

	f.TotLn1.value = parseMoney(f.TotLn1.value)
	f.TotLn2.value = parseMoney(f.TotLn2.value)
	f.TotLn3.value = parseMoney(f.TotLn3.value)
	
	f.TotFinAid1.value = (f.totSGrant1.value - 0) + (f.TotLn1.value - 0)
	f.TotFinAid2.value = (f.totSGrant2.value - 0) + (f.TotLn2.value - 0)
	f.TotFinAid3.value = (f.totSGrant3.value - 0) + (f.TotLn3.value - 0)
	
	calcPercent(f)
		
	f.FinAid1.value = f.TotFinAid1.value
	f.FinAid2.value = f.TotFinAid2.value
	f.FinAid3.value = f.TotFinAid3.value
	
	f.totSGrant1.value = formatMoney(f.totSGrant1.value)
	f.totSGrant2.value = formatMoney(f.totSGrant2.value)
	f.totSGrant3.value = formatMoney(f.totSGrant3.value)

	f.TotLn1.value = formatMoney(f.TotLn1.value)
	f.TotLn2.value = formatMoney(f.TotLn2.value)
	f.TotLn3.value = formatMoney(f.TotLn3.value)
	
	f.TotFinAid1.value = formatMoney(f.TotFinAid1.value)
	f.TotFinAid2.value = formatMoney(f.TotFinAid2.value)
	f.TotFinAid3.value = formatMoney(f.TotFinAid3.value)
	
}

function calcOutofPocket(f){
	f.DirCost1.value = parseMoney(f.DirCost1.value)
	f.DirCost2.value = parseMoney(f.DirCost2.value)
	f.DirCost3.value = parseMoney(f.DirCost3.value)
	
	f.FinAid1.value = parseMoney(f.FinAid1.value)
	f.FinAid2.value = parseMoney(f.FinAid2.value)
	f.FinAid3.value = parseMoney(f.FinAid3.value)

	f.PocketExp1.value = (f.DirCost1.value - 0) - (f.FinAid1.value - 0)
	f.PocketExp2.value = (f.DirCost2.value - 0) - (f.FinAid2.value - 0)
	f.PocketExp3.value = (f.DirCost3.value - 0) - (f.FinAid3.value - 0)
	
	
	f.DirCost1.value = formatMoney(f.DirCost1.value)
	f.DirCost2.value = formatMoney(f.DirCost2.value)
	f.DirCost3.value = formatMoney(f.DirCost3.value)
	
	f.FinAid1.value = formatMoney(f.FinAid1.value)
	f.FinAid2.value = formatMoney(f.FinAid2.value)
	f.FinAid3.value = formatMoney(f.FinAid3.value)
	
	f.PocketExp1.value = formatMoney(f.PocketExp1.value)
	f.PocketExp2.value = formatMoney(f.PocketExp2.value)
	f.PocketExp3.value = formatMoney(f.PocketExp3.value)
}

function calcPercent(f){
	if ((f.totSGrant1.value == 0) || (f.totSGrant1.value == "")) {
		f.pctschol1.value = "0%"
		}
	else {
			f.pctschol1.value = (Math.round(((f.totSGrant1.value/f.TotFinAid1.value)*100))) + "%"
		}
	if ((f.totSGrant2.value == 0) || (f.totSGrant2.value == "")) {
		f.pctschol2.value = "0%"
		}
	else {
			f.pctschol2.value = (Math.round(((f.totSGrant2.value/f.TotFinAid2.value)*100))) + "%"
		}
	if ((f.totSGrant3.value == 0) || (f.totSGrant3.value == "")) {
		f.pctschol3.value = "0%"
		}
	else {
			f.pctschol3.value = (Math.round(((f.totSGrant3.value/f.TotFinAid3.value)*100))) + "%"
		}
		
	if ((f.TotLn1.value == 0) || (f.TotLn1.value == "")) {
		f.pctloan1.value = "0%"
		}
	else {
			f.pctloan1.value = (Math.round(((f.TotLn1.value/f.TotFinAid1.value)*100))) + "%"
		}
		
	if ((f.TotLn2.value == 0) || (f.TotLn2.value == "")) {
		f.pctloan2.value = "0%"
		}
	else {
			f.pctloan2.value = (Math.round(((f.TotLn2.value/f.TotFinAid2.value)*100))) + "%"
		}
	if ((f.TotLn3.value == 0) || (f.TotLn3.value == "")) {
		f.pctloan3.value = "0%"
		}
	else {
			f.pctloan3.value = (Math.round(((f.TotLn3.value/f.TotFinAid3.value)*100))) + "%"
		}	
		
}

function submitme(SchoolNum, w, h)
		{
		var x = (screen.width - w) / 2;
		var y = (screen.height - h)/2;
		//if (screen) {
		//	y = (screen.availHeight - height) / 2;
		//	x = (screen.availWidth - width) /2;
		//	}
		//y = window.screenY + 400;
		
		document.srch.DExp1.value = parseMoney(document.srch.DExp1.value)
		document.srch.totGrnt1.value = parseMoney(document.srch.totGrnt1.value)
		document.srch.tLoans1.value = parseMoney(document.srch.tLoans1.value)
		document.srch.DExp2.value = parseMoney(document.srch.DExp2.value)
		document.srch.totGrnt2.value = parseMoney(document.srch.totGrnt2.value)
		document.srch.tLoans2.value = parseMoney(document.srch.tLoans2.value)
		document.srch.DExp3.value = parseMoney(document.srch.DExp3.value)
		document.srch.totGrnt3.value = parseMoney(document.srch.totGrnt3.value)
		document.srch.tLoans3.value = parseMoney(document.srch.tLoans3.value)
				
		if ((document.srch.DExp1.value > 0.00) || (document.srch.totGrnt1.value) > 0.00 || (document.srch.tLoans1.value > 0.00))
		{
			//alert("There is a value in College 1")
			document.srch.DExp1.value = formatMoney(document.srch.DExp1.value)
			document.srch.totGrnt1.value = formatMoney(document.srch.totGrnt1.value)
			document.srch.tLoans1.value = formatMoney(document.srch.tLoans1.value)
			document.srch.srchflag.value = 2;
			if ((document.srch.DExp2.value > 0.00) || (document.srch.totGrnt2.value) > 0.00 || (document.srch.tLoans2.value > 0.00))
			{
			//alert("There is a value in College 1 and College 2")
			document.srch.DExp2.value = formatMoney(document.srch.DExp2.value)
			document.srch.totGrnt2.value = formatMoney(document.srch.totGrnt2.value)
			document.srch.tLoans2.value = formatMoney(document.srch.tLoans2.value)
			document.srch.srchflag.value = 3;
						
				if ((document.srch.DExp3.value > 0.00) || (document.srch.totGrnt3.value) > 0.00 || (document.srch.tLoans3.value > 0.00))
				{
				//alert("There is a value in College 1 and College 2 and College 3");
			
				document.srch.DExp3.value = formatMoney(document.srch.DExp3.value)
				document.srch.totGrnt3.value = formatMoney(document.srch.totGrnt3.value)
				document.srch.tLoans3.value = formatMoney(document.srch.tLoans3.value)
				document.srch.School.value = SchoolNum;
				document.srch.srchflag.value = 0;
				//
					if ((navigator.appName)=="Netscape"){
					popupWindow=open("choice.htm", "College", "width=500,height=400,scrollbars=yes,menubar,toolbar");	
					popupWindow.opener = self;
					}
					else{
					popupWindow=window.open('choice.htm', 'College', 'width='+w+', height='+h+', top='+y+', left='+x+', resizable=no');
					popupWindow.opener = self;
					}
								
				}else{
					document.srch.School.value = SchoolNum;
					document.srch.submit();
				}
			
			}else{
				document.srch.School.value = SchoolNum;
				document.srch.submit();
			
			 
			}
		}else{
				document.srch.srchflag.value = 1;
				document.srch.School.value = SchoolNum;
				document.srch.submit();
		}
		
		//alert(SchoolNum)
		//document.srch.School.value = SchoolNum;
		//document.srch.submit();
		return true;
		}
		
function submitblnk(){
		document.srch.submit();
}

function printform(){
	PrintPopUp=open("printform.htm", "Print", "scrollbars=yes, resizable=yes, menubar,toolbar");
	PrintPopUp.opener = self;
	}

function parseMoney(Amount)
{
	var fixAmt="";
	var i;
	var dollar = "$"
	for (i=0; i<Amount.length; i++)
	{
		if (Amount.charAt(i)==',' || Amount.charAt(i)==dollar)
			fixAmt+="";
		else
			fixAmt+=Amount.charAt(i);
	}	
	return fixAmt;
}

//Fixes the amounts so that they contain 2 decimal places.
function formatDecimal(fixAmt)
{
	var decPart, intPart;
	
	if (isNaN(parseInt(fixAmt)))
		intPart = 0;
	else
		intPart = parseInt(fixAmt);	
	decPart = Math.round(100*(fixAmt - intPart));
	if (decPart == 0)
		decPart = "00";
	if (decPart > 0 && decPart < 10) 
		decPart = "0" + decPart;
	return decPart;
}

//Fixes the amounts so that they contain $ and , in the appropriate places.
function formatMoney(fixAmt)
{
	var Amount="";
	var i, lenA="", newAmt="";
	var dif=0;

	if (fixAmt > 0 )	
	{
		fixAmt = Math.round(100.0 * fixAmt)/100.0;
		lenA = "'"+parseInt(fixAmt)+"'";
		if (isNaN(parseInt(fixAmt)))
			lenA="0";
		decPart = formatDecimal(fixAmt);
		
		for (i=lenA.length; i<11; i++)
		{
			fixAmt="0"+fixAmt;
			newAmt="'"+fixAmt+"'";
		}
		subA = newAmt.substr(1, 3);
		subB = newAmt.substr(4, 3);
		subC = newAmt.substr(7, 3);		
		Amount = subA+","+subB+","+subC+"."+decPart;
		for (i=0; i<11; i++)
		{
			if (Amount.charAt(i)!='0' && Amount.charAt(i)!=',')
				break;
		}
		return "$" + Amount.substr(i,11);
	}
	else
	 	return "";
}