//Communicator Section
  var com_link=new Array;
  function getData(url, strRequest, eval_code)
  {
    var req;
    var doesNotSupport = true;
    var _response;
    //Internal Function Area
    function processReqChange()
    {
      var _PML;
      //onerror=Req_error;
      // only if req shows "loaded"
      if (req.readyState == 4)
      {
          // only if "OK"
          if (req.status == 200)
          {
            _response=req.responseText;
            //l_end();
            if(eval_code) eval(eval_code);
            eval_code="";
          } else {
              alert("There was a problem retrieving the XML data:\n" + req.statusText);
          }
      }
    }

    function Req_error()
    {
      alert("There was an error processing request!");
      return true;
    }
    com_link['_loading']=function _loading(num)
    {
      var strHTML="Loading";
      var i;
      
      num++;
      for (i=1;i<4;i++)
      {
        if(i<num)
        {
          strHTML+=".";
        }else
        {
          strHTML+="&nbsp;";
        }
      }
      if(num>3){num=0;}
      document.getElementById("loading").innerHTML=strHTML;
      if(document.getElementById("l-flag").innerHTML!="")
      {
        setTimeout("com_link._loading("+num+")",1000);
      }
    }
    com_link['l_start']=function l_start()
    {
      document.getElementById("l-flag").innerHTML="1";
      document.getElementById("loading").style.visibility="visible";
      document.getElementById("loading").innerHTML="Loading&nbsp;&nbsp;&nbsp;&nbsp;";
      _loading(1);
    }
    com_link['l_end']=function l_end()
    {
      document.getElementById("l-flag").innerHTML="";
      document.getElementById("loading").style.visibility="hidden";
    }
    //End Internal Function Area


    if (strRequest == "" || !doesNotSupport)
        return;

    if (window.XMLHttpRequest)
    {
        req = new XMLHttpRequest;
    } else if (window.ActiveXObject) {
        req = new ActiveXObject("Microsoft.XMLHTTP");
    }

    if (req) {
       req.onreadystatechange = processReqChange;
       req.Open('POST',url,true);
       req.setRequestHeader('Content-Type','application/x-www-form-urlencoded');
       //l_start();
       req.send("Data=" + escape(strRequest));
    } else {
       alert("Your browser does not support XMLHttpRequest technology!");
       doesNotSupport = false;
    }
  }
  //End Communicator Section