var trow= new Array()
var qty
var spcrows=14
function Areas(rform,row){	
/* qty=eval("rform.r"+row+"c2.value") */
	for(ncol=1; ncol<3; ncol++) {
		x=eval("rform.r"+row+"c"+ncol)	
		if  (x.value>0){		
			trow[ncol]=x.value
		}else{
			trow[ncol]=" "				
		}
	}	
	x=eval("rform.r"+row+"c3")
	x.value=format(trow[1]*trow[2])
	//x.value=format(x.value)
	if ((x.value==0) ||(x.value=="")) {
		x.value=" "
	}	
// rform.eval("r"+row+"c3").name=x.value	
//document.getElementByName(x).name=x.value
// then sum up the totcol  array after the row is recalculated
	tsf=0
	for(nrow=1; nrow<=spcrows; nrow++) {
		x=eval("rform.r"+nrow+"c3")
			xstr=x.value		
			//xstrno=xstrno.replace(",","")
			//tsf=(tsf*1+noformat*1)
			tsf=(tsf*1+noformat(xstr)*1)
		}
	rform.subtot.value=format(tsf)
	rform.circ_sf.value=format(tsf*rform.circpct.value/100)
	rform.useabletot.value=format(1*(tsf)+(1*noformat(rform.circ_sf.value)))
	rform.loss_sf.value=format(noformat(rform.useabletot.value)*rform.losspct.value/100)
	rform.renttot.value=format(1*noformat(rform.useabletot.value)+noformat(rform.loss_sf.value)*1)
	return true
}

 function format(num){
   if(isNaN(num))
     num = 0;
   var dol = Math.floor(num).toString();
   var cents = Math.floor((num*100+.5)%100).toString();
   for (var i = 0; i < Math.floor((dol.length-1)/3)-i; i++)
     dol = dol.slice(0,-(4*i+3))+','+dol.slice(-(4*i+3));
   while (cents.length<2)
    cents += "0";
	if (cents>0){
   		return dol+"."+cents}
	else{	
	return dol}
 }
 function noformat(xstr){
 	xstrno=xstr.replace(",","")
	return xstrno
 }
 function MM_validateForm() { //v4.0
  if (document.getElementById){
    var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
    for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=document.getElementById(args[i]);
      if (val) { nm=val.name; if ((val=val.value)!="") {
        if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
          if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
        } else if (test!='R') { num = parseFloat(val);
          if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
          if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
            min=test.substring(8,p); max=test.substring(p+1);
            if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
      } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
    } if (errors) alert('The following error(s) occurred:\n'+errors);
    document.MM_returnValue = (errors == '');
} }

var maxL = 600; // max characters number allowed
function len(f,t){
var ml = f.elements['le'];
var v = new String();
var s = t.value.split('');
for(i=0;i<maxL;i++){v+=s[i]}
if(s.length>=maxL){t.value=v;ml.value=0;}
else{ml.value=maxL-s.length};
}
