function GetXmlHttpObject(handler)
{
    var objXMLHttp=null
    if (window.XMLHttpRequest)
    {
        objXMLHttp=new XMLHttpRequest()	
    }
    else if (window.ActiveXObject)
    {
        objXMLHttp=new ActiveXObject("Microsoft.XMLHTTP")
    }
    return objXMLHttp
}

function stateChanged()
{
    if (xmlHttp.readyState==4 || xmlHttp.readyState=="complete")
    {
		document.getElementById("storeSelector").innerHTML='';
		var t = document.createElement('div');
		t.innerHTML = xmlHttp.responseText;
		document.getElementById("storeSelector").appendChild(t);
		
    }
    else {
            //alert(xmlHttp.status);
    }
}

// Will populate data based on input
function htmlData(url, qStr)
{
    xmlHttp=GetXmlHttpObject()
    if (xmlHttp==null)
    {
        alert ("Browser does not support HTTP Request");
        return;
    }
    url="/modperl/wbsrvcs/"+url+"?"+qStr;
    xmlHttp.onreadystatechange=stateChanged;
    xmlHttp.open("GET",url,true) ;
	xmlHttp.setRequestHeader("Content-Type", "text/plain");
    xmlHttp.send(null);
}