function ArchiveSizing_Form1_Validator(theForm)
{

  var checkOK = "0123456789-,";
  var checkStr = theForm.CardiacCathMoVol.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Cardiac Cath\" field.");
    theForm.CardiacCathMoVol.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseInt(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Cardiac Cath\" field.");
    theForm.CardiacCathMoVol.focus();
    return (false);
  }

  var checkOK = "0123456789-,";
  var checkStr = theForm.VascCathMoVol.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Vascular Cath \" field.");
    theForm.VascCathMoVol.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseInt(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Vascular Cath \" field.");
    theForm.VascCathMoVol.focus();
    return (false);
  }

  var checkOK = "0123456789-,";
  var checkStr = theForm.CardiacUSMoVol.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Cardiac Ultrasound \" field.");
    theForm.CardiacUSMoVol.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseInt(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Cardiac Ultrasound \" field.");
    theForm.CardiacUSMoVol.focus();
    return (false);
  }

  var checkOK = "0123456789-,";
  var checkStr = theForm.VascUSMoVol.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Vascular Ultrasound \" field.");
    theForm.VascUSMoVol.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseInt(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Vascular Ultrasound \" field.");
    theForm.VascUSMoVol.focus();
    return (false);
  }

  var checkOK = "0123456789-,";
  var checkStr = theForm.NuclearMoVol.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Nuclear \" field.");
    theForm.NuclearMoVol.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseInt(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Nuclear \" field.");
    theForm.NuclearMoVol.focus();
    return (false);
  }

  var checkOK = "0123456789-.";
  var checkStr = theForm.AnnualPctIncrease.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Average Annual Estimated Pct Increase in Procedure Volume\" field.");
    theForm.AnnualPctIncrease.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("Please enter a valid number in the \"AnnualPctIncrease\" field.");
    theForm.AnnualPctIncrease.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Average Annual Estimated Pct Increase in Procedure Volume\" field.");
    theForm.AnnualPctIncrease.focus();
    return (false);
  }

  if (theForm.RetentionPeriod.value == "")
  {
    alert("Please enter a value for the \"Retention Period\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }

  if (theForm.RetentionPeriod.value.length < 1)
  {
    alert("Please enter at least 1 characters in the \"Retention Period\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }

  if (theForm.RetentionPeriod.value.length > 5)
  {
    alert("Please enter at most 5 characters in the \"Retention Period\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }

  var checkOK = "0123456789-.";
  var checkStr = theForm.RetentionPeriod.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else
      allNum += ch;
  }
  if (!allValid)
  {
    alert("Please enter only digit characters in the \"Retention Period\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("Please enter a valid number in the \"RetentionPeriod\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0"))
  {
    alert("Please enter a value greater than or equal to \"0\" in the \"Retention Period\" field.");
    theForm.RetentionPeriod.focus();
    return (false);
  }
  return (true);
}