var w = window;
var d = document;
var f = d.forms[0];
var eSelect;
var eOption;
var eTable;
var eTBody;
var eRow;
var eCell;
var blnSummary = false;

///////////////////////////////////////////////////////////////////////////////////////
function initialize()
{	d.getElementById('radioMunicipalities').checked = true;
	d.getElementById('radioRiskAreas').checked = false;
	d.getElementById('radioHerbicides').checked = true;
	d.getElementById('radioInsecticides').checked = false;
	d.getElementById('radioFungicides').checked = false;
	d.getElementById('radioPesticidesGroups').checked = false;
	d.getElementById('radioPesticidesNames').checked = true;
	d.getElementById('textRegions').firstChild.data = 'Selected: *NONE';
	d.getElementById('textRegions').style['color'] = 'green';
	d.getElementById('textCrops').firstChild.data = 'Selected: *NONE';
	d.getElementById('textCrops').style['color'] = 'green';
	d.getElementById('textPesticides').firstChild.data = 'Selected: *NONE';
	d.getElementById('textPesticides').style['color'] = 'green';
	d.getElementById('textFromYear').firstChild.data = 'Selected: ---- to ----';
	d.getElementById('textFromYear').style['color'] = 'green';
	d.getElementById('dataRegions').value = '';
	d.getElementById('dataCrops').value = '';
	d.getElementById('dataPesticides').value = '';
	d.getElementById('textResultsRows').firstChild.data = '0';
	populateRegions();
	populatePesticides();
	populateFromYear();
	populateToYear();
	populateCrops();
	
	window.scroll(0, 0);
}

