function wr_ss_onload()
{
  for (i=1; i<=wf_form.count; i++)
  {
    wr_ss_mark(wf_form.fields(i));
  }
	for (i=1; i<=wf_rcount; i++) 
	{
	  r = wf_r[i];
	  for (j=1; j<=r.count; j++) 
	  {
  	  if (r.fields(j).input == "select") 
  	  {
	      for (k=1; k<=r.rowcount; k++)
	      {
	        wr_ss_mark(r.fields(j), k);
	      }
	    }
	  }
	}
}

function wr_ss_get_obj(fld, i)
{
  if (fld.parent.i) 
  {
    return fld.obj(i);
  } else
  {
    return fld.obj;
  }
}

function wr_ss_mark(fld, i)
{
  s = wr_ss_get_obj(fld, i);
  ss = document.getElementById("wr_ss_" + s.name);
  if (ss) 
  {
    if (s.length == 2 && s.selectedIndex == 1) 
    {
      ss.value = s.options[s.selectedIndex].text;
      ss.style.backgroundColor = "AAAAFF";
    }  
  }
}

function wr_ss_clean(fld, i) 
{
  s = wr_ss_get_obj(fld, i);
  ss = document.getElementById("wr_ss_" + s.name);
  if (ss) 
  {
    ss.value = "";
    ss.style.backgroundColor = "FFFFFF";
  }
  wr_ajax_hanging = false;
}

// IE autocomplete/onchange fix 
var wr_ss_fixvalue;
function wr_ss_onchange(ip, prm_name) {}
function wr_ss_onclick(ip, prm_name) {}
function wr_ss_onfocus(ip, prm_name) 
{ 
  wr_ss_fixvalue = ip.value; 
}
function wr_ss_onblur(ip, prm_name) 
{ 
  if (wr_ss_fixvalue != ip.value) 
    wr_search_server(ip, prm_name); 
  wr_ss_fixvalue = ip.value;
}

function wr_ss_manual_change(ip)
{
  ss = document.getElementById("wr_ss_" + ip.name);
  ss.value = ip.options[ip.selectedIndex].text;
  ss.style.backgroundColor = "AAAAFF";
  ip.style.display = "none";
  ip.style.visibility = "hidden";
}

function wr_search_server(ip, prm_name) 
{
  var name;
  ip.style.backgroundColor = "FFFFFF";
  wr_ajax_hanging = false;
  if (ip.name.substr(0, 6) == "wr_ss_") name = ip.name.substr(6);
  if (ip.value > "") 
  {
    wr_do_ajax(sysdir + "searchServer.asp?wr_prm_name=" + prm_name + "&wr_find=" + ip.value, name);
    wr_ajax_hanging = true;
  } else
  {
    s = document.getElementById(name);
    s.selectedIndex = 0;
  }
}

function wr_ajax_react(response, name) 
{
  var s;
  s = document.getElementById(name);
  if (response != "-") 
  {
    wr_select_html(s, response);
  } else
  {
    ss = document.getElementById("wr_ss_" + name);
    ss.style.backgroundColor = "FFAAAA";
    s.style.display = "none";
    s.style.visibility = "hidden";    
    s.selectedIndex = 0;
    wr_ajax_hanging = false;
  }
}

function wr_select_html(s, newHtml)
{
  var old, val;
  if (s.selectedIndex > 0) {
    val = s.options[s.selectedIndex].value;
  } else {
    val = 0;
  }
  s.selectedIndex = 0;
  old = s.outerHTML.substr(0, s.outerHTML.indexOf(">")+1);
  s.outerHTML = newHtml.replace(/<select.*?>/i , old);
  /*
  setTimeout("selectIf1(s.name); ifChanged();", 100);
  s = document.all("c_project_size_id");
  wf_form.fields("c_project_size_id").obj = s; // IE looses pointer after setting outerHTML
  if (val > 0) {
    wr_findSelectValue(s, val);
  }
  */
  setTimeout("wr_select_html_post('" + s.name + "');", 50);
}

function wr_select_html_post(name)
{
  var s, ss;
  s = document.getElementById(name);
  if (!(s.wf_i)) wf_form.fields(name).obj = s;
  if (s.length > 2) {
    //s.selectedIndex = 0;
    s.style.display = "inline";
    s.style.visibility = "";    
    //s.click();
  } else
  {
    s.selectedIndex = 1;
    s.style.display = "none";
    s.style.visibility = "hidden";
    ss = document.getElementById("wr_ss_" + name);
    ss.style.backgroundColor = "AAAAFF";
    ss.value = s.options[s.selectedIndex].text;
    wf_onchangebind(s);
  }
  wr_after_ajax_bind(name);
  wr_ajax_hanging = false;
}

function wr_ss_onDblClick(ip, prm_name) {
  var base_name, link, id, select;
  //.substring(6) => remove "wr_ss_" from beginning
  base_name = ip.name.substring(6);
//alert(base_name);
  link = document.getElementById("wr_select_link_" + base_name).value;
  id = wf_form.value_by_id(base_name);
  if (id > 0) {
    if (!(event.shiftKey)) {
      document.location = link + id;
    } else {
      window.open(link + id);
    }
  }
}