/*InContext WWL 1.0 / www.thco.co.uk*/
function ax(url, cb, opts) {
    var r = init();
    r.onreadystatechange = pR;
    function init(){ if (window.XMLHttpRequest) return new XMLHttpRequest(); else if (window.ActiveXObject) return new ActiveXObject("Microsoft.XMLHTTP");}
    function pR () { if (r.readyState == 4) { if (cb) cb(r.responseText, r.status, opts);  r=null; } }
    this.dG = function() {r.open("GET", url, true);r.send(null); }
    this.dP = function(body) { r.open("POST", url, true); r.setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); r.send(body);}
}
function xh(op, s, rF){
	if(s == 200){
		var xd = cx(op);
		e = xd.getElementsByTagName('error');
		if(e.length == 0){var glb = this;var doIt = glb[rF];doIt(xd);
		}else alert(e[0].firstChild.text + ' (Line : ' + e[0].getAttribute('line') + ')');
	}else	 alert('ERROR ' + s + ' : Your server returned an error.\n\nAn administrator has been notified of the problem, but please still log a call for assistance ...');	 
}
function cx(op){
	var ief = true;
	if (window.ActiveXObject){ xd = new ActiveXObject("Microsoft.XMLDOM"); xd.async=false;
	 }else if (document.implementation && document.implementation.createDocument){
	 	  xd= document.implementation.createDocument("","",null); ief = false;
	 }else alert('Your browser is not compatible with this system, please upgrade to the latest version ...');
  	if(ief) xd.loadXML(op); else{ var oR = new DOMParser();xd = oR.parseFromString(op, "text/xml");	}	
	return xd;
}