function createXMLHttpRequest() {
   try { return new ActiveXObject("Msxml2.XMLHTTP"); } catch (e) {}
   try { return new ActiveXObject("Microsoft.XMLHTTP"); } catch (e) {}
   try { return new XMLHttpRequest(); } catch(e) {}
   alert("XMLHttpRequest not supported");
   return null;
}

function pause(millis) {
	var date = new Date();
	var curDate = null;

	do { curDate = new Date(); } 
	while(curDate-date < millis)
} 

function uncheckall() {
for(i=0; i<document.lform.elements.length; i++) {
	if(document.lform.elements[i].type=="checkbox") {
		var cgivar=document.lform.elements[i].name;
		if (cgivar.indexOf("mfr")>=0) {
			document.lform.elements[i].checked=false;
		}
	}
}
}