function setFocus()
{
   document.frm_search.spid.focus();
}

function validateForm(frm_search)
{
	var fields = 0;
	frm_search.spid.value = trimSpaces(frm_search.spid.value);
	if(frm_search.spid.value != "")
		fields++;
		
	frm_search.keyword.value = trimSpaces(frm_search.keyword.value);
	if(frm_search.keyword.value != "")
		fields++;

	frm_search.sequence.value = trimSpaces(frm_search.sequence.value);
 	if(frm_search.sequence.value != "")
		fields++;

	if(fields != 1)
	{
		alert('Please enter a value for ONE of the fields : \n\nSwiss-Prot Entry Name \/ Accession No.\nKeyword Search or Sequence to Search');
	    	return false;
	}

	if(!validSequence(frm_search.sequence.value))
	{
                alert("You have invalid characters in your sequence");
		return false;
	}

        if(frm_search.seq_length[1].checked) // LIMIT length button clicked
        {
		frm_search.limit_seq_length.value = trimSpaces(frm_search.limit_seq_length.value);
                if(frm_search.limit_seq_length.value == "")
                {
                        alert("Please enter a length limit you want");
                        return false;    
                }

                if(!allDigits(frm_search.limit_seq_length.value))
                {           
                        alert("Please enter a number for the length you wish to limit");
                        return false;
                }          

		if(frm_search.limit_seq_length.value <= 0)
		{
                        alert("Please enter a number greater than 0 for the length you wish to limit");
                        return false;
		}

                if(frm_search.datafilter[0].checked && frm_search.limit_seq_length.value <= 10)
		{
                        alert("Please enter a number greater than 10 for the length you wish to limit");
			return false;
		}
        }	


	return true;
}
