function checkForm(form) {
  var errors ="";
  var msg;
  var i;
  var j = 1;

  var fields = new Array;
  // Company Data..
  fields['business_phone'] = 'Business Phone';
  fields['business_fax'] = 'Business Fax';
  fields['contact_name'] = 'Contact Name';

  fields['first_name'] = 'First Name';
  fields['last_name'] = 'Last Name';
  fields['lead_email'] = 'Email';
  fields['lead_type_cd'] = 'Topic of Interest';
  fields['company_name'] = 'Company Name';

  fields['senders_name'] = 'Name';
  fields['senders_email'] = 'Email';
  fields['category_type_cd'] = 'Subject';
  fields['message_text'] = 'Message';

  msg = "\n"
    + "The following required fields are missing or incorrect:\n"
    + "_________________________________________\n";

  var field_id;

  for (i = 0; i < form.elements.length; i++ ) {
    try { field_id = form.elements[i].name; }
    catch (e) { alert(e); }

    if (form.elements[i].value == "" && form.elements[i].name.indexOf('_opt') == -1 &&
    ( form.elements[i].type == "text" ||
      form.elements[i].type == "password" ||
      form.elements[i].type == "textarea" ||
      form.elements[i].type == "select-one" ) ) {

      document.getElementById(field_id).className = 'data_error';
      document.getElementById(field_id).parentNode.parentNode.className = 'data_error_row';

      if (j < 10) { j = "  " + j }
      errors += "\n\t"
        + j + ".   " + fields[form.elements[i].name];
        j++;

    } else {
      try {
        field_id = form.elements[i].id;
        document.getElementById(field_id).className = 'data_ok';
        document.getElementById(field_id).parentNode.parentNode.className = 'data_ok_row';
      }
      catch (e) { }
    }
  }

  if (errors) {
    msg += errors;
    alert(msg);
    return false;
  }

  if (!errors) {
    return true;
  }
  return false;
}

function resetForm(obj) {
  if (confirm("Choose OK to clear ALL form values")) {
    for (var i = 0; i < obj.elements.length; i++ ) {
      if (obj.elements[i].type == "text" || obj.elements[i].type == "password" || obj.elements[i].type == "textarea" || obj.elements[i].type == "select-one" ) {
        try {
          field_id = obj.elements[i].id;
          document.getElementById(field_id).className = 'data_ok';
          document.getElementById(field_id).parentNode.parentNode.className = 'data_ok_row';
        }
        catch (e) { }
      }
    }
    return true;
  }
  return false;
}

function validEmail(s) {
    var i = 1;
    var slength = s.length;
    while ((i < slength) && (s.charAt(i) != "@")) {
      i++;
    }
    if ((i > slength) || (s.charAt(i) != "@")) return false;
    else i += 2;
    while ((i < slength) && (s.charAt(i) != ".")) {
      i++
    }
    if ((i >= slength - 1) || (s.charAt(i) != ".")) return false;
    else return true;
}

if (parent != self) {
  top.location=self.document.location;
}

function goTopic(form) {
  Topic = form.qlink.options[form.qlink.selectedIndex].value;
  if (Topic != "") {
    window.location.href = Topic;
  }
}

function qLink(form) {
  isTopic = (form.qlink.options[form.qlink.selectedIndex].text).substring(0,2);
  if ( isTopic == "--" ) {
    goTopic(form);
    return true;
  } else {
    form.reset();
    return false;
  }
}

function subscribeInfo(url) {
  self.name = "opener";
  remote = open(url, "Subscribe", "scrollbars,status,width=400,height=500" );
}

function display(str) {
  window.status = str;
  return true;
}

function alienPage(alien) {
  var missive =
      "The page you are about to view \"" + alien + "\" ..\n"
    + "is external to footDrHorsley.\n\n"
    + "External links are provided on this site only as a convenience,\n"
    + "and do not indicate endorsement of the linked sites.";

  if (confirm(missive)) {
    // window.location.href = alien;
    remote = open(alien, "External", "scrollbars,status");
  }
}