function submit_form(form)
{
form.elements[3].value=form.reference1.value;
if (form.reference2.value != "")
	{
	form.elements[3].value+="/";
	form.elements[3].value+=form.reference2.value;
	}
if (form.reference3.value != "")
	{
	form.elements[3].value+="/";
	form.elements[3].value+=form.reference3.value;
	}
form.elements[4].value=form.rep1.value;
if (form.rep2.value != "")
	{
	form.elements[4].value+=" ";
	form.elements[4].value+=form.rep2.value;
	}
if (form.rep3.value != "")
	{
	form.elements[4].value+="/";
	form.elements[4].value+=form.rep3.value;
	}
if (form.keywords.value != "")
	{
	var ind=form.keywords_option.selectedIndex;
	if (ind==0)
		{
		form.elements[5].value="7";
		form.elements[6].value=put_commas(form.keywords.value);
		}
	else if (ind==1)
		{
		form.elements[5].value="8";
		form.elements[6].value=put_commas(form.keywords.value);
		}
	else if (ind==2)
		{
		form.elements[5].value="7";
		form.elements[6].value=form.keywords.value;
		}
	}
ind1=form.start_year.selectedIndex;
ind2=form.start_month.selectedIndex;
ind3=form.end_year.selectedIndex;
ind4=form.end_month.selectedIndex;
ind5=form.start_day.selectedIndex;
ind6=form.end_day.selectedIndex;
form.elements[9].value=form.start_year.options[ind1].value+"-"+form.start_month.options[ind2].value+"-"+form.start_day.options[ind5].value+","+form.end_year.options[ind3].value+"-"+form.end_month.options[ind4].value+"-"+form.end_day.options[ind6].value;
//alert(form.elements[8].value);
form.submit();
}

function put_commas(str)
{
var ret_str="";
var str1=Trim(str);
var c;
var j;
for (var i=0; i<str1.length; i++)
	{
	c=str1.charAt(i);
	if (c != ' ')
		{
		ret_str+=c;
		}
	else
		{
		j=ret_str.length-1;
		if (j>=0 && ret_str.charAt(j) != ' ')
			{
			ret_str+=", ";
			}
		}
	}
return ret_str;
}

function Trim(s) 
{
// Remove leading spaces and carriage returns
while ((s.substring(0,1) == ' ') || (s.substring(0,1) == '\n') || (s.substring(0,1) == '\r'))
{ s = s.substring(1,s.length); }

// Remove trailing spaces and carriage returns
while ((s.substring(s.length-1,s.length) == ' ') || (s.substring(s.length-1,s.length) == '\n') || (s.substring(s.length-1,s.length) == '\r'))
{ s = s.substring(0,s.length-1); }

return s;
}