// VB Script Document
function jah(url,target, anterior) {
    // native XMLHttpRequest object
   if (window.XMLHttpRequest) {
        reqD = new XMLHttpRequest();
		reqD.onreadystatechange = function() {jahDone(target, anterior, url);};
        reqD.open("GET", url, true);
        reqD.send(null);
    // IE/Windows ActiveX version
    } else if (window.ActiveXObject) {
        reqD = new ActiveXObject("Microsoft.XMLHTTP");
        if (reqD) {
            reqD.onreadystatechange = function() {jahDone(target, anterior, url);};
            reqD.open("GET", url, true);
            reqD.send();
        }
    }
}    

function jahDone(target, anterior, url) {
    // only if req is "loaded"
    if (reqD.readyState == 4) {
        // only if "OK"
        if (reqD.status == 200) {
			if (reqD.responseText.substring(reqD.responseText.length - 1) == 1){
				document.getElementById('COctID').value = 0;}
			else
			{
			var obj = document.getElementById('contenedorTotal');
			var numero = obj.getElementsByTagName('div').length;
			if (numero>5){
				numID = anterior - 4;
				obj.removeChild(document.getElementById('radioInfo'+numID));	
			}
			
			results = reqD.responseText;
						
			posicionArroba = results.indexOf('@',0);
			document.getElementById(target).innerHTML = results.substring(posicionArroba+1);
			document.getElementById('COctID').value = reqD.responseText.substring(0,posicionArroba);
			}
			}
		else 
		{
            document.getElementById(target).innerHTML="jah error:\n" +
			reqD.statusText;
	    }
    }
}