// TRI Explorer - Set up parameter string for facilty reports
// Hsiwei Yu, Tue, 15Aug2000. Change SORT= when different tabs for USFA 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
// the default data set is always assumed to be the latest data update 
// unless the user clicks on the radion button selecting the PDR (TRIQ0)

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 statename = (NS4) ? form.state.options[form.state.selectedIndex].text : form.state.text;
//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;

if (form.stateloc.value == null) {
     var pickstate = (NS4) ? document.forms['form1'].stateloc.options[document.forms['form1'].stateloc.selectedIndex].value : document.forms['form1'].stateloc.value;
   }
   else {
     var pickstate = form.stateloc.value;
   }

if (pickstate.substr(0,3) == "USA") {
    statecode = "All+states";
 }
else {
   stcode = (NS4) ? form.state.options[form.state.selectedIndex].value : form.state.value;
  var statecode = statefips(stcode)
}

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 == "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 == "" || 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 != "_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 == "OLD" && ind_selected == "") {
  ind_selected = "&industry=OLD";
}
if (industrycode == "ALL" && ind_selected == "") {
  ind_selected = "&industry=ALL";
}
if (industrycode == "NEW" && ind_selected == "") {
  ind_selected = "&industry=NEW";
}

var yearcode = (NS4) ? form.year.options[form.year.selectedIndex].value : form.year.value;

var fedcode = (NS4) ? form.fedfacility.options[form.fedfacility.selectedIndex].value : form.fedfacility.value;

if(chemicalcode == "PBT_IND" && yearcode < "2000") {
   selectchemical(form);
   return false;
}
  var strPageName = form.report.value;

  var strReportNum;

  if (strPageName == "fedfacility" || strPageName == "fedfacility01")
	strReportNum = "&tab_rpt=1";

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

  else if (strPageName.substr(0,19) == "fedfacilityquantity")
 	strReportNum = "&tab_rpt=3";
 
  if ( chemicalcode == 'NEW95' && yearcode <= 1994 ) {
     alert( 'You have selected Newly added 1995 Chemicals and '
          + yearcode + '. Since these chemicals were added in 1995,'
          + ' no data exists for years prior to 1995.'
          + ' Please make another selection and try again.' 
         );
  }
     location = sBroker
              + "?view=FDFA"
              + "&trilib="+triDATASET
              + "&sort_fmt=1"
              + "&state="+statecode
              + "&county=All+counties"
              + chem_selected
              + ind_selected
              + "&year=" + yearcode
              + "&fed=YES"
              + "&fedcode=" + fedcode
	      + strReportNum
              + setreportfields(form)
              + getService();
}