var cwork = "";

var nwork = "";

function calcC(f,feet)

{ 

  cknum(feet); // ##### eliminate any non numeric before any other checking ###

  feet= nwork;



  if (feet.length > 1) // ##### if more than 1 char long ie: one zero is okay #############

  {

      if (feet.substring(0,1) ==  0) {feet = feet.substring(1);} // #####  strip leading zeros #####

  }

  var cleanfeet = "";

  var anycommas = feet.indexOf(","); // ##### any commas coming in? - like already edited data #####

  if (anycommas != -1)

  {

   var feetparts = feet.split(","); // ##### yes - - split into array of parts #####

   for(i=0; i < feetparts.length; i++){

       cleanfeet += feetparts[i];    // ##### and combine parts w/o commas #####

  }

feet=cleanfeet

}



var ARate = ADisp.substring(1) -0; // ##### make numeric & strip off '$' #####

var BRate = BDisp.substring(1) -0;

var CRate = CDisp.substring(1) -0;

  f.Afeet.value = feet;

  f.Bfeet.value = f.Afeet.value;

  f.Cfeet.value = f.Afeet.value;

  f.AfeetA.value = feet * ARate;

  f.BfeetA.value = feet * BRate;

  f.CfeetA.value = feet * CRate;

  f.AfeetM.value = (feet * ARate) / 12;

  f.BfeetM.value = (feet * BRate) / 12;

  f.CfeetM.value = (feet * CRate) / 12;

  

  f.AfeetA.value =  Math.round(f.AfeetA.value);comma(f.AfeetA.value);f.AfeetA.value = "$" + cwork;

  f.BfeetA.value =  Math.round(f.BfeetA.value);comma(f.BfeetA.value);f.BfeetA.value = "$" + cwork;

  f.CfeetA.value =  Math.round(f.CfeetA.value);comma(f.CfeetA.value);f.CfeetA.value = "$" + cwork;

  

  f.AfeetM.value =  Math.round(f.AfeetM.value);comma(f.AfeetM.value);f.AfeetM.value = "$" + cwork;

  f.BfeetM.value =  Math.round(f.BfeetM.value);comma(f.BfeetM.value);f.BfeetM.value = "$" + cwork;

  f.CfeetM.value =  Math.round(f.CfeetM.value);comma(f.CfeetM.value);f.CfeetM.value = "$" + cwork;

  

  comma(feet);    // ##### set feet to have commas if large enough #####

  f.Afeet.value = cwork;

  f.Bfeet.value = cwork;

  f.Cfeet.value = cwork;

 /*    // ##### not needed any more - chars checked at entry !! #####

  if(f.AfeetA.value == "$NaN")

  {

    alert("Error:\nYou may only enter numbers...\nPlease retry");

	f.Afeet.value = 0;

	f.Bfeet.value = 0;

	f.Cfeet.value = 0;

	f.AfeetA.value = "$0";

	f.BfeetA.value = "$0";

	f.CfeetA.value = "$0";

	f.AfeetM.value = "$0";

	f.BfeetM.value = "$0";

	f.CfeetM.value = "$0";

  }

  */

}



function comma(n)

{

cwork = n;

// ############  X,XXX   ##################################

if (n.length == 4) {

cwork = n.substring(0,1)+","+ n.substring(1,4);

}

// ############  XX,XXX   #################################

if (n.length == 5) {

cwork = n.substring(0,2)+","+ n.substring(2,5);

}

// ############  XXX,XXX   ################################

if (n.length == 6) {

cwork = n.substring(0,3)+","+ n.substring(3,6);

}

// ############  X,XXX,XXX   ##############################

if (n.length == 7) {

cwork = n.substring(0,1) + "," + n.substring(1,4) + "," + n.substring(4,7);

}

// ############  XX,XXX,XXX   #############################

if (n.length == 8) {

cwork = n.substring(0,2) + "," + n.substring(2,5) + "," + n.substring(5,8);

}

// ############  XXX,XXX,XXX   ############################

if (n.length == 9) {

cwork = n.substring(0,3) + "," + n.substring(3,6) + "," + n.substring(6,9);

}







}





function cknum(isn)

{

 var i;

 nwork = "";

 for (i=0; i < isn.length; i++)

  {

    var c = isn.charAt(i);

    if (((c < "0") || (c > "9"))) {}else{nwork+=c}

  }

}