/**************************************************************************************/
chiamate_url = new Array()
chiamate_params = new Array()
chiamate_div = new Array()
n_chiamate = -1
var procedi = true

/**********************************************************************************************/

function inserisciRichiesta(url,params,idDiv){
	n_chiamate++;
	chiamate_url[n_chiamate] = url;
	chiamate_params[n_chiamate] = params;
	chiamate_div[n_chiamate] = idDiv;

	if (procedi){
		makeRequest2();
	} else {
		avanti = window.setInterval("vediProcedi();",100);
	}
}

function vediProcedi(){
if (procedi==true && n_chiamate>=0) {
	makeRequest2();
	window.clearInterval(avanti);
	}
}


function makeRequest2(){
	http_request = false;

	if (window.XMLHttpRequest) { // Mozilla, Safari,...
  		http_request = new XMLHttpRequest();
	} else if (window.ActiveXObject) { // IE
		try {
			http_request = new ActiveXObject("Msxml2.XMLHTTP");
		} catch (e) {
			try {
				http_request = new ActiveXObject("Microsoft.XMLHTTP");
			} catch (e) {}
		}
	}
	if (!http_request) {
		alert('Impossibile creare una istanza XMLHTTP');
		return false;
	}

	window.parent.status="Elaborazione...";
		if (chiamate_div[0] != ''){
				if (
						document.getElementById(chiamate_div[0]).type=='submit' ||
						document.getElementById(chiamate_div[0]).type=='button' ||
						document.getElementById(chiamate_div[0]).type=='checkbox' ||
						document.getElementById(chiamate_div[0]).type=='hidden' ||
						document.getElementById(chiamate_div[0]).type=='text'					
					){
						http_request.onreadystatechange = gestRespValue;
					} else {
						document.getElementById(chiamate_div[0]).innerHTML='<img src="/cm/img/loading.gif" border="0" width="19px" height="19px">';
						http_request.onreadystatechange = gestRespDiv;
					}
			}else{
				http_request.onreadystatechange = gestResp;				
			}
			
			http_request.open('POST', chiamate_url[0], true);
			http_request.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
			http_request.setRequestHeader("Content-length", chiamate_params[0].length);
			http_request.send(chiamate_params[0]);
}

function gestRespDiv(){
	procedi=false
	if (http_request.readyState == 4) {
		if (http_request.status == 200) {
			document.getElementById(chiamate_div[0]).innerHTML= http_request.responseText
			window.parent.status='Eseguito...';
			n_chiamate--;
			chiamate_url.shift();
			chiamate_params.shift();
			chiamate_div.shift();
			if (n_chiamate>0) {
				makeRequest2(chiamate_url[0],chiamate_params[0],chiamate_div[0]);
			} else{
				procedi=true;
			}
		} else {
			window.parent.status="Problemi con la richiesta al server"
		}
	}
}

function gestRespValue(){
	procedi=false
	if (http_request.readyState == 4) {
		if (http_request.status == 200) {
			document.getElementById(chiamate_div[0]).value= http_request.responseText
			window.parent.status='Eseguito...';
			n_chiamate--;
			chiamate_url.shift();
			chiamate_params.shift();
			chiamate_div.shift();
			if (n_chiamate>0) {
				makeRequest2(chiamate_url[0],chiamate_params[0],chiamate_div[0]);
			} else{
				procedi=true;
			}
		} else {
			window.parent.status="Problemi con la richiesta al server"
		}
	}
}

function gestResp() {
		procedi=false
        if (http_request.readyState == 4) {
            if (http_request.status == 200) {
			    window.parent.status=http_request.responseText;
				n_chiamate--;
				chiamate_url.shift();
				chiamate_params.shift();
				chiamate_div.shift();
				if (n_chiamate>0) {
					makeRequest2();
				} else{
					procedi=true;
				}
            } else {
				window.parent.status="Problemi con la richiesta al server"
            }
        }

    }



/*********************************************************************************/
















