// TRI Explorer - Set up parameter string for facilty 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 (pickstate == "USA")
 var statecode = "USA";
else
 var statecode = (NS4) ? form.state.options[form.state.selectedIndex].value : form.state.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 == "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_";
} 

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

if(chemicalcode == "PBT_IND" && yearcode < "2000") {
   selectchemical(form);
   return false;
}

  var strPageName = form.report.value;

  var strReportNum;

  if (strPageName == "industry" || strPageName == "industry01")
	strReportNum = "&tab_rpt=1";

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

  else if (strPageName == "industryquantity" || strPageName == "industryquantity01")
 	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.' 
         );
  }
  else {
  if (statecode == "USA") {
     location = sBroker
              + "?view=USSC"
              + "&trilib="+triDATASET
              + "&sort=_VIEW_"
              + "&sort_fmt=1"
              + "&state=All+states"
              + "&county=All+counties"
              + chem_selected
              + "&year=" + yearcode
	      + strReportNum
              + setreportfields(form)
              + getService();
     }
  else {
     location = sBroker
              + "?view=STSC"
              + "&trilib="+triDATASET
              + "&sort=_VIEW_"
              + "&sort_fmt=1"
              + "&state=" + statefips(statecode)
              + "&county=All+counties"
              + chem_selected
              + "&year=" + yearcode
	      + strReportNum
              + setreportfields(form)
              + getService();
     }
  }
}

function refreshInddate(form) {
    
   var urlstring = document.URL;
   var parm1 = "report";
   var parm2 = "scriptname";
   var parm3 = "state"; 
   var parm4 = "c_year";
   var parm5 = "c_industry";
   var parm6 = "c_chemical";
   var parm7 = "c_indlist";
   var parm8 = "c_chemlist";
   var parm9 = "c_coreyear";
   var parm10 = "c_usrState";
   var parm11 = "c_fips";
   var parm12 = "c_zip";

   var reportname = form.report.value;
   var scriptname = form.scriptname.value;

  var c_industry= "&c_industry=";
  var c_chemical= "&c_chemical=";
  var c_usrState= "&c_usrState=";
  var c_indlist= "&c_indlist=";
  var c_chemlist= "&c_chemlist=";
  var c_usrState= "&c_usrState=";
  var c_year= "&c_year=";
  var c_coreyear= "&c_coreyear=";
  c_coreyear += form.core_year.value;
   var c_fips= "&c_fips=";
   var c_zip= "&c_zip=";
   var c_chk1 = "&c_chk1=";
   var c_chk2 = "&c_chk2=";
   var c_chk3 = "&c_chk3=";
   var c_chk4 = "&c_chk4=";
   var c_chk5 = "&c_chk5=";
   var c_chk6 = "&c_chk6=";
   var c_chk7 = "&c_chk7=";
   var c_chk8 = "&c_chk8=";


   var chemicalflag =  form.chemical.options[form.chemical.selectedIndex].value;

   if (form.stateloc.value == null) {
     var strState = (NS4) ? document.forms['form1'].stateloc.options[document.forms['form1'].stateloc.selectedIndex].value : document.forms['form1'].stateloc.value;
   }
   else {
     var strState = form.stateloc.value;
   }
if (strState.substr(0,3) != "USA") var strState = form.stateloc.value;

   if (strState == "STATE") {
     c_usrState += (NS4) ? document.forms['form1'].state.options[document.forms['form1'].state.selectedIndex].value : document.forms['form1'].state.value;
   }

   if (strState == "") var strState = "STATE" ;

  c_fipsflag = ""
  for (var i=0 ; i < form.length; i++){
    if (form.elements[i].name == "countyflag") {
     c_fips += (NS4) ? document.forms['form1'].county.options[document.forms['form1'].county.selectedIndex].value : document.forms['form1'].county.value;
     c_fipsflag = "yes";
    }
  }

  if (c_fipsflag == "")   c_fips += form.countyfips.value;

   c_chemical += form.chemical.options[form.chemical.selectedIndex].value;

   if(getParameter(urlstring, parm9) != null) {
     c_coreyear += getParameter(urlstring, parm9);
   }

   c_year += form.year.options[form.year.selectedIndex].value;

    if(getParameter(urlstring, parm12) != null) {
     c_zip      += getParameter(urlstring, parm12);
    }

   if(getParameter(urlstring, parm8) != null) {
      c_chemlist += getParameter(urlstring, parm8);
   }
   else { c_chemlist += document.form1.chemselected.value; }

    c_zipflag = "";
    for (var i=0 ; i < form.length; i++){
       if (form.elements[i].name == "loca") {
           c_zipflag = "YES" ;
           c_zip += form.loca.value;
       }
    }

if(reportname == "chemical" || reportname == "facility" || reportname == "trends" || reportname == "geography" || reportname == "industry") {
    c_chk1 = "&c_chk1=" + form.chk1.checked;
    c_chk2 = "&c_chk2=" + form.chk2.checked;
    c_chk3 = "&c_chk3=" + form.chk3.checked;
    c_chk4 = "&c_chk4=" + form.chk4.checked;
    if(reportname == "facility") {
      c_chk5 = "&c_chk5=" + form.chk5.checked;
      c_chk6 = "&c_chk6=" + form.chk6.checked;
      c_chk7 = "&c_chk7=" + form.chk7.checked;
      c_chk8 = "&c_chk8=" + form.chk8.checked;
    }

}
    SubmitOk = true;
    location = cgiBase + getCountyCGI + "?report=" 
          + reportname + "&scriptname=" + scriptname + "&state=" + strState + c_year + c_industry + c_chemical + c_indlist + c_chemlist + c_coreyear + c_usrState + c_fips + c_zip  + c_chk1 + c_chk2 + c_chk3 + c_chk4  + c_chk5 + c_chk6 + c_chk7 + c_chk8 ;
           
  }