function getxmlhttp()
    {
    var xobj= false;
    try
	{
	xobj= new ActiveXObject("Msxml2.XMLHTTP");
	}
    catch(e)
	{
	try
	    {
	    xobj= new ActiveXObject("Microsoft.XMLHTTP");
	    }
	catch(E)
	    {
	    }
	}
    if(!xobj && typeof XMLHttpRequest != 'undefined') 
	{
	xobj = new XMLHttpRequest();
	}
    return xobj;
    }
var currtheme= "";
function showCity(id)
    {
    var divid= "div_" + id; 
    var imgid= "img_" + id;
    var ele= window.document.getElementById(divid);
    if(ele.style.display == "none") { ele.style.display = "block"; }
    else { ele.style.display = "none"; }
    changeImg(imgid);
    }
function showDiv(obj, flag)
    {
    if(flag) { obj.style.display = "block"; }
    else { obj.style.display = "none"; }
    }
function chImg(obj, mp, mm, flag)
    {
    if(flag)
	{
	if(mp == "dplus.gif") 
	    { 
	    obj.setAttribute("src", "/image/minus.gif"); 
	    obj.setAttribute("title", "Click to close"); 
	    }
	}
    else
	{
	if(mm == "minus.gif") 
	    { 
	    obj.setAttribute("src", "/image/dplus.gif"); 
	    obj.setAttribute("title", "Click to view cities"); 
	    }
	}
    }
function changeTxt(tObj)
    {
    if(tObj.innerHTML == "Hide all cities") { tObj.innerHTML= "Show all cities"; }
    else { tObj.innerHTML= "Hide all cities"; }
    }
function showAll(id)
    {
    var dive=window.document.getElementsByTagName('div');
    var imge=window.document.getElementsByTagName('img');
    var ele=window.document.getElementById(id);
    changeTxt(ele);
    var dreg= new RegExp("div_");
    for(var i= 0; i < dive.length; i++) 
	{
	if(dreg.test(dive[i].id))
	    {
	    if(ele.innerHTML == "Show all cities") { showDiv(dive[i], false); }
	    else { showDiv(dive[i], true); }
	    };
	}
    for(var j= 0; j < imge.length; j++)
	{
	var mp= imge[j].src.match(/dplus.gif/g);
	var mm= imge[j].src.match(/minus.gif/g);
	if(ele.innerHTML == "Show all cities") 
	    chImg(imge[j], mp, mm, false); 
	else 
	    chImg(imge[j], mp, mm, true); 
	}
    }
function changeImg(id)
    {
    var ele=window.document.getElementById(id);
    var match= ele.src.match(/dplus.gif/g);
    if(match == "dplus.gif") 
	{ 
	ele.setAttribute("src", "/image/minus.gif"); 
	ele.setAttribute("title", "Click to close"); 
	}
    else 
	{
	ele.setAttribute("src", "/image/dplus.gif"); 
	ele.setAttribute("title", "Click to view Cities"); 
	}
    }
function savetheme(name)
    {
    var obj= getxmlhttp();
    obj.open("GET", "/kommon/bin/sr.php?kall=wsetutheme&utheme=" + name);
    obj.onreadystatechange= function()
	{
	if(obj.readyState == 4 && obj.status == 200)
	    {
	    obj.abort();
	    obj= undefined;
	    }
	}
    obj.send(null);
    }
function settheme() 
    {
    var tvalue= window.document.getElementById('utheme').value;
    if(tvalue != "Select")
	{
	for(var j= 0; j < window.document.embeds.length; j++)
	    {
	    var em= window.document.embeds[j];
	    if(em != undefined && em != null && em.settheme_user)
		var rc= em.settheme_user(tvalue);
	    }
	var objtag= window.document.getElementsByTagName('object');
	for(var i= 0; i < objtag.length; i++)
	    {
	    var ob= objtag[i];
	    if(ob != undefined && ob != null && ob.settheme_user)
		var rc= ob.settheme_user(tvalue);
	    }
	var l= window.document.getElementById('theme_css');
	var himg1= window.document.getElementById('header_img1');
	var himg2= window.document.getElementById('header_img2');
	var css= tvalue.toLowerCase();
	if(l != undefined && l != null)
	    l.href= "/lib/" + css + ".css";
	if(himg1 != undefined && himg1 != null)
	    himg1.src= "/image/" + css + "_h1.gif";
	if(himg2 != undefined && himg2 != null)
	    himg2.src= "/image/" + css + "_h2.gif";
	savetheme(tvalue);
	currtheme= tvalue;
	}
    }