///////////////////////////////////////////////////////////////////////////////////////
function populateCrops()
{	var listName = 'Crops';
	
	showLoadingList(listName);
		
	var parameters = '&&List=' + listName + '&&';
	
	getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + '/mmpp.nsf/agentSearchPesticide?OpenAgent', parameters, listName);
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populateRegions()
{	var listName = 'Regions';
	
	var parameters = '&&List=' + listName + '&&Region=';

	if(d.getElementById('radioMunicipalities').checked)
	{	parameters = parameters + 'M';
	} else
	{	if(d.getElementById('radioRiskAreas').checked)
		{	parameters = parameters + 'R';
		} else
		{	return;
		}
	}
	
	showLoadingList(listName);
	
	parameters = parameters + '&&';
	
	getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + '/mmpp.nsf/agentSearchPesticide?OpenAgent', parameters, listName);
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populatePesticides()
{	var listName = 'Pesticides';
	
	var parameters = '&&List=' + listName + '&&Pesticide=';

	if(d.getElementById('radioHerbicides').checked)
	{	parameters = parameters + 'H';
	} else
	{	if(d.getElementById('radioInsecticides').checked)
		{	parameters = parameters + 'I';
		} else
		{	if(d.getElementById('radioFungicides').checked)
			{	parameters = parameters + 'F';
			} else
			{	return;
			}
		}
	}
	
	parameters = parameters + '&&GroupsOrNames=';
	
	if(d.getElementById('radioPesticidesGroups').checked)
	{	parameters = parameters + 'G';
	} else
	{	if(d.getElementById('radioPesticidesNames').checked)
		{	parameters = parameters + 'N';
		} else
		{	return;
		}
	}
	
	showLoadingList(listName);
	
	parameters = parameters + '&&';
	
	getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + '/mmpp.nsf/agentSearchPesticide?OpenAgent', parameters, listName);
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populateFromYear()
{	var listName = 'FromYear';
	
	showLoadingList(listName);
	
	var parameters = '&&List=' + listName + '&&';
	
	getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + '/mmpp.nsf/agentSearchPesticide?OpenAgent', parameters, listName);
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populateToYear()
{	var listName = 'ToYear';
	
	showLoadingList(listName);
	
	var parameters = '&&List=' + listName + '&&';
	
	getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + '/mmpp.nsf/agentSearchPesticide?OpenAgent', parameters, listName);
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populateSearchResults(mode)
{	var blnPass = true;
	if(trim(d.getElementById('dataRegions').value) == '')
	{	d.getElementById('textRegions').firstChild.data = 'ERROR: At least one region must be selected.';
		d.getElementById('textRegions').style['color'] = 'green';
		blnPass = false;
	}
	
	if(trim(d.getElementById('dataCrops').value) == '')
	{	d.getElementById('textCrops').firstChild.data = 'ERROR: At least one crop must be selected.';
		d.getElementById('textCrops').style['color'] = 'green';
		blnPass = false;
	}
	
	if(trim(d.getElementById('dataPesticides').value) == '')
	{	d.getElementById('textPesticides').firstChild.data = 'ERROR: At least one pesticide must be selected.';
		d.getElementById('textPesticides').style['color'] = 'green';
		blnPass = false;
	}
	
	var strFromYear = trim(d.getElementById('listFromYear')[d.getElementById('listFromYear').selectedIndex].text);
	
	var strToYear = trim(d.getElementById('listToYear')[d.getElementById('listToYear').selectedIndex].text);
	if(strFromYear == '----')
	{	d.getElementById('textFromYear').firstChild.data = 'ERROR: The start year must be selected.';
		d.getElementById('textFromYear').style['color'] = 'green';
		blnPass = false;
	} else
	{	if(strToYear != '----' && strFromYear > strToYear)
		{	d.getElementById('textFromYear').firstChild.data = 'ERROR: The end year cannot be greater than the start year.';
			d.getElementById('textFromYear').style['color'] = 'green';
			blnPass = false;
		}
	}
	
	if(blnPass == false)
	{	return;
	}
	
	switch (mode)
	{	case 'download':
			break;
		default:
			showLoadingTable();
			
			d.getElementById('divParameters').style['visibility']='hidden';
			d.getElementById('divParameters').style['display']='none';
			d.getElementById('divResult').style['visibility']='visible';
			d.getElementById('divResult').style['display']='block';
			
			d.getElementById('textResultsRows').firstChild.data = '0';
	
			window.scroll(0, 0);
	}
	
	var listName = 'SearchResults';
	
	var parameters = '&&List=' + listName;
	switch (true)
	{	case d.getElementById('radioMunicipalities').checked:
			parameters = parameters + '&&RegionsType=M';
			break;
		case 	d.getElementById('radioRiskAreas').checked:
			parameters = parameters + '&&RegionsType=R';
			break;
		default:
			parameters = parameters + '&&RegionsType=?';
	}
	parameters = parameters + '&&Regions=' + d.getElementById('dataRegions').value;
	parameters = parameters + '&&Crops=' + d.getElementById('dataCrops').value;
	switch (true)
	{	case d.getElementById('radioHerbicides').checked:
			parameters = parameters + '&&PesticidesType=H';
			break;
		case 	d.getElementById('radioInsecticides').checked:
			parameters = parameters + '&&PesticidesType=I';
			break;
		case 	d.getElementById('radioFungicides').checked:
			parameters = parameters + '&&PesticidesType=F';
			break;
		default:
			parameters = parameters + '&&PesticidesType=?';
	}
	switch (true)
	{	case d.getElementById('radioPesticidesGroups').checked:
			parameters = parameters + '&&PesticidesGroupsOrNames=G';
			break;
		case 	d.getElementById('radioPesticidesNames').checked:
			parameters = parameters + '&&PesticidesGroupsOrNames=N';
			break;
		default:
			parameters = parameters + '&&PesticidesGroupsOrNames=?';
	}
	
	parameters = parameters + '&&Pesticides=' + d.getElementById('dataPesticides').value;
	parameters = parameters + '&&Range=' + trim(d.getElementById('listFromYear')[d.getElementById('listFromYear').selectedIndex].text) + ',' + trim(d.getElementById('listToYear')[d.getElementById('listToYear').selectedIndex].text);
	parameters = parameters + '&&';
	
	var URL = '/mmpp.nsf/agentSearchPesticide?OpenAgent'
	switch (mode)
	{	case 'download':
			location.href = URL + parameters;
			break;
		default:
			getRequestViaHTTP(w.location.protocol + '//' + w.location.hostname + URL, parameters, listName);
	}
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function populateList(listName, responseText)
{	switch (listName)
	{	case 'SearchResults':
			populateSearchResultsText(responseText);
			break;
		default:
			populateListText(listName, responseText);
	}
}

function populateSearchResultsText(responseText)
{	d.getElementById("farmSummary").firstChild.data = "0";
	d.getElementById('farmSummary').style['color'] = 'black';
	d.getElementById("acresSummary").firstChild.data = "0.0";
	d.getElementById("yieldAvgMetricSummary").firstChild.data = "0.000";
	d.getElementById("yieldAvgImperialSummary").firstChild.data = "0";
	d.getElementById("yieldAvgImperialuofmSummary").firstChild.data = "yield";
	
	var fieldName;
	var arrayEntry = new(Array);
	var arrayResponse = new(Array);
	
	blnSummary = false;
	
	arrayResponse = responseText.split(/\r/);
	
	var numberRows = 0;
	if(arrayResponse.length > 3)
	{	numberRows = arrayResponse.length - 3;
	}
	d.getElementById('textResultsRows').firstChild.data = numberRows.toString();
	
	eTable = d.getElementById('displayTable');
	eTBody = d.getElementById('displayTBody');
	eTable.removeChild(eTBody);
	
	eTBody = d.createElement('tbody');
	eTBody.id = 'displayTBody';
	eTBody.name = 'displayTBody';
	eTable.appendChild(eTBody);
	
	// Headings and Details
	for(var i = 0; i < arrayResponse.length; i++)
	{	eRow = d.createElement('tr');
		eRow.width ='600';
		if((i / 2) == round(i / 2, 0))
		{	eRow.style['background'] = '#FDFDFD';
		} else
		{	eRow.style['background'] = '#DCEED8';
		}
		
		eTBody.appendChild(eRow);
	
		arrayEntry = arrayResponse[i].split(/\t/);
		
		for(var j = 0; j < arrayEntry.length; j++)
		{	eCell = d.createElement('td');
			eCell.noWrap = true;
			
			if(j == 0 && arrayEntry.length == 1)
			{	if(trim(arrayEntry[0]) == 'Summary')
				{	blnSummary = true;
				} else
				{	eCell.appendChild(d.createTextNode('* * *   ' + trim(arrayEntry[0]) + '   * * *'));
					eCell.colSpan = '15';
					eCell.align = 'center';
				}
			} else
			{	if(blnSummary != true)
				{	if(j == 4 && trim(arrayEntry[j]) == 'Below')
					{	eCell.appendChild(d.createTextNode('* * *   Below Minimum Tolerance of 500 Acres OR 3 Farms   * * *'));
						eCell.colSpan = '7';
						eCell.align = 'center';
						j = arrayEntry.length;
					} else
					{	if((j == 8) && trim(arrayEntry[j]) == 'Non-Standard')
						{	eCell.appendChild(d.createTextNode('* * *   Non-Standard   * * *'));
							eCell.align = 'center';
							j = j + 1;
						} else
						{	if(j == 6 || j == 8)
							{	eCell.appendChild(d.createTextNode(trim(arrayEntry[j]) + ' ' + trim(arrayEntry[j + 1])));
								eCell.align = 'right';
								j = j + 1;
							} else
							{	eCell.appendChild(d.createTextNode(trim(arrayEntry[j])));
								if(j >= 4)
								{		eCell.align = 'right';
								}
							}
						}
					}
				} else
				{	// Summary Tab
					switch (j)
					{	case 4:
							fieldName = "farmSummary"
							if(trim(arrayEntry[4]) == 'Below')
							{	d.getElementById(fieldName).firstChild.data = 'Below Minimum Tolerance (3) for';
							} else
							{	d.getElementById(fieldName).firstChild.data = arrayEntry[j];
							}
							break;
						case 5:
							fieldName = "acresSummary"
							if(trim(arrayEntry[4]) == 'Below')
							{	d.getElementById(fieldName).firstChild.data = 'Below Minimum Tolerance (500) for';
							} else
							{	var bmtCheck = (arrayEntry[j]);
								bmtCheck = stripCommas(bmtCheck);
								bmtCheck = parseFloat(bmtCheck);
								bmtCheck = bmtCheck.toFixed(0);
								d.getElementById(fieldName).firstChild.data = addCommas(bmtCheck);
							}
							break;
						case 6:
							fieldName = "yieldAvgMetricSummary"
							if(trim(arrayEntry[4]) == 'Below')
							{	// continue
							} else
							{	var yieldAvgMetricSummary = (formatNumber(arrayEntry[j], 3, 0));
								//yieldAvgMetricSummary = parseFloat(yieldAvgMetricSummary);
								//yieldAvgMetricSummary = yieldAvgMetricSummary.toFixed(3);
								d.getElementById(fieldName).firstChild.data = yieldAvgMetricSummary;
							}
							break;
						case 8:
							fieldName = "yieldAvgImperialSummary"
							if(trim(arrayEntry[4]) == 'Below')
							{	// continue
							} else
							{	switch(trim(arrayEntry[j+1]))
								{	case "Bushels":
										var yieldAvgImperialSummary = (formatNumber(arrayEntry[j], 1, 0));
										//yieldAvgImperialSummary = parseFloat(yieldAvgImperialSummary);
										//yieldAvgImperialSummary = yieldAvgImperialSummary.toFixed(1);
										d.getElementById(fieldName).firstChild.data = yieldAvgImperialSummary;
										break;
									case "Pounds":
										var yieldAvgImperialSummary = (formatNumber(arrayEntry[j], 0, 0));
										//yieldAvgImperialSummary = parseFloat(yieldAvgImperialSummary);
										//yieldAvgImperialSummary = yieldAvgImperialSummary.toFixed(0);
										d.getElementById(fieldName).firstChild.data = yieldAvgImperialSummary;
										break;
									case "CWT":
										var yieldAvgImperialSummary = (formatNumber(arrayEntry[j], 2, 0));
										//yieldAvgImperialSummary = parseFloat(yieldAvgImperialSummary);
										//yieldAvgImperialSummary = yieldAvgImperialSummary.toFixed(2);
										d.getElementById(fieldName).firstChild.data = yieldAvgImperialSummary;
										break;
									case "Tons":
										var yieldAvgImperialSummary = (formatNumber(arrayEntry[j], 3, 0));
										//yieldAvgImperialSummary = parseFloat(yieldAvgImperialSummary);
										//yieldAvgImperialSummary = yieldAvgImperialSummary.toFixed(3);
										d.getElementById(fieldName).firstChild.data = yieldAvgImperialSummary;
										break;
									case "Measure":
										var yieldAvgImperialSummary = (formatNumber(arrayEntry[j], 3, 0));
										//yieldAvgImperialSummary = parseFloat(yieldAvgImperialSummary);
										//yieldAvgImperialSummary = yieldAvgImperialSummary.toFixed(3);
										d.getElementById(fieldName).firstChild.data = 'Non-Standard Measure';
										break;
								}
							}
							break;
						case 9:
							fieldName = "yieldAvgImperialuofmSummary"
							if(trim(arrayEntry[4]) == 'Below')
							{	// continue
							} else
							{	switch(trim(arrayEntry[j]))
								{	case "Measure":
										d.getElementById(fieldName).firstChild.data = '';
										break;
									default:
										d.getElementById(fieldName).firstChild.data = (arrayEntry[j]);
								}
							}
							break;
						default:
							fieldName = "";
					}
				}
			}
			
			if(blnSummary != true)
			{	eRow.appendChild(eCell);
				
				if (j < (arrayEntry.length - 1))
				{	eCell = d.createElement('td');
					eCell.appendChild(d.createTextNode("\u00a0\u00a0"));
					eRow.appendChild(eCell);
				}
			}
		}
	}
	
	// End of Data
	if(arrayResponse.length > 1)
	{	eRow = d.createElement('tr');
		if((arrayResponse.length / 2) == round(arrayResponse.length / 2, 0))
		{	eRow.style['background'] = '#FDFDFD';
		} else
		{	eRow.style['background'] = '#DCEED8';
		}
		eTBody.appendChild(eRow);
		
		eCell = d.createElement('td');
		eCell.appendChild(d.createTextNode('* * *   End   Of   Data   * * *'));
		eCell.colSpan = '15';
		eCell.align = 'center';
	
		eRow.appendChild(eCell);
	}
}

///////////////////////////////////////////////////////////////////////////////////////
function populateListText(listName, responseText)
{	var arrayEntry = new(Array);
	var arrayResponse = new(Array);
	arrayResponse = responseText.split(/\r/);
		
	// Remove the data from the listbox.
	var parent = d.getElementById('div' + listName);
	var child = d.getElementById('list' + listName);
	parent.removeChild(child);
	
	eSelect = d.createElement('select');
	eSelect.name = 'list' + listName;
	eSelect.id = 'list' + listName;
	addonChange(eSelect);
	switch (true)
	{	case listName == 'Pesticides':
			eSelect.style['width'] = '300px';
			if(d.getElementById("radioPesticidesNames").checked)
			{	eSelect.multiple = true;
			}
			eSelect.size = 11;
			break;
		case listName == 'Regions' || listName == 'Crops':
			eSelect.style['width'] = '300px';
			eSelect.multiple = true;
			eSelect.size = 10;
			break;
		case listName == 'FromYear' || listName == 'ToYear':
			eSelect.style['width'] = '55px';
			break;
	}
	parent.appendChild(eSelect);	
	
	for(var i = 0; i < arrayResponse.length; i++)
	{	eOption = d.createElement('option')
		arrayEntry = arrayResponse[i].split(/\t/);
		eOption.value = arrayEntry[1];
		eSelect.appendChild(eOption);
		eOption.appendChild(d.createTextNode(arrayEntry[0]));
	}
		
	switch (true)
	{	case listName == 'Regions' || listName == 'Crops' || listName == 'Pesticides':
			d.getElementById('text' + listName).firstChild.data = 'Selected: *NONE';
			d.getElementById('text' + listName).style['color'] = 'green';
			d.getElementById('data' + listName).value = '';
			break;
		case listName == 'FromYear':
			d.getElementById('text' + listName).firstChild.data = 'Selected: ---- to ----';
			d.getElementById('text' + listName).style['color'] = 'green';
			break;
	}
	
	return;
}

///////////////////////////////////////////////////////////////////////////////////////
function addonChange(obj)
{	if (obj.addEventListener)
	{	// Mozilla, Firefox, Netscape, etc.
		obj.addEventListener("change", showCriteria , false);
	} else
	{	if (obj.attachEvent)
		{	// Internet Explorer
			obj.attachEvent("onchange", showCriteria);
		}
	}
}

///////////////////////////////////////////////////////////////////////////////////////
function showCriteria(evt)
{	var triggeredBy = "";
	var textList = "";
	var dataList = "";
	
	if (evt["target"])
	{	 // Mozilla, Firefox, Netscape, etc.
		triggeredBy = evt["target"]["id"];
	} else
	{	if (evt["srcElement"])
		{	// Internet Explorer
			triggeredBy = evt["srcElement"]["id"];
		} else
		{	alert("ERROR: Unable to process this request.");
			return;
		}
	}
	
	for(var i=0; i < d.getElementById(triggeredBy).length; i++)
	{	if(d.getElementById(triggeredBy)[i].selected)
		{	if(textList != '')	{	textList = textList + ', ';	}
			textList = textList + trim(d.getElementById(triggeredBy)[i].text);
			
			if(dataList != '')	{	dataList = dataList + ',';	}
			dataList = dataList + trim(d.getElementById(triggeredBy)[i].value);
			
			if(i==0 && trim(d.getElementById(triggeredBy)[i].value) == '*')
			{	i = d.getElementById(triggeredBy).length;
			}
		}
	}
	
	var listName = triggeredBy.substr(4,triggeredBy.length - 4);
	if(listName == 'Pesticides')
	{	if(d.getElementById("radioHerbicides").checked)
		{	textList = 'Herbicide(s) ' + textList;
		}
		if(d.getElementById("radioInsecticides").checked)
		{	textList = 'Insecticide(s) ' + textList;
		}
		if(d.getElementById("radioFungicides").checked)
		{	textList = 'Fungicide(s) ' + textList;
		}
	}	
	switch (true)
	{	case listName == 'Regions' || listName == 'Crops' || listName == 'Pesticides':
			d.getElementById('text' + triggeredBy.substr(4,triggeredBy.length - 4)).firstChild.data = 'Selected: ' + textList;
			d.getElementById('text' + triggeredBy.substr(4,triggeredBy.length - 4)).style['color'] = 'green';
			d.getElementById('data' + triggeredBy.substr(4,triggeredBy.length - 4)).value = dataList;
			break;
		case listName == 'FromYear' || listName == 'ToYear':
			d.getElementById('textFromYear').firstChild.data = 'Selected: ' + trim(d.getElementById('listFromYear')[d.getElementById('listFromYear').selectedIndex].text) + ' to ' + trim(d.getElementById('listToYear')[d.getElementById('listToYear').selectedIndex].text);
			d.getElementById('textFromYear').style['color'] = 'green';
			break;
	}
}

///////////////////////////////////////////////////////////////////////////////////////
function newSearch()
{	d.getElementById('divResult').style['visibility']='hidden';
	d.getElementById('divResult').style['display']='none';
	d.getElementById('divParameters').style['visibility']='visible';
	d.getElementById('divParameters').style['display']='block';
	
	d.getElementById("farmSummary").firstChild.data = "loading...";
	d.getElementById('farmSummary').style['color'] = 'red';
	d.getElementById("acresSummary").firstChild.data = "0.0";
	d.getElementById("yieldAvgMetricSummary").firstChild.data = "0.000";
	d.getElementById("yieldAvgImperialSummary").firstChild.data = "0";
	d.getElementById("yieldAvgImperialuofmSummary").firstChild.data = "yield";
	
	window.scroll(0, 0);
}

///////////////////////////////////////////////////////////////////////////////////////
function showLoadingList(listName)
{	// Remove the data from the listbox.
	var parent = d.getElementById('div' + listName);
	var child = d.getElementById('list' + listName);
	parent.removeChild(child);
	
	eSelect = d.createElement('select');
	eSelect.name = 'list' + listName;
	eSelect.id = 'list' + listName;
	switch (true)
	{	case listName == 'Pesticides':
			eSelect.style['width'] = '300px';
			eSelect.size = 11;
			break;
		case listName == 'Regions' || listName == 'Crops':
			eSelect.style['width'] = '300px';
			eSelect.size = 10;
			break;
		case listName == 'FromYear' || listName == 'ToYear':
			eSelect.style['width'] = '55px';
			break;
	}
	parent.appendChild(eSelect);	
	eOption = d.createElement('option')
	eOption.style['color'] = 'red'
	eSelect.appendChild(eOption);
	eOption.appendChild(d.createTextNode('loading...'));
}

///////////////////////////////////////////////////////////////////////////////////////
function copySummary() {
var regionSummary = d.getElementById("textRegions").firstChild.data;
d.getElementById("regionSummary").firstChild.data = regionSummary;
var cropSummary = d.getElementById("textCrops").firstChild.data;
d.getElementById("cropSummary").firstChild.data = cropSummary;
var pesticideSummary = d.getElementById("textPesticides").firstChild.data;
d.getElementById("pesticideSummary").firstChild.data = pesticideSummary;
var fromYearSummary = d.getElementById("textFromYear").firstChild.data;
if(fromYearSummary.substr(18,4) == "----")
{	fromYearSummary = fromYearSummary.substr(0,18) + fromYearSummary.substr(10,4)
}
d.getElementById("fromYearSummary").firstChild.data = fromYearSummary;
}