function makeMap(type){
	//var visdatalist = ",ad1,ad2,tp1,tp11,tp13,tp14,ad3,brm5,soilus,tr2,tr1a,tr1b,ad6|ad6p,bm4,bm10,brm9,brm8,gl9,tximage,tximage2,tximage3,tximage4,tximage5,bm1,";
	var visdatalist = ",ad1,ad2,ad3,brm5,soilna,tp1,tr2,tr1a,tr1b,ad6|ad6p,bm4,bm10,brm9,brm8,gl9,hydro,bm1,nap07,";
	var novisdatalist = "";

	if(type == "a") {
		var aoiListObj = document.frmAOI.aoiList;
		var mapExt = aoiListObj.options[aoiListObj.selectedIndex].value;
		var mapExtName = aoiListObj.options[aoiListObj.selectedIndex].text;
		var mapURL = "http://www.soilsurvey.org/maproom/soilreport/layerParam.asp?AOITYPE=county";
		mapURL += "&DATA="+visdatalist+"&EXTENT=" + mapExt + "&EXTNAME=" + mapExtName + "&APP=SOILREPT";
	} else if (type == "b") {
		var twnList = document.frmAOI.township;
		var rngList = document.frmAOI.range;
		var secList = document.frmAOI.section;
		var mapExt = secList.options[secList.selectedIndex].value;

		var township = twnList.options[twnIndex].text;
		var range = rngList.options[rngIndex].text;
		var section = secList.options[secList.selectedIndex].text;
		var mapExtName = escape(township + "," + range + "," + section);

		//visdatalist += "sl2,";
		var mapURL = "http://www.soilsurvey.org/maproom/soilreport/layerParam.asp?AOITYPE=plss";
		mapURL += "&DATA="+visdatalist+"&MOREDATA=" + novisdatalist + "&EXTENT=" + mapExt + "&EXTNAME=" + mapExtName + "&APP=SOILREPT";
	} else if (type == "c") {
	     // add = trim(document.frmAOI.Address.value);
		//  add = "";
	     // zone = trim(document.frmAOI.zipcode.value);
		//novisdatalist += "sl2,";
		//var mapURL = "http://www.soilsurvey.org/maproom/soilconserve/geocode.html?ADDRESS="g"+zone + "&DATA=" + visdatalist + "&MOREDATA=" + novisdatalist + "&APP=SOILREPT";
		var aoiListObj = document.frmAOI.zipcode;
		var mapExt = aoiListObj.options[aoiListObj.selectedIndex].value;
		var mapExtName = aoiListObj.options[aoiListObj.selectedIndex].text;
		//novisdatalist += "soilus,";
		var mapURL = "http://www.soilsurvey.org/maproom/soilreport/layerParam.asp?AOITYPE=county";
		mapURL += "&DATA="+visdatalist+"&MOREDATA=" + novisdatalist + "&EXTENT=" + mapExt + "&EXTNAME=" + mapExtName + "&APP=SOILREPT";
	}else if (type == "d") {
		var mapExt = setLatLon();
		var mapExtName = document.frmAOI.latitude.value + "," + document.frmAOI.longitude.value;
		//visdatalist += "sl2,";
		var mapURL = "http://www.soilsurvey.org/maproom/soilreport/layerParam.asp?AOITYPE=latlon";
		mapURL += "&DATA="+visdatalist+"&MOREDATA=" + novisdatalist + "&EXTENT=" + mapExt + "&EXTNAME=" + mapExtName + "&APP=SOILREPT";
	}

	var w = Math.min(screen.availWidth,1280)-10;
	var h = Math.min(screen.availHeight,1024)-80;
	//window.open(mapURL,"mapW","width="+w+",height="+h+",resizable=1,status=1,top=0,left=0,toolbar=1,menubar=1,status=1,addressbar=1");
//alert(mapURL);
	document.location = mapURL;	
	
}
function makeMaptrs(type)
{
	//var visList = ",ad1,ad22,ad3,tp1,tp11,tr2,tr1a,tr1b,nap07,";
	//var visList = ",ad1,ad22,ad3,brm5,soilna,tp1,tr2,tr1a,tr1b,ad6|ad6p,bm4,bm10,brm9,brm8,gl9,tximage,tximage2,tximage3,tximage4,tximage5,bm1,npa07,";
	var visdatalist = ",ad1,ad2,ad3,brm5,soilna,tp1,tr2,tr1a,tr1b,ad6|ad6p,bm4,bm10,brm9,brm8,gl9,hydro,bm1,nap07,";
	var novisdatalist = "";
	//alert(document.frmAOI.range.selectedIndex + "+" + document.frmAOI.section.selectedIndex);
	if (document.frmAOI.township.selectedIndex > 0) 
	{ }
		if (document.frmAOI.range.selectedIndex > 0)
		{ }
			if (document.frmAOI.section.selectedIndex > 0)
			{
			var twnList = document.frmAOI.township;
			var rngList = document.frmAOI.range;
			var secList = document.frmAOI.section;
			var mapExt1 = secList.options[secList.selectedIndex].value;
			var mapExt = "TRS:TRS:" + mapExt1
				var township = twnList.options[twnIndex].value;
				var range = rngList.options[rngIndex].value;
				var section = secList.options[secList.selectedIndex].value;
				var mapExtName = escape(township + "," + range + "," + section);


				var mapURL2 = "http://www.soilsurvey.org/maproom/soilreport/layerParam.asp?AOITYPE=plss";
				mapURL2 += "&DATA="+visdatalist+"&MOREDATA=" + novisdatalist + "&EXTENT=" + mapExt + "&APP=SOILREPT";
				var w = Math.min(screen.availWidth,1280)-10;
				var h = Math.min(screen.availHeight,1024)-80;
				document.location = mapURL2;	
			}
			else
			{
			alert("You need to select a value from the select box first!");
			} 

}
function extractValue(aString,name){
	var startpos = 0;
	var endpos = 0;
	name += "=";
	var pos = aString.indexOf(name);
	var value = "";

	if(pos != -1){
		startpos = pos + name.length;
		endpos = aString.indexOf("&",startpos)
		if (endpos == -1)
			endpos = aString.length;
		value = aString.substring(startpos,endpos);
	}
	return value;
}