function loadthemes()
    {
    var thm= new Array();
    thm[0]= "citrus";
    thm[1]= "pink";
    thm[2]= "blue";
    var ld= window.document.getElementById('load_theme');
    var himg= window.document.getElementById('header_img');
    for(var i= 0; i < thm.length; i++)
	{
	ld.href= "/lib/" + thm[i] + ".css";
	//himg.src= "/image/" + thm[i] + ".jpg";
	//alert(himg);
	}
    }
function gotourl(loc)
    {
    window.location.href= loc;
    }
function hhs_finmac_data(section, macro)
    {
    var td=window.document.getElementById("hhsfinmac");
    td.innerHTML= "<font color=#006C00>Loading description ...</font>";
    var obj= getxmlhttp();
    obj.open("GET", "/kommon/bin/sr.php?kall=wfmdesc&macro=" + macro);
    obj.onreadystatechange= function()
	{
	if(obj.readyState == 4 && obj.status == 200)
	    {
	    td.innerHTML = obj.responseText;
	    }
	}
    obj.send(null);
    //alert(section + " == " + macro);
    }
function ftree_ajax(url)
    {
    var td=window.document.getElementById("hhsart");
    td.innerHTML= "<font color=#006C00>Loading description ...</font>";
    var obj= getxmlhttp();
    obj.open("GET", url);
    obj.onreadystatechange= function()
	{
	if(obj.readyState == 4 && obj.status == 200)
	    {
	    td.innerHTML = obj.responseText;
	    }
	}
    obj.send(null);
    /*
    alert(url);
    */
    }
function onfocusblur(id, status)
    {
    var txt= window.document.getElementById(id);
    var reg= new RegExp("Search region");
    if(status)
	{
	if(reg.test(txt.value)) txt.value= ""; 
	}
    else
	{
	if(txt.value == "") txt.value= "Search region";
	};
    }

function check_fpver(id)
    {
    var hasreqversion= DetectFlashVer(9, 0, 0);
    if(!hasreqversion)
	{
	var ob= window.document.getElementById(id);
	ob.innerHTML= "<table width=100% bgcolor='#FFFF00'><tr><td align='center'>Site requires flash player 9 or above<br><a target=\"_blank\" href=http://www.adobe.com/go/getflash/>Click here to get adobe flash player</a></td></tr></table>";
	};
    }
function check_flash_player(id) 
    {
    var hasreqversion= DetectFlashVer(9, 0, 0);
    if(!hasreqversion)
	{
	var ob= window.document.getElementById(id);
	ob.style.display= "block";
	};
    }
function pop_msg(kall)
    {
    popup= window.open("/kommon/bin/sr.php?repnum=1&kall=" + kall, 'my_window', 'width=500,height=100,scrollbars=1,screenX=300,screenY=300,hotkeys=1');
    }
function change_class(id, cl, f)
    {
    var grp= "grp" + id;
    var tb= window.document.getElementById(grp);
    var tb1= window.document.getElementById("tb_" + grp);
    if(tb != undefined && (tb1 == undefined || (tb1.style.display == "none" || f == 1)))
	{
	tb.className= cl;
	//alert(tb.className + grp);
	};
    }
function isidok(id)
    {
    var ob= window.document.getElementById(id);
    return ob != undefined;
    }
function isidvok(id, val)
    {
    var ob= window.document.getElementById(id);
    return ob != undefined && ob.style.display == val;
    }
