function show_subset(type, Subform, shrt) 
{
   type = type*1;
   var forms_str = Array();
   forms_str[1] = " Please select a date range for the observation date.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"    <span style=\"font-size:12px\"><strong>Surveys Observed</strong></span><br>Between <span style=\"margin-left:25px\">And</span><br>\n"+
		"    <input style=\"font-size:10px\" id=\"SStartDate\" name=\"SStartDate\" size=\"12\" value=\""+Subform.SS_ObsStrt.value+"\" onClick=\"show_calendar('document.DSSForm.SStartDate', document.DSSForm.SStartDate.value);\" >\n"+
		"    <input style=\"font-size:10px\" id=\"SStopDate\" name=\"SStopDate\" size=\"12\" value=\""+Subform.SS_ObsStop.value+"\" onClick=\"show_calendar('document.DSSForm.SStopDate', document.DSSForm.SStopDate.value);\" ><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
   forms_str[2] = " Please select a date range for the submitted date.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"    <span style=\"font-size:12px\"><strong>Surveys Submitted</strong></span><br>Between <span style=\"margin-left:25px\">And</span><br>\n"+
		"    <input style=\"font-size:10px\" id=\"SStartDate\" name=\"SStartDate\" size=\"12\" value=\""+Subform.SS_SbmtStrt.value+"\" onClick=\"show_calendar('document.DSSForm.SStartDate', document.DSSForm.SStartDate.value);\" >\n"+
		"    <input style=\"font-size:10px\" id=\"SStopDate\" name=\"SStopDate\" size=\"12\" value=\""+Subform.SS_SbmtStop.value+"\" onClick=\"show_calendar('document.DSSForm.SStopDate', document.DSSForm.SStopDate.value);\" ><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";

   forms_str[3] = " Please select the State and County (optional).<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"    <span style=\"font-size:12px\"><strong>State:</strong></span><br>\n"+
		"    <select style=\"font-size:10px\" id=\"State\" name=\"State\" size=\"1\" onChange=\"fillCounties(this.value,'County');\">\n"+
		"      <option value=\"0\" selected>*** Any State ***</option>\n"+
		"      <option value=\"1\">Alabama</option>\n"+
		"      <option value=\"2\">Alaska</option>\n"+
		"      <option value=\"4\">Arizona</option>\n"+
		"      <option value=\"5\">Arkansas</option>\n"+
		"      <option value=\"6\">California</option>\n"+
		"      <option value=\"8\">Colorado</option>\n"+
		"      <option value=\"9\">Connecticut</option>\n"+
		"      <option value=\"10\">Delaware</option>\n"+
		"      <option value=\"11\">District of Columbia</option>\n"+
		"      <option value=\"12\">Florida</option>\n"+
		"      <option value=\"13\">Georgia</option>\n"+
		"      <option value=\"15\">Hawaii</option>\n"+
		"      <option value=\"16\">Idaho</option>\n"+
		"      <option value=\"17\">Illinois</option>\n"+
		"      <option value=\"18\">Indiana</option>\n"+
		"      <option value=\"19\">Iowa</option>\n"+
		"      <option value=\"20\">Kansas</option>\n"+
		"      <option value=\"21\">Kentucky</option>\n"+
		"      <option value=\"22\">Louisiana</option>\n"+
		"      <option value=\"23\">Maine</option>\n"+
		"      <option value=\"24\">Maryland</option>\n"+
		"      <option value=\"25\">Massachusetts</option>\n"+
		"      <option value=\"26\">Michigan</option>\n"+
		"      <option value=\"27\">Minnesota</option>\n"+
		"      <option value=\"28\">Mississippi</option>\n"+
		"      <option value=\"29\">Missouri</option>\n"+
		"      <option value=\"30\">Montana</option>\n"+
		"      <option value=\"31\">Nebraska</option>\n"+
		"      <option value=\"32\">Nevada</option>\n"+
		"      <option value=\"33\">New Hampshire</option>\n"+
		"      <option value=\"34\">New Jersey</option>\n"+
		"      <option value=\"35\">New Mexico</option>\n"+
		"      <option value=\"36\">New York</option>\n"+
		"      <option value=\"37\">North Carolina</option>\n"+
		"      <option value=\"38\">North Dakota</option>\n"+
		"      <option value=\"39\">Ohio</option>\n"+
		"      <option value=\"40\">Oklahoma</option>\n"+
		"      <option value=\"41\">Oregon</option>\n"+
		"      <option value=\"42\">Pennsylvania</option>\n"+
		"      <option value=\"44\">Rhode Island</option>\n"+
		"      <option value=\"45\">South Carolina</option>\n"+
		"      <option value=\"46\">South Dakota</option>\n"+
		"      <option value=\"47\">Tennessee</option>\n"+
		"      <option value=\"48\">Texas</option>\n"+
		"      <option value=\"49\">Utah</option>\n"+
		"      <option value=\"50\">Vermont</option>\n"+
		"      <option value=\"51\">Virginia</option>\n"+
		"      <option value=\"53\">Washington</option>\n"+
		"      <option value=\"54\">West Virginia</option>\n"+
		"      <option value=\"55\">Wisconsin</option>\n"+
		"      <option value=\"56\">Wyoming</option>\n"+
		"      <option value=\"72\">Puerto Rico</option>\n"+
		"      <option value=\"99\">Mexico</option>\n"+
		"    </select><br><br>\n"+
		"    <span style=\"font-size:12px\"><strong>County:</strong></span><br>\n"+
		"    <select style=\"font-size:10px\" id=\"County\" name=\"County\" size=\"1\" >\n"+
		"      <option value=\"\" selected>*** Any County ***</option>\n"+
		"    </select><br><bR>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   forms_str[4] = " Please select the Collector.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"  <span style=\"font-size:12px\"><strong>Collector:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"Collector\" name=\"Collector\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Collector ***</option>\n"+getLists("Collector",Subform.SS_Coll.value)+
		"  </select><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   forms_str[5] = " Please select the Species.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"  <span style=\"font-size:12px\"><strong>Species:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"Species\" name=\"Species\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Species ***</option>\n"+getLists("Species",Subform.SS_Spec.value)+
		"  </select><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   forms_str[6] = " Please select any or all of the following.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"  <span style=\"font-size:12px\"><strong>National Ownership:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"NatOwn\" name=\"NatOwn\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Ownership ***</option>\n"+
	      "    <option value=\"ALOT\">Native American Allotments</option>\n"+
	      "    <option value=\"ARS\">Agricultural Research station</option>\n"+
	      "    <option value=\"BIA\">Bureau of Indian Affairs</option>\n"+
	      "    <option value=\"BLM\">Bureau of Land Management</option>\n"+
	      "    <option value=\"BPA\">Bonneville Power Administration</option>\n"+
	      "    <option value=\"CGOV\">County Government</option>\n"+
	      "    <option value=\"COE\">U. S. Army Corps of Engineers</option>\n"+
	      "    <option value=\"DOD\">Department of Defense</option>\n"+
	      "    <option value=\"EPA\">Environmental Protection Agency</option>\n"+
	      "    <option value=\"FSR\">USDA Forest Service Research Station</option>\n"+
	      "    <option value=\"NBS\">National Biological Survey</option>\n"+
	      "    <option value=\"NOAA\">National Oceanic and Atmospheric Administration</option>\n"+
	      "    <option value=\"NPS\">National Park Service</option>\n"+
	      "    <option value=\"NRCS\">Natural Resources Conservation Service</option>\n"+
	      "    <option value=\"OTH\">Other</option>\n"+
	      "    <option value=\"PVLA\">Private Landowner</option>\n"+
	      "    <option value=\"SCS\">U.S. Soil Conservation Service (pre NRCS)</option>\n"+
	      "    <option value=\"STAT\">State Lands</option>\n"+
	      "    <option value=\"TNC\">The Nature Conservancy</option>\n"+
	      "    <option value=\"TRIB\">Tribal Lands</option>\n"+
	      "    <option value=\"TVA\">Tennessee Valley Authority</option>\n"+
	      "    <option value=\"UNIV\">University Lands</option>\n"+
	      "    <option value=\"USFS\">United States Forest Service</option>\n"+
	      "    <option value=\"USFW\">United States Fish and Wildlife Service</option>\n"+
	      "    <option value=\"USGS\">United States Geological Survey</option>\n"+
	      "    <option value=\"USOT\">U.S. Government (Other Federal Lands)</option>\n"+
		"  </select><br><bR>\n"+
		"  <span style=\"font-size:12px\"><strong>Local Ownership:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"LocOwn\" name=\"LocOwn\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Ownership ***</option>\n"+
	      "    <option value=\"TITLE\">Private Landowner</option>\n"+
	      "    <option value=\"RES\">&nbsp;&nbsp;- Private Residential</option>\n"+
	      "    <option value=\"PNR\">&nbsp;&nbsp; - Private Non-residential</option>\n"+
	      "    <option value=\"COM\">&nbsp;&nbsp; - Commercial</option>\n"+
	      "    <option value=\"UNK\">&nbsp;&nbsp; - Unknown</option>\n"+
	      "    <option value=\"TITLE\">State</option>\n"+
	      "    <option value=\"CIT\">&nbsp;&nbsp; - City</option>\n"+
	      "    <option value=\"CO\">&nbsp;&nbsp; - County</option>\n"+
	      "    <option value=\"DOT\">&nbsp;&nbsp; - Department of Transportation</option>\n"+
	      "    <option value=\"SP\">&nbsp;&nbsp; - State Park</option>\n"+
	      "    <option value=\"WMA\">&nbsp;&nbsp; - Wildlife Management Area</option>\n"+
	      "    <option value=\"NA\">&nbsp;&nbsp; - Natural Area</option>\n"+
	      "    <option value=\"SF\">&nbsp;&nbsp; - State Forest</option>\n"+
	      "    <option value=\"OTH\">&nbsp;&nbsp; - Other</option>\n"+
		"  </select><br><bR>\n"+
		"  <span style=\"font-size:12px\"><strong>Source of Data:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"Src\" name=\"Src\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Source ***</option>\n"+
		"    <option value=\"ALOT\">Native American Allotments</option>\n"+
		"    <option value=\"ARS\">Agricultural Research Station</option>\n"+
		"    <option value=\"BIA\">Bureau of Indian Affairs</option>\n"+
		"    <option value=\"BLM\">Bureau of Land Management</option>\n"+
		"    <option value=\"BPA\">Bonneville Power Administration</option>\n"+
		"    <option value=\"CGOV\">County Government</option>\n"+
		"    <option value=\"COE\">U. S. Army Corps of Engineers</option>\n"+
		"    <option value=\"DOD\">Department of Defense</option>\n"+
		"    <option value=\"EPA\">Environmental Protection Agency</option>\n"+
		"    <option value=\"FSR\">USDA Forest Service Research Station</option>\n"+
		"    <option value=\"NBS\">National Biological Survey</option>\n"+
		"    <option value=\"NOAA\">National Oceanic and Atmospheric Administration</option>\n"+
		"    <option value=\"NPS\">National Park Service</option>\n"+
		"    <option value=\"NRCS\">Natural Resources Conservation Service</option>\n"+
		"    <option value=\"OTH\">Other</option>\n"+
		"    <option value=\"PVLA\">Private Landowner</option>\n"+
		"    <option value=\"SCS\">U.S. Soil Conservation Service (pre NRCS)</option>\n"+
		"    <option value=\"STAT\">State Lands</option>\n"+
		"    <option value=\"TNC\">The Nature Conservancy</option>\n"+
		"    <option value=\"TRIB\">Tribal Lands</option>\n"+
		"    <option value=\"TVA\">Tennessee Valley Authority</option>\n"+
		"    <option value=\"UNIV\">University Lands</option>\n"+
		"    <option value=\"USFS\">United States Forest Service</option>\n"+
		"    <option value=\"USFW\">United States Fish and Wildlife Service</option>\n"+
		"    <option value=\"USGS\">United States Geological Survey</option>\n"+
		"    <option value=\"USOT\">U.S. Government (Other Federal Lands)</option>\n"+
		"  </select><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   forms_str[7] = " Please select the Submitter.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"  <span style=\"font-size:12px\"><strong>Submitter:</strong></span><br>\n"+
		"  <select style=\"font-size:10px\" id=\"Submitter\" name=\"Submitter\" size=\"1\" >\n"+
		"    <option value=\"\" selected>*** Any Submitter ***</option>\n"+getLists("Submitter",Subform.SS_DEnterBy.value)+
		"  </select><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   forms_str[8] = " Please select the Site ID.<br><br>\n"+
		"  <form onSubmit=\"return false\" method=\"post\" enctype=\"multipart/form-data\" name=\"DSSForm\" id=\"DSSForm\" style=\"font-size:10px\" >\n"+
		"  <span style=\"font-size:12px\"><strong>Site ID:</strong></span><br>\n"+
		"    <input style=\"font-size:10px\" id=\"SID\" name=\"SID\" size=\"13\" maxlength=\"10\" value=\""+Subform.SS_SiteID.value+"\" ><br><br>\n"+
		"    <input style=\"border: 1px solid #333;background-color: #CCC;margin-left:40px\" id=\"ApplyButt\" name=\"Input\" type=\"button\" onClick=\"Apply(this.form)\" value=\"Apply Subset\">\n"+
		"  </form>\n";
		
   var scripts_str = Array();
   scripts_str[1] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.SStartDate.value == \"\" || form.SStopDate.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please provide begin and end dates.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_ObsStrt.value = form.SStartDate.value;\n"+
		"     window.opener.document."+Subform.name+".SS_ObsStop.value = form.SStopDate.value;\n"+
		"     var ele = window.opener.document.getElementById(\"Obs_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Observation Date:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Observation Date:</strong> From \"+form.SStartDate.value+\" to \"+form.SStopDate.value;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";
   scripts_str[2] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.SStartDate.value == \"\" || form.SStopDate.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please provide begin and end dates.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_SbmtStrt.value = form.SStartDate.value;\n"+
		"     window.opener.document."+Subform.name+".SS_SbmtStop.value = form.SStopDate.value;\n"+
		"     var ele = window.opener.document.getElementById(\"Sbmt_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Submission Date:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Submitted Date:</strong> From \"+form.SStartDate.value+\" to \"+form.SStopDate.value;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";
   scripts_str[3] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.State.value == \"0\")\n"+
		"     {\n"+
		"        alert(\"Please select a state.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_State.value = form.State.value;\n"+
		"     window.opener.document."+Subform.name+".SS_DState.value = form.State[form.State.selectedIndex].text;\n"+
		"     window.opener.document."+Subform.name+".SS_County.value = \"\";\n"+
		"     window.opener.document."+Subform.name+".SS_DCounty.value = \"\";\n"+
		"     if (form.County.value != \"\")\n"+
		"     {\n"+
		"        window.opener.document."+Subform.name+".SS_County.value = form.County.value;\n"+
		"        window.opener.document."+Subform.name+".SS_DCounty.value = form.County[form.County.selectedIndex].text;\n"+
		"      }\n"+
		"     var ele = window.opener.document.getElementById(\"StCo_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if (form.County.value != \"\")\n"+
		"        if("+shrt+")\n"+
		"           ele.innerHTML = \"<strong>State / County:</strong><br>\";\n"+
		"        else\n"+
		"           ele.innerHTML = \"<strong>State/County:</strong> \"+form.State[form.State.selectedIndex].text+\" / \"+form.County[form.County.selectedIndex].text;\n"+
		"     else\n"+
		"        if("+shrt+")\n"+
		"           ele.innerHTML = \"<strong>State:</strong><br>\";\n"+
		"        else\n"+
		"           ele.innerHTML = \"<strong>State:</strong> \"+form.State[form.State.selectedIndex].text\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"     for(i=0;i<document.DSSForm.State.length;i++)\n"+
		"        if(document.DSSForm.State[i].value == window.opener.document."+Subform.name+".SS_State.value)\n"+
		"           document.DSSForm.State[i].selected = true;\n"+
		"     fillCounties(document.DSSForm.State.value,'County');\n"+
		"     for(i=0;i<document.DSSForm.County.length;i++)\n"+
		"        if(document.DSSForm.County[i].value == window.opener.document."+Subform.name+".SS_County.value)\n"+
		"           document.DSSForm.County[i].selected = true;\n"+
		"  }\n";
   scripts_str[4] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.Collector.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please select a collector.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_Coll.value = form.Collector.value;\n"+
		"     var ele = window.opener.document.getElementById(\"Coll_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Collector:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Collector:</strong> \"+form.Collector.value;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";
   scripts_str[5] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.Species.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please select a species.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_Spec.value = form.Species.value;\n"+
		"     window.opener.document."+Subform.name+".SS_DSpec.value = form.Species[form.Species.selectedIndex].text;\n"+
		"     var ele = window.opener.document.getElementById(\"Spec_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Species:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Species:</strong> \"+form.Species[form.Species.selectedIndex].text;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";
   scripts_str[6] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.NatOwn.value == \"\" && form.LocOwn.value == \"\" && form.Src.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please select something.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     if (form.LocOwn.value == \"TITLE\")\n"+
		"     {\n"+
		"        alert(\"A title heading is selected for local ownership.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_NatOwn.value = form.NatOwn.value;\n"+
		"     window.opener.document."+Subform.name+".SS_LocOwn.value = form.LocOwn.value;\n"+
		"     window.opener.document."+Subform.name+".SS_Src.value = form.Src.value;\n"+
		"     window.opener.document."+Subform.name+".SS_DNatOwn.value = form.NatOwn[form.NatOwn.selectedIndex].text;\n"+
		"     window.opener.document."+Subform.name+".SS_DLocOwn.value = form.LocOwn[form.LocOwn.selectedIndex].text;\n"+
		"     window.opener.document."+Subform.name+".SS_DSrc.value = form.Src[form.Src.selectedIndex].text;\n"+
		"     var ele = window.opener.document.getElementById(\"Nat_Span\");\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if (form.NatOwn.value != \"\")\n"+
		"     {\n"+
		"        ele.style.position = \"static\";\n"+
		"        if("+shrt+")\n"+
		"           ele.innerHTML = \"<strong>National Ownership:</strong><br>\";\n"+
		"        else\n"+
		"           ele.innerHTML = \"<strong>National Ownership:</strong> \"+form.NatOwn[form.NatOwn.selectedIndex].text;\n"+
		"      }\n"+
		"     var ele = window.opener.document.getElementById(\"Loc_Span\");\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if (form.LocOwn.value != \"\")\n"+
		"     {\n"+
		"        ele.style.position = \"static\";\n"+
		"        if("+shrt+")\n"+
		"           ele.innerHTML = \"<strong>Local Ownership:</strong><br>\";\n"+
		"        else\n"+
		"           ele.innerHTML = \"<strong>Local Ownership:</strong> \"+form.LocOwn[form.LocOwn.selectedIndex].text;\n"+
		"      }\n"+
		"     var ele = window.opener.document.getElementById(\"Src_Span\");\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if (form.Src.value != \"\")\n"+
		"     {\n"+
		"        ele.style.position = \"static\";\n"+
		"        if("+shrt+")\n"+
		"           ele.innerHTML = \"<strong>Data Source:</strong><br>\";\n"+
		"        else\n"+
		"           ele.innerHTML = \"<strong>Data Source:</strong> \"+form.Src[form.Src.selectedIndex].text;\n"+
		"      }\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"     for(i=0;i<document.DSSForm.NatOwn.length;i++)\n"+
		"        if(document.DSSForm.NatOwn[i].value == window.opener.document."+Subform.name+".SS_NatOwn.value)\n"+
		"           document.DSSForm.NatOwn[i].selected = true;\n"+
		"     for(i=0;i<document.DSSForm.LocOwn.length;i++)\n"+
		"        if(document.DSSForm.LocOwn[i].value == window.opener.document."+Subform.name+".SS_LocOwn.value)\n"+
		"           document.DSSForm.LocOwn[i].selected = true;\n"+
		"     for(i=0;i<document.DSSForm.Src.length;i++)\n"+
		"        if(document.DSSForm.Src[i].value == window.opener.document."+Subform.name+".SS_Src.value)\n"+
		"           document.DSSForm.Src[i].selected = true;\n"+
		"  }\n";
   scripts_str[7] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.Submitter.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please select a submitter.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_EnterBy.value = form.Submitter.value;\n"+
		"     window.opener.document."+Subform.name+".SS_DEnterBy.value = form.Submitter[form.Submitter.selectedIndex].text;\n"+
		"     var ele = window.opener.document.getElementById(\"SbmtBy_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Submitted By:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Submitted By:</strong> \"+form.Submitter[form.Submitter.selectedIndex].text;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";
   scripts_str[8] = "  function Apply(form)\n"+
		"  {\n"+
		"     if (form.SID.value == \"\")\n"+
		"     {\n"+
		"        alert(\"Please select a site id.\");\n"+
		"  	   return false;\n"+
		"      }\n"+
		"     window.opener.document."+Subform.name+".SS_SiteID.value = form.SID.value;\n"+
		"     var ele = window.opener.document.getElementById(\"SID_Span\");\n"+
		"     ele.style.position = \"static\";\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \"<strong>Site ID:</strong><br>\";\n"+
		"     else\n"+
		"        ele.innerHTML = \"<strong>Site ID:</strong> \"+form.SID.value;\n"+
		"     close_form();\n"+
		"  }\n"+
		"  function init_form()\n"+
		"  {\n"+
		"  }\n";

   var str_buffer = new String (
		"<html>\n"+
		"<head>\n"+
		"	<title>Subset Data</title>\n"+
		"	<link rel=\"stylesheet\" href=\"/research/ipams/styles/ipams.css\" type=\"text/css\">\n"+
		"	<script language=\"JavaScript\" type=\"text/JavaScript\" src=\"/tools/browser.js\"></script>\n"+
		"	<script language=\"JavaScript\" type=\"text/JavaScript\" src=\"/research/ipams/scripts/calendar.js\"></script>\n"+
		"	<script language=\"JavaScript\" type=\"text/JavaScript\" src=\"/research/ipams/scripts/util.js\"></script>\n"+
		"     <script language=\"JavaScript1.1\" >\n"+
		"  function close_form()\n"+
		"  {\n"+
		"     var ele = window.opener.document.getElementById(\"None\");\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     if("+shrt+")\n"+
		"        ele.innerHTML = \" (Hover for Details)\";\n"+
		"     var ele = window.opener.document.getElementById(\"RecCnt\");\n"+
		"     while(ele.firstChild)\n"+
		"        ele.removeChild(ele.firstChild);\n"+
		"     var fm = window.opener.document."+Subform.name+";\n"+
		"     ele.innerHTML = \"\"+getRecCnt(fm);\n"+
		"     window.close();\n"+
		"     if("+shrt+")\n"+
		"        fillReports1(window.opener.document."+Subform.name+");\n"+
		"  }\n"+
		scripts_str[type]+"</script>\n"+
		"     <?\n"+
		"        require(\"/www/data/wwwtest.gri.msstate.edu/research/ipams/php/IPAMSConfig.php\");\n"+
		"     ?>\n"+
		"</head>\n"+
		"<body id=\"Bdy\" bgcolor=\"White\" style=\"width:180\">\n"+
		"Surveys will be subsetted to include only those that are within your selection(s).\n"+
		"<div id=\"MDiv\" class=\"divs\" style=\"width:160px\">\n");

   str_buffer += forms_str[type];
   
   str_buffer += "</div>\n"+
                 "<script language=\"JavaScript1.1\" >\n"+
                 "  var sstype = "+type+"\n;"+
                 "  if(sstype == 6)\n"+
                 "  {\n"+
                 "     document.getElementById(\"MDiv\").style.width = \"260px\";\n"+
                 "     document.getElementById(\"Bdy\").style.width = \"280px\";\n"+
                 "     document.getElementById(\"ApplyButt\").style.marginLeft = \"90px\";\n"+
                 "   }else if(sstype == 3)\n"+
                 "  {\n"+
                 "     document.getElementById(\"MDiv\").style.width = \"170px\";\n"+
                 "     document.getElementById(\"Bdy\").style.width = \"190px\";\n"+
                 "     document.getElementById(\"ApplyButt\").style.marginLeft = \"50px\";\n"+
                 "   }\n"+
                 "  \n"+
                 "  \n"+
                 "  init_form();\n"+
                 "</script>\n"+
                 "</div>\n</body>\n</html>\n";

   if(type == 6)
      var vWinCal = window.open("", "DSubSet","width=300,height=290,resizable=yes,top=200,left=200");
   else if(type == 3)
      var vWinCal = window.open("", "DSubSet","width=210,height=240,resizable=yes,top=200,left=200");
   else
      var vWinCal = window.open("", "DSubSet","width=200,height=240,resizable=yes,top=200,left=200");
   vWinCal.opener = self;
   var calc_doc = vWinCal.document;
   calc_doc.write (str_buffer);
   calc_doc.close();
}

function GetXttp()
{
   var Xttp = null;
   if(BrowserDetect.browser == "Explorer")
   {
      try
      {
         Xttp = new ActiveXObject("Msxml2.XMLHTTP");
       } catch (e)
      {
         Xttp = new ActiveXObject("Microsoft.XMLHTTP");
       }
    } else
   {
      try
      {
         Xttp = new XMLHttpRequest();
       } catch (e)
      {
         Xttp=window.createRequest();
       }
    }
   return Xttp;
}

function getLists(type,comp)
{
   var xttp = GetXttp();
   if (xttp == null)
      return;
   if(type=="Species")
      var url="/research/ipams/scripts/getSpeciesList.php"+"?Spec="+comp;
   else if(type=="Collector")
      var url="/research/ipams/scripts/getCollectorList.php"+"?Coll="+comp;
   else if(type=="Submitter")
      var url="/research/ipams/scripts/getSubmitterList.php"+"?Sbmter="+comp;
//   xttp.onreadystatechange=stateChanged1;
//	   alert(url);
   xttp.open("GET",url,false);
   xttp.send(null);
   if(xttp.status == 200)
   {
//	   alert(xttp.responseText);
      return xttp.responseText;
    }
}