var isIE;
var userAgent = navigator.userAgent;
if (userAgent.indexOf("MSIE") == -1) {
		isIE = false;
}
else {
		isIE = true;
}
		
function getRef(sName) {
		var obj, i;
		
		/*
		if (isIE) { //IE
			obj = document.all.item(sName);
		}
		else { //Netscape
			for (i = 0; i < document.CalcForm.length; i++) {
					if (sName == document.CalcForm[i].name) {
					obj = document.CalcForm[i];
			}
		}
	}
	*/
	
	var elements = document.getElementsByClassName('obj');
	
	for (i = 0; i < elements.length; i++) 
	{
		if (sName == elements[i].name) {
			obj = elements[i];
		}
	}

	return (obj);
}

function cacl() {

	//check if users have typed integer for all cells
	var obj;
	
	obj=getRef("B3");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B3 needs an integer!")
		obj.focus();
		return;
	}
	
	obj=getRef("B4");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B4 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B5");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B5 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B6");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B6 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B7");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B7 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B8");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B8 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B16");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B16 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B17");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B17 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B19");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B19 needs an integer!")
		obj.focus();
		return;
	}
	
	obj=getRef("B20");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B20 needs an integer!")
		obj.focus();
		return;
	}
	
	obj=getRef("B22");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B22 needs an integer!")
		obj.focus();
		return;
	}

	obj=getRef("B23");
	if (isNaN(parseInt(obj.value))==true) {
		alert("B23 needs an integer!")
		obj.focus();
		return;
	}
	//B9=B4*0.8
	getRef("B9").value = Math.round(getRef("B4").value*0.8);
	//B10=B9/B7
	getRef("B10").value = Math.round(getRef("B9").value/getRef("B7").value);
	//B11=B5*B3
	getRef("B11").value = Math.round(getRef("B5").value*getRef("B3").value);
	//B12=B6*B3
	getRef("B12").value = Math.round(getRef("B6").value*getRef("B3").value);
	//B13=B12/B7
	getRef("B13").value = Math.round(getRef("B12").value/getRef("B7").value);
	//B14=(B3*B8*735000)/B6
	getRef("B14").value = Math.round((getRef("B3").value*getRef("B8").value*735000)/getRef("B6").value);
	//B15=B14/3
	getRef("B15").value = Math.round(getRef("B14").value/3);
	//B18=(B16*B3*735000)/B17
	getRef("B18").value = Math.round((getRef("B16").value*getRef("B3").value*735000)/getRef("B17").value);
	//B21=(B19*B3*735000)/B20
	getRef("B21").value = Math.round((getRef("B19").value*getRef("B3").value*735000)/getRef("B20").value);
	//B24=(B22*B3*735000)/B23		
	getRef("B24").value = Math.round((getRef("B22").value*getRef("B3").value*735000)/getRef("B23").value);
}