<!-- ============================================================ -->
//Generic AJAX function		
var http = createRequestObject();
var arr_val = new Array();
var arr_text = new Array();
var mainList, targetList, listSelected

function createRequestObject() {
    if (window.XMLHttpRequest)
      {
      http=new XMLHttpRequest()
      }
    // code for IE
    else if (window.ActiveXObject)
      {
      http=new ActiveXObject("Microsoft.XMLHTTP")
      }
}

function ajax_getOptions(prmThis, prmTarget, prmSelected){
    createRequestObject();
    
    mainList =prmThis;
    targetList = prmTarget;
    listSelected = prmSelected;
    str_param = "?target=" + targetList + "&parent=" + mainList.value;

    tmp_target = document.getElementById(targetList)
    var elOptNew = document.createElement('option');
    tmp_target.length = 0;
	   
	elOptNew = new Option("Loading...",0);
	tmp_target.options.add(elOptNew, 0)
	        
    http.open('GET', '/library/scripts/inc_buildList.aspx' + str_param, true);		
    http.onreadystatechange = buildList;
    http.send(null);

}

function buildList() {
    if(!http){return;}            
    if(http.readyState == 4){	
        //Read values from xml	
        var temp1, temp2;	
        arr_val.length = 0;
        arr_text.length = 0;

	    var str_xml = http.responseXML;

	    var arrOptions1 = str_xml.getElementsByTagName("va");
	    for (x=0;x<arrOptions1.length;x++){
	        arr_val[x]=arrOptions1[x].firstChild.data 
	    }
	    var arrOptions2 = str_xml.getElementsByTagName("te");
	    for (x=0;x<arrOptions2.length;x++){
	        arr_text[x]=arrOptions2[x].firstChild.data 	       
	    }
	    str_xml = "";
	    
	    
	    tmp_target = document.getElementById(targetList)
	    var elOptNew = document.createElement('option');
	    tmp_target.options.length = 0;

        //Read XML into select
	    for(x=0; x<arr_val.length; x++){
	        elOptNew = new Option(arr_text[x],arr_val[x]);
	        tmp_target.options.add(elOptNew, x)			    
	    }

    }		
}