// TRI Explorer - Set up parameter string for trends reports
// W.Smith 21-jan-2000
//
//

function setParms(form) {
// This function sets the parameters to make the proper call to SAS.
// If USA is selected, it calls the top 100 USA facility report,
// else it calls the facilities in your state report
//var statename = (NS4) ? form.state.options[form.state.selectedIndex].text : form.state.text;

var triDATASET = "";
var pdr = true;
  for (var i=0 ; i < form.length; i++){
    if (form.elements[i].name == "dataset") {
         pdr = false;
    }
  }
if (pdr == true)
    triDATASET = "TRIQ0";
else {
     if (form.dataset.checked == true)
          triDATASET = "TRIQ0";
     else
          triDATASET = "TRIQ1";
     }

//var pickstate = (NS4) ? form.stateloc.options[form.stateloc.selectedIndex].value : form.stateloc.value;

 if (form.stateloc.value != null)
    var pickstate =  form.stateloc.value;
 else 
    var pickstate = (NS4) ? form.stateloc.options[form.stateloc.selectedIndex].value : form.stateloc.value;



if (pickstate == "USA")
 var statecode = "USA";
else
 var statecode = (NS4) ? form.state.options[form.state.selectedIndex].value : form.state.value;
var core_year = form.core_year.value;
var chemicalcode = (NS4) ? form.chemical.options[form.chemical.selectedIndex].value : form.chemical.value;
cwords = form.chemselected.value.split(",");
chem_selected  = "";

for (var i=0; i < cwords.length -1; i++) {
	chem_selected += "&chemical="+cwords[i];
}

if (chemicalcode == "" || chemicalcode == null) {
  alert("You have not selected a chemical \n Please click on the 'Go To New Report' button \n Located to the right of the screen ");
  return false;
}

if (chemicalcode == "PICKCHEM" && chem_selected == "") {
  alert("You have not selected a chemical \n Please click on the 'Go To New Report' button \n Located to the right of the screen ");
  return false;
}

if (chemicalcode.substr(0,6) == "TRCHEM" ) {
  alert("You have not selected a chemical \n Please click on the 'Go To New Report' button \n Located to the right of the screen ");
  return false;
}

if (chemicalcode != "_ALL_" && chem_selected == "") {
  chem_selected = "&chemical="+chemicalcode;
}
if (chemicalcode == "_ALL_") {
  chem_selected = "&chemical=All+chemicals";
} 

var industrycode = (NS4) ? form.industry.options[form.industry.selectedIndex].value : form.industry.value;

if (industrycode == "" || industrycode == null) {
  alert("You have not selected an industry \n Please click on the 'Go To New Report' button \n Located to the right of the screen ");
   return false;
}

iwords = form.indselected.value.split(",");
ind_selected  = "";
for (var i=0; i < iwords.length -1; i++) {
	ind_selected += "&industry="+iwords[i];
}

if (industrycode == "SIC" && ind_selected == "") {
  alert("You have not selected an industry \n Please click on the 'Go To New Report' button \n Located to the right of the screen ");
  return false;
}
if (industrycode == "ALL" && ind_selected == "") {
  ind_selected = "&industry=ALL";
}
if (industrycode == "OLD" && ind_selected == "") {
  ind_selected = "&industry=OLD";
}
if (industrycode == "NEW" && ind_selected == "") {
  ind_selected = "&industry=NEW";
}
  var strPageName = form.report.value;

  var strReportNum;

  if (strPageName == "trends")
	strReportNum = "&tab_rpt=1";

  else if (strPageName == "trendstransfer")
 	strReportNum = "&tab_rpt=2";

  else if (strPageName == "trendsquantity")
 	strReportNum = "&tab_rpt=3";


  if (statecode == "USA") {
     location = sBroker
              + "?view=USYR"
              + "&trilib="+triDATASET
              + "&sort=_VIEW_"
              + "&sort_fmt=1"
              + "&state=All+states"
              + "&county=All+counties"
              + chem_selected
              + ind_selected
              + "&year=All+years"
	      + "&core_year=" + core_year
	      + strReportNum
              + setreportfields(form)
              + getService();
     }
  else {
     location = sBroker
              + "?view=STYR"
              + "&trilib="+triDATASET
              + "&sort=_VIEW_"
              + "&sort_fmt=1"
              + "&state=" + statefips(statecode)
              + "&county=All+counties"
              + chem_selected
              + ind_selected
              + "&year=All+years"
	      + "&core_year=" + core_year
	      + strReportNum
              + setreportfields(form)
              + getService();
     }
}