/* Returns an XMLHttpRequest object */
function getSHttpRequest(){
    try { return new XMLHttpRequest(); } catch (e) {}
    try { return new ActiveXObject("Msxml2.XMLHTTP"); } catch (e) {}
    try { return new ActiveXObject("Microsoft.XMLHTTP"); } catch (e) {}
    alert("XMLHttpRequest not supported");
    return null;
}


function subForm(f, frmobj) {
      var request = new getSHttpRequest();
      request.onreadystatechange = function() {
      if(request.readyState == 4){
        if(request.status == 200){
            $(frmobj.messageid).innerHTML = request.responseText; 
        } else {
            alert("A problem occurred with communicating between the XMLHttpRequest object and the server program.");
        }
       }//end outer if
      }//function
      request.open("POST","http://" + frmobj.hostname + "/siteman/" + frmobj.formname ,true);
      request.setRequestHeader("Content-Type",
            "application/x-www-form-urlencoded; charset=UTF-8");
      request.send(frmobj.querystring);
   }


function displayTool(itemid){
   $('tdisp').style.display = 'inline';
  if (itemid == 'occ') {
     var t =   getTool('00000020');
     var tt =   getTool('00000022');
     $("toolinfo").innerHTML = t + "<br/>" + tt
     }
  else  $("toolinfo").innerHTML = getTool(itemid);

}

function getTool(itemid) {
        var htmltext = "";
        var request = new getSHttpRequest();
        request.open("GET", "http://" + window.location.hostname + ":" + window.location.port + 
                     "/olmis/tool_item.xml?itemid=" + itemid, false);
        request.onreadystatechange = function() {
          if (request.readyState == 4) {
          var xmlDoc = request.responseXML;
          var ind = xmlDoc.documentElement.getElementsByTagName("item");
          for (var i = 0; i < ind.length; i++) {
             var title = ind[i].getAttribute("title");
             htmltext += '<a href="' + ind[i].getAttribute("procname") + '" >' + title + '</a><br/>';
             htmltext += ind[i].getAttribute("teaser");
              }
          } // if request 
        } // function
        request.send(null);
  return htmltext;
}

function getGeog(f) {
  var greq = new Ajax.Request(getXMLGeogData(f),
   {
    method:'post',
    onSuccess: function(transport){
          var xmlDoc = transport.responseXML;
          var ind = xmlDoc.documentElement.getElementsByTagName("geog");
          for (var i = 0; i < ind.length; i++) {
               var area = ind[i].getAttribute("area");
               var opt = new Option(ind[i].getAttribute("areaname"), area, false, (area == initarea));
               f.area.options[f.area.options.length] = opt;
              } 
    },
    onFailure: function(){ alert('Geography list failed...') }
   });
 }