/*







function gestsel(v, c){

if (c == true) {
makeRequest("keymod.asp", "t=add&cid="+cid+"&kid="+v)
}
else
{
makeRequest("keymod.asp", "t=del&cid="+cid+"&kid="+v)
}

}

function gestrel(k1, k2, c){

if (c == true) {
makeRequest("keyrel.asp", "t=add&k1="+k1+"&k2="+k2)
}
else
{
makeRequest("keyrel.asp", "t=del&k1="+k1+"&k2="+k2)
}

}

function gestrelmat(k1, k2, c, mat){
if (c == true){
makeRequest("keyrelmat.asp", "t=add&k1="+k1+"&k2="+k2+"&mat="+mat)}
else{
makeRequest("keyrelmat.asp", "t=del&k1="+k1+"&k2="+k2+"&mat="+mat)}
}

function gestdocmat(k1, c, mat){
if (c == true) {
makeRequest("docrelmat.asp", "t=add&k1="+k1+"&mat="+mat)}
else{
makeRequest("docrelmat.asp", "t=del&k1="+k1+"&mat="+mat)}
}

function gestmatmat(k1, c, mat){
if (c == true) {
makeRequest("matrelmat.asp", "t=add&k1="+k1+"&mat="+mat)}
else{
makeRequest("matrelmat.asp", "t=del&k1="+k1+"&mat="+mat)}
}

function gestmatctry(k1, c, mat){
if (c == true) {
makeRequest("matrelctry.asp", "t=add&k1="+k1+"&mat="+mat)}
else{
makeRequest("matrelctry.asp", "t=del&k1="+k1+"&mat="+mat)}
}


function gesttaxmat(k1, c, mat){
if (c == true){
makeRequest("matreltax.asp", "t=add&k1="+k1+"&mat="+mat)}
else{
makeRequest("matreltax.asp", "t=del&k1="+k1+"&mat="+mat)}
}


function savekey(k, txt, subtxt) {
//alert(k + ' ' + txt);
if (txt=="") {
alert("Zero Length strings are not ammitted as key values")
}
else
{
makeRequest("keymod.asp", "k="+k+"&txt="+escape(txt)+"&subtxt="+escape(subtxt))
eval("var d = document.getElementById('s"+ k +"')")
d.innerHTML= "<img src=\"/cm/img/savebn.gif\" border=\"0\">"
}
}

function delkey(k) { 

var agree=confirm("The key will be definetively removed");
if (agree)
{
makeRequest("keydel.asp", "k="+k)
setTimeout("location.href='?t=mod'" , 1000)
}

}


function makeRequest(url, params) {

        http_request = false;
		
        if (window.XMLHttpRequest) { // Mozilla, Safari,...
            http_request = new XMLHttpRequest();
            if (http_request.overrideMimeType) {
                //http_request.overrideMimeType('text/xml');
				http_request.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
            }
        } else if (window.ActiveXObject) { // IE
            try {
                http_request = new ActiveXObject("Msxml2.XMLHTTP");
            } catch (e) {
                try {
                    http_request = new ActiveXObject("Microsoft.XMLHTTP");
                } catch (e) {}
            }
        }

        if (!http_request) {
            alert('Impossibile creare una istanza XMLHTTP');
            return false;
        }
        //http_request.onreadystatechange = gestResp;
        //http_request.open('GET', url, false);
        //http_request.send(params); //name=value&anothername=othervalue&so=on
		//alert(http_request.responseText); 
		window.parent.status="Elaborazione...";
	  http_request.onreadystatechange = gestResp;
	  http_request.open('POST', url, true);
      http_request.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
      http_request.setRequestHeader("Content-length", params.length);
      // questa istruzione da problemi di lentezza con i browser piu vecchi
      //http_request.setRequestHeader("Connection", "close");
      http_request.send(params);
    }

    

function attivasave(p, txt) {
eval("var i = document.getElementById('o"+ p +"').value")
//eval("var ib = document.getElementById('ob"+ p +"').value")
eval("var d = document.getElementById('s"+ p +"')")
//alert(i + "*" + lnk);
if (!(p==txt)) {
d.innerHTML= "<a href=\"javascript:savekey('"+p+"', document.getElementById('o" + p + "').value, '')\"><img src=\"/cm/img/save.gif\" border=\"0\"></a>"
} 
}
	
function attivasave2(p, txt) {
eval("var i = document.getElementById('o"+ p +"').value")
eval("var ib = document.getElementById('ob"+ p +"').value")
eval("var d = document.getElementById('s"+ p +"')")
//alert(i + "*" + lnk);
if (!(p==txt)) {
d.innerHTML= "<a href=\"javascript:savekey('"+p+"', document.getElementById('o"+ p +"').value, document.getElementById('ob"+ p +"').value)\"><img src=\"/cm/img/save.gif\" border=\"0\"></a>"
} 
}	
	
	
function changeclass_l(n) {
var el1 = document.getElementById('l1');
var el2 = document.getElementById('l2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Key List"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_l(2);changeifr('ilanguages', 'languages.asp?t=mod');\">Key Management</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_l(1);changeifr('ilanguages', 'languages.asp');\">Key List</a>"
el2.className = "active" 
el2.innerHTML = "Key Management"
}

}

function changeclass_r(n) {
var el1 = document.getElementById('r1');
var el2 = document.getElementById('r2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Key List"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_r(2);changeifr('iregionalorganizations', 'regionalorganizations.asp?t=mod');\">Key Management</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_r(1);changeifr('iregionalorganizations', 'regionalorganizations.asp');\">Key List</a>"
el2.className = "active" 
el2.innerHTML = "Key Management"
}
}



function changeclass_m(n) {
var el1 = document.getElementById('m1');
var el2 = document.getElementById('m2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Mesh Search"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_m(2);changeifr('imesh', 'mesh.asp?t=tree');\">Mesh Tree</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_m(1);changeifr('imesh', 'mesh.asp');\">Mesh Search</a>"
el2.className = "active" 
el2.innerHTML = "Mesh Tree"
}

}

function changeclass_m2(n) {
var el1 = document.getElementById('m1');
var el2 = document.getElementById('m2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Mesh Search"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_m2(2);changeifr('imesh', 'mesh_k.asp?t=tree&cid=" & cid & "');\">Mesh Tree</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_m2(1);changeifr('imesh', 'mesh_k.asp&cid=" & cid & "');\">Mesh Search</a>"
el2.className = "active" 
el2.innerHTML = "Mesh Tree"
}
}

function changeclass_c(n,mat) {
var el1 = document.getElementById('ctry1');
var el2 = document.getElementById('ctry2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Find Countries"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_c(2,'"+ mat +"');changeifr('ictry', 'rel_ctry.asp?t=act&mat="+ mat +"');\">Rel. Countries</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_c(1,'"+ mat +"');changeifr('ictry', 'rel_ctry.asp?mat="+ mat +"');\">Find Countries</a>"
el2.className = "active" 
el2.innerHTML = "Rel. Countries"
}
}

function changeclass_g(n,mat) {
var el1 = document.getElementById('m1');
var el2 = document.getElementById('m2');
var el3 = document.getElementById('m3');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Mesh Search"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_g(2,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?t=tree&mat="+mat +"');\">Mesh Tree</a>"
el3.className = "" 
el3.innerHTML = "<a href=\"javascript:changeclass_g(3,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?t=act&mat="+mat +"');\">Mesh Keys</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_g(1,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?mat="+mat +"');\">Mesh Search</a>"
el2.className = "active" 
el2.innerHTML = "Mesh Tree"
el3.className =""
el3.innerHTML = "<a href=\"javascript:changeclass_g(3,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?t=act&mat="+mat +"');\">Mesh Keys</a>"
}
if (n==3) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_g(1,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?mat="+mat +"');\">Mesh Search</a>"
el2.className =""
el2.innerHTML = "<a href=\"javascript:changeclass_g(2,'"+mat +"');changeifr('imesh', 'gest_mesh.asp?mat="+mat +"&t=tree');\">Mesh Tree</a>"
el3.className = "active" 
el3.innerHTML = "Mesh Keys"
}
}

function changeclass_d(n,mat) {
var el1 = document.getElementById('doc1');
var el2 = document.getElementById('doc2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Find Docs"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_d(2,'"+mat +"');changeifr('idocs', 'key_doc.asp?t=act&mat="+mat +"');\">Sel. Docs</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_d(1,'"+mat +"');changeifr('idocs', 'key_doc.asp?mat="+mat +"');\">Find Docs</a>"
el2.className = "active" 
el2.innerHTML = "Sel. Docs"
}
}

function changeclass_m3(n,mat) {
var el1 = document.getElementById('mat1');
var el2 = document.getElementById('mat2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="Find Materials"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_m3(2,'"+mat +"');changeifr('imatrel', 'rel_mat.asp?t=act&mat="+mat +"');\">Rel. Materials</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_m3(1,'"+mat +"');changeifr('imatrel', 'rel_mat.asp?mat="+mat +"');\">Find Materials</a>"
el2.className = "active" 
el2.innerHTML = "Rel. Materials"
}
}

function changeclass_m4(n,mat) {
var el1 = document.getElementById('lt1');
var el2 = document.getElementById('lt2');

if (n==1) {
el1.className ="active"
el1.innerHTML ="S&M Search"
el2.className = "" 
el2.innerHTML = "<a href=\"javascript:changeclass_m4(2,'"+mat +"');changeifr('itax', 'rel_tax.asp?t=act&mat="+mat +"');\">S&M Keys</a>"
}
if (n==2) {
el1.className =""
el1.innerHTML = "<a href=\"javascript:changeclass_m4(1,'"+mat +"');changeifr('itax', 'rel_tax.asp?mat="+mat +"');\">S&M Search</a>"
el2.className = "active" 
el2.innerHTML = "S&M Keys"
}
}


function changeifr(ifr, param){
var i = document.getElementById(ifr);
i.src = param;
}

/*
***********************************************************
*********************                 *********************
*********************    Documents    *********************
*********************                 *********************
***********************************************************
*/

