function clearField(field) {
// check if the field contains the default value
	if (field.value == field.defaultValue) {
	  // It does, so clear the field
	  field.value = "";
	}
}
function checkField(field) {
	// Check if user has entered information in the field
	if (field.value == "") {
		// User has not entered anything so set to default value
		field.value = field.defaultValue;
	}
}
function test_it(entry) {
	// check if field has anything in it
  if (entry.value!=null && entry.value.length!=0) {
  	entry.value=""+ eval(entry.value);
  }
  // it does to call computeForm
	computeForm(entry.form);
}
function roundToCents(value) {
  var cents=100*(value-Math.floor(value))+0.5;
  result=Math.floor(value)+(Math.floor(cents)/100);
  return result;
}
function formatToCents(value) {
  var fmtnbr="";
  var DecPlace=0;
 	fmtnbr+=value;
 	for (var i=0;i<fmtnbr.length;i++) {
    if (fmtnbr.charAt(i)==".") {
    	DecPlace=i+1;
    	i=fmtnbr.length;
    }
 	}
 	if (DecPlace == 0) {
 		fmtnbr+=".00";
 	}
 	else {
 	 	if (fmtnbr.length - DecPlace == 1) {
 	 		fmtnbr+="0";
 	 	}
 	}
	return fmtnbr;
}
function formatCurrency(num) {
num = num.toString().replace(/\$|\,/g,'');
if(isNaN(num))
num = "0";
sign = (num == (num = Math.abs(num)));
num = Math.floor(num*100+0.50000000001);
cents = num%100;
num = Math.floor(num/100).toString();
if(cents<10)
cents = "0" + cents;
for (var i = 0; i < Math.floor((num.length-(1+i))/3); i++)
num = num.substring(0,num.length-(4*i+3))+','+
num.substring(num.length-(4*i+3));
return (((sign)?'':'-') + '$' + num + '.' + cents);
}
function alrt_msg(entry,low,high,prompt) {
	// this will send out an alert and specify the passed range of values in the message
  prompt="Sorry, "+prompt 
    +" entry is not an acceptable number: "+entry.value;
  var scratch=entry.value;
  for (var i=0;i<scratch.length;i++) {
		var letter=scratch.substring(i,i+1);
		if ((letter<"0" || "9"<letter) && letter!='.' && letter!='-') {
		  alert(prompt);
		  return false;
		}
  }
  var errtst=parseFloat(scratch)
  if (errtst<low || high<errtst) {
	  alert(prompt+ " is not in the acceptable range of possible values.  Please enter a number from "+low+" to "+high+"!");
	  return false;
  }
  entry.value=scratch;
  return true;
}
function roundTo4Decimals(value) {
  var fourdecimals=10000*(value-Math.floor(value))+0.5;
  result=Math.floor(value)+(Math.floor(fourdecimals)/10000);
  return result;
}

function CalcMonPay(dIR, cBal, iTerm) {

	dISN = 1;
	for (r = 0;r < iTerm; r++) {
		dISN *= (1 + dIR/1200);
	}
	result = roundToCents(cBal * dISN * (dIR/1200)/(dISN - 1));
	return result;
}
function FP_swapImg() {//v1.0
var doc=document,args=arguments,elm,n; doc.$imgSwaps=new Array(); for(n=2; n<args.length;
n+=2) { elm=FP_getObjectByID(args[n]); if(elm) { doc.$imgSwaps[doc.$imgSwaps.length]=elm;
elm.$src=elm.src; elm.src=args[n+1]; } }
}

function FP_preloadImgs() {//v1.0
var d=document,a=arguments; if(!d.FP_imgs) d.FP_imgs=new Array();
for(var i=0; i<a.length; i++) { d.FP_imgs[i]=new Image; d.FP_imgs[i].src=a[i]; }
}

function FP_getObjectByID(id,o) {//v1.0
var c,el,els,f,m,n; if(!o)o=document; if(o.getElementById) el=o.getElementById(id);
else if(o.layers) c=o.layers; else if(o.all) el=o.all[id]; if(el) return el;
if(o.id==id || o.name==id) return o; if(o.childNodes) c=o.childNodes; if(c)
for(n=0; n<c.length; n++) { el=FP_getObjectByID(id,c[n]); if(el) return el; }
f=o.forms; if(f) for(n=0; n<f.length; n++) { els=f[n].elements;
for(m=0; m<els.length; m++){ el=FP_getObjectByID(id,els[n]); if(el) return el; } }
return null;
}