function verifyYear(f, ext)
{
  var v = parseInt(f.year.value);
  if (isNaN(v) || v < 1645 || v > 7000)
  {
    alert(sYearInv);
    return false;
  }
  f.year.value = v;
  if (ext == "")
  {
    return true;
  }
  var m = f.month.options[f.month.selectedIndex].value;
  if (m == "0")
  {
    f.action = "/cgi-bin/ccal.cgi/" + f.year.value + ext;
  }
  else
  {
    f.action = "/cgi-bin/ccal.cgi/" + f.year.value + "-" + m + ext;
  }
  return true;
}
// End of function verify

// Load year value
function loadYear()
{
  var objDate = new Date();
  var y = objDate.getFullYear();
  var m = objDate.getMonth();
  if (m == 11)
  {
    y++;
  }
  document.forms[0].year.value = y;
}
// End of function loadYear