function makemail( a, s, q ) {
  /* Set the default values */
  xa = "gene";
  xs = "tqsi.com";
  xq = "DNA Study Web Site Comment";
  /* if the user didn't give me data, use the defaults */
  if (a.length == 0) a = xa;
  if (s.length == 0) s = xs;
  if (q.length == 0) q = xq;
  /* construct the address and kick it off */
  x = "mailto:" + a + "@" + s + "?subject=" + q;
  document.location.href = x;
}

function checkData()
{

// Sign in for Data Edit Services

//	if (document.mailmgr.email.value == "") {
//		alert("Please fill in your E-Mail Address.");
//		document.mailmgr.email.focus();
//		return false
//		}
//	else if (checkMail(document.mailmgr.email.value)) {
//		alert("E-Mail Address entered is not valid.");
//		document.mailmgr.email.focus();
//		return false
//		}
	   
	if (document.mailmgr.password.value == "") {
		alert("Please enter your Password.");
		document.mailmgr.password.focus();
		return false
		}
			
// Check that Kit number was entered

	if (document.mailmgr.kit.value == "") {
		alert("Please enter your Kit Number.");
		document.mailmgr.kit.focus();
		return false
		}

	if (document.mailmgr.kit.value == "0") {
		alert("Kit Number entered is not valid.");
		document.mailmgr.kit.focus();
		return false
		}


	return true
}


function checkMail(addr)
{
    // Tests email address for valid syntax, returns TRUE if not valid //
    var filter  = /^([a-zA-Z0-9_\.\-])+([a-zA-Z0-9])\@(([a-zA-Z0-9\-])+\.)+([a-zA-Z0-9]{2,4})+$/;
	if (filter.test(addr)) return false;
	else return true;
}


function getRadioButtonValue (radio)
{  var result = ""; 
   for (var i = 0; i < radio.length; i++) {   
          if (radio[i].checked) {
                        result =  radio[i].value;
                        break 
          }
    }
    return result
}


function clearDefault(el) {

	if (el.defaultValue==el.value) el.value = ""
		
}


function trimString(sInString) {
  sInString = sInString.replace( /^\s+/g, "" );// strip leading
  return sInString.replace( /\s+$/g, "" );// strip trailing
}


function checkKit()
{

// Check that Kit number was entered

       if ( (document.kitmgr.kit.value == "") || (document.kitmgr.kit.value == "Member Already Exists") ) {
          alert("Please enter your Kit Number.");
          document.kitmgr.kit.focus();
          return false
          }
			
	return true
}

function checkKit2()
{

// Check that Kit number was entered

       if ( (document.forgot.kit.value == "") || (document.forgot.kit.value == "Kit Unknown") ) {
          alert("Please enter your Kit Number.");
          document.forgot.kit.focus();
          return false
          }
			
	return true
}

function checkDataMD()
{

// Member Record Edit 

       if (document.member.contact.value == "") {
          alert("Please enter the name of the contact for this kit.");
          document.member.contact.focus();
          return false
          }

       if (document.member.password.value == "") {
          alert("Please enter your Password.");
          document.member.password.focus();
          return false
          }

       if (document.member.email.value == "") {
          alert("Please fill in your E-Mail Address.");
          document.member.email.focus();
          return false
           }
       else if (checkMail(document.member.email.value)) {
            	alert("E-Mail Address entered is not valid.");
                document.mailmgr.member.focus();
                return false
           }
	   
       if (document.member.fname_member.value == "") {
          alert("Please enter the first name of the Member associated with this kit.");
          document.member.fname_member.focus();
          return false
          }
			
       if (document.member.lname_member.value == "") {
          alert("Please enter the last name of the Member associated with this kit.");
          document.member.lname_member.focus();
          return false
          }

       if (document.member.ancestor_info.value == "") {
          alert("Please enter a short description of the earliest documented ancestor for this member.\n" 
		  	+ "Typically, this would be the name of the ancestor, birth date/place, and/or death date/place");
          document.member.ancestor_info.focus();
          return false
          }

	return true
}

function new_freecap()
{
	// loads new freeCap image
	if(document.getElementById)
	{
		// extract image name from image source (i.e. cut off ?randomness)
		thesrc = document.getElementById("freecap").src;
		thesrc = thesrc.substring(0,thesrc.lastIndexOf(".")+4);
		// add ?(random) to prevent browser/isp caching
		document.getElementById("freecap").src = thesrc+"?"+Math.round(Math.random()*100000);
	} else {
		alert("Sorry, cannot autoreload freeCap image\nSubmit the form and a new freeCap will be loaded");
	}
}