/*
function statusDocRis(doc,stat,img){
makeRequest("doc_status.asp", "doc="+ doc +"&new_status="+stat);
var new_src="/dse/sys_img/disattiva_doc.gif";
var new_status = 'D'
if (img.src.indexOf('disattiva') >= 0){
new_src="/dse/sys_img/attiva_doc.gif";
var new_status = 'A'
}
img.src = new_src;
new_doc_status = new_status
}

function statusDocRisList(doc,stat,img,ind){
makeRequest("doc_status.asp", "doc="+ doc +"&new_status="+stat);
var new_src="/dse/sys_img/disattiva_doc.gif";
var new_status = 'D'
if (img.src.indexOf('disattiva') >= 0){
new_src="/dse/sys_img/attiva_doc.gif";
var new_status = 'A'
}
img.src = new_src;
new_doc_status[ind] = new_status
}

function statusMatRis(mat,stat,img){
makeRequest("mat_status.asp", "mat="+ mat +"&new_status="+stat);
var new_src="/dse/sys_img/disattiva_doc.gif";
var new_status = 'D'
if (img.src.indexOf('disattiva') >= 0){
new_src="/dse/sys_img/attiva_doc.gif";
var new_status = 'A'
}
img.src = new_src;
new_mat_status = new_status
}

function statusMatRisList(mat,stat,img,ind){
makeRequest("mat_status.asp", "mat="+ mat +"&new_status="+stat);
var new_src="/dse/sys_img/disattiva_doc.gif";
var new_status = 'D'
if (img.src.indexOf('disattiva') >= 0){
new_src="/dse/sys_img/attiva_doc.gif";
var new_status = 'A'
}
img.src = new_src;
new_mat_status[ind] = new_status
}
*/

