function NumFormat( __StringNumber ) {
 InString = _Trim(__StringNumber);
 OutString = "";
 InLength = InString.length;
 for(__x=InLength; __x!=0; __x--) {
  if(OutString.length == 3 | OutString.length == 7 | OutString.length == 11) {
   OutString = "," + OutString;
   OutString = InString.substring(__x-1,__x) + OutString;
  } else {
   OutString = InString.substring(__x-1,__x) + OutString;
  }
 }
 return OutString;
}

function _Trim( str ) {
	astr = String( str );
	t_str = String("");
	LastCharAt = 0;
	for(x=astr.length-1;x>=0;x--) {
		if( astr.charAt(x) != " " ) {
			LastCharAt = x+1;
			break;
		}
	}
	return astr.substring(0,LastCharAt);
}

    function computeForm(form) {

	//
	// Calculate total cost!
	//
	var timeinhouse = (form.time1.value*12);

        xx = Number((_StrTran(form.payment1.value,",",""))*timeinhouse);
		xx += Number(_StrTran(form.penalty1.value,",",""));
		xx += Number(_StrTran(form.points1.value,",",""));
		xx += Number(_StrTran(form.remaining1.value,",",""));
		form.cost1.value = "$"+NumFormat(parseInt(xx));

        yy = Number((_StrTran(form.payment2.value,",",""))*timeinhouse);
		yy += Number(_StrTran(form.penalty2.value,",",""));
		yy += Number(_StrTran(form.points2.value,",",""));
		yy += Number(_StrTran(form.remaining2.value,",",""));
        form.cost2.value = "$"+NumFormat(parseInt(yy));

}

    function computeField(input) {
        if (input.value != null && input.value.length != 0)
            input.value = "" + NumFormat(parseInt(input.value));

}

function _StrTran( _str2b_chg, _substr2_look4, _substr2_sub ) {
//=====================================================================
// function _StrTran( _str2b_chg, _substr2_look4, _substr2_sub )
//
//
//=====================================================================
 var _Str_2B_Chg = String( _str2b_chg );
 var _Str_2_Look_4 = String( _substr2_look4 );
 var _Str_2_Sub = String( _substr2_sub );
 var _Out_Str = "";

 _len2chg = _Str_2B_Chg.length;
 _len2lk4 = _Str_2_Look_4.length;
 for( _stepr=0; _stepr<_len2chg; _stepr++ ) {
  if(_Str_2B_Chg.substring(_stepr,_stepr+_len2lk4) == _Str_2_Look_4)
   _Out_Str += _Str_2_Sub;
  else
   _Out_Str += _Str_2B_Chg.substring(_stepr,_stepr+_len2lk4)
 }
 return _Out_Str;
}