function prv_nxt(idno, defa)
    {
    var cl= "";
    pid= "tb_grp" + (idno - 1);
    nid= "tb_grp" + (idno + 1);
    if((isidvok(pid, "block") || idno == 0) && (isidvok(nid, "block") || idno == grpcnt))
	{
	cl= "all";
	}
    else if(isidvok(pid, "block") && !isidvok(nid, "block"))
	{
	cl= "top";
	}
    else if(!isidvok(pid, "block") && isidvok(nid, "block"))
	{
	cl= "bot";
	}
    else if(!isidok(pid) && !isidok(nid))
	{
	cl= "all";
	}
    else
	{
	cl= defa; 
	//alert(pid + "--" + nid + "--" + idno + defa);
	};
    return cl;
    }
function open_grp(idno, syb)
    {
    var previd= idno - 1;
    var nextid= idno + 1;
    var tb= window.document.getElementById("tb_grp" + idno);
    var th= window.document.getElementById("th_grp" + idno);
    var im= window.document.getElementById("img_grp" + idno);
    var sm= window.document.getElementById("syb_" + syb);
    if(tb != undefined)
	tb.style.display = "block";
    if(th != undefined)
	th.className= "op_arr"; 
    if(im != undefined)
	im.setAttribute("title", "Click to close"); 
    if(sm != undefined)
	sm.className= "op_table_td1_" + syb; 
    //sm.setAttribute("src", "/image/" + syb + "_" + currtheme.toLowerCase() + ".gif"); 
    change_class(previd, "cl_table_" + prv_nxt(previd, (previd == 0 ? "all" : "bot")), 0); 
    change_class(idno  , "op_table", 1);
    change_class(nextid, "cl_table_" + prv_nxt(nextid, (nextid == grpcnt ? "all" : "top")), 0);
    }
function close_grp(idno, syb)
    {
    var previd= idno - 1;
    var nextid= idno + 1;
    var tb= window.document.getElementById("tb_grp" + idno);
    var th= window.document.getElementById("th_grp" + idno);
    var im= window.document.getElementById("img_grp" + idno);
    var sm= window.document.getElementById("syb_" + syb);
    if(tb != undefined)
	tb.style.display = "none";
    if(th != undefined)
	th.className= "cl_arr"; 
    if(im != undefined)
	im.setAttribute("title", "Click to open"); 
    if(sm != undefined)
	sm.className= "cl_table_top_td1_" + syb; 
	//sm.setAttribute("src", "/image/" + syb + "_w.gif"); 
    change_class(previd, "cl_table_" + prv_nxt(previd, (previd == 0 ? "top" : (previd == grpcnt ? "bot" : "mid"))), 0);
    change_class(idno  , "cl_table_" + prv_nxt(idno, (idno == 0 ? "top" : (idno == grpcnt ? "bot" : "mid"))), 1); 
    change_class(nextid, "cl_table_" + prv_nxt(nextid, (nextid == grpcnt ? "bot" : "mid")), 0);
    }
function show_group(id, syb)
    {
    idno= Math.floor(id.replace("grp", ""));
    var tb= window.document.getElementById("tb_" + id);
    //alert("currid:" + id);
    if(tb.style.display == "none") 
	{
	open_grp(idno, syb); 
	}
    else 
	{
	close_grp(idno, syb); 
	}
    }
function openclose_grp(opcl)
    {
    var grp= new Array("v", "i", "o", "g", "e", "a", "s");
    for(var i= 0; i <= grpcnt; i++)
	{
	opcl == "open" ? open_grp(i, grp[i]) : close_grp(i, grp[i]);
	};
    opcl == "open" ? open_grp(-2, "v") : close_grp(-2, "v");
    }
function openclose_grpchp()
    {
    var opcl= window.document.getElementById("opcl");
    var ok= false;
    var isopen= false;
    if(ok= (opcl != undefined))
	{
	isopen= opcl.innerHTML == "Open All Groups";
	opcl.innerHTML= isopen ? "Close All Groups" : "Open All Groups";
	};
    for(var i= 0; ok && i <= grpcnt; i++)
	{
	isopen ? open_grp(i, "xx") : close_grp(i, "xx");
	};
    }