function trim(string){
	while((string.length > 0) && (string.indexOf(" ") == 0))
		string = string.substring(1,string.length);

	while((string.length > 0) && (string.lastIndexOf(" ") == (string.length - 1)))
		string = string.substring(1,string.length -1);


	return string;
}

function setLatLon() {
	var latVal = document.frmAOI.latitude.value;
	var lonVal = document.frmAOI.longitude.value;

	if( (latVal == "") && ((lonVal == "") || (lonVal == "-")) )
		return;

//Trim the leading and tailing blanks, convert to real numbers.
	lat = parseFloat(trim(latVal));
	lon = parseFloat(trim(lonVal));

	//validating values
	var status = "ok";
	if ((latVal == null) || (latVal == "") || !isNumber(latVal))
		status = "Invalid latitude/longitude value entry.";

	if((lat > 40.5) || (lat < 36))
		status = "Specified latitude/longitude location outside of Missouri.";

	if((lonVal == null) || (lonVal == "") || !isNumber(lonVal))
		status = "Invalid latitude/longitude value entry.";

	if(lon > 0)
		lonVal = "-" + lonVal;

	if( (lon > (-89.1)) || (lon < (-95.8)) )
		status = "Specified latitude/longitude location outside of Missouri.";

	if(status != "ok"){
		openErrWin("latlonlist", latVal+","+lonVal, status);

	}else{
		var theTxt = "Latitude: " + latVal + ", Longitude: " + lonVal;
		var xy = GeoToAlbers(lat,lon,0);
		var d = 1000;
		var ext = (xy[0] - d) + "," + (xy[1] - d) + "," + (xy[0] - (-d)) + "," + (xy[1] - (-d));

		return ext;
	}
}

function isNumber(string) {
    if (!string) return false;
    var Chars = "-.0123456789";

    for (var i = 0; i < string.length; i++) {
       if (Chars.indexOf(string.charAt(i)) == -1)
          return false;
    }
    return true;
}

//
function ShowValue()
{
var aoiListObj = document.frmAOI.aoiList;
	var str = aoiListObj.options[aoiListObj.selectedIndex].value;
	if (str.length > 0)
	{ 	
		cnty = str.split("|")
		cntylist = cnty[0];
		//alert(cntylist);
		window.location.href = "countylist.asp?sid=" + Math.random() + "&q=" + cnty
	}
}
//
