function calc() {
  var calc_cgi = "../cgi-bin/get_hokenryou.cgi";
  var tingin = removeComma(document.f1.val1.value);
  var age = document.f1.val2.value;
  var pref = document.f1.PREF.value;

  var param = 'PAY=' + tingin;
  param += '&AGE=' + age;
  param += '&PREF=' + pref;

  new Ajax.Request(
    calc_cgi,
    {
      parameters : param,
      asynchronous : 1,
      onFailure : function() {
        alert("通信に失敗しました" + "\n" + param);
        return;
      },
      onSuccess : function(res) {
//        alert("通信に成功しました" + "\n" + param + "\n" + res.responseText);
        eval("var retval = " + res.responseText);
        if (retval.sts == "ERR") {
          alert(retval.msg);
        } else {
          $("ken").innerHTML = addComma("" + retval.ken);
          $("kou").innerHTML = addComma("" + retval.kou);
          $("jid").innerHTML = addComma("" + retval.jid);
          $("ken2").innerHTML = addComma("" + retval.ken2);
          $("kou2").innerHTML = addComma("" + retval.kou2);
        }
      }
    }
  );
  return;
}

function addComma(value) {
    for(var i = 0; i < value.length/3; i++){
        value = value.replace(/^([+-]?\d+)(\d\d\d)/,"$1,$2");
    }
    return value;
}

function removeComma(value) {
    return value.split(",").join("");
}

function procFocus(obj, f) {
  obj.style.backgroundColor = '#F9F9F9';
  if (f) {
    obj.value = removeComma(obj.value);
    obj.maxLength = 7;
  }
}

function procBlur(obj, f) {
  if (isNaN(obj.value) || obj.value < 0) {
    obj.value = "";
  }
  if (f) {
    obj.maxLength = 9;
    obj.value = addComma(obj.value);
  }
  obj.style.backgroundColor = '#FFFFFF';
}