	function setValById(id_name, new_value){
		document.getElementById(id_name).value=new_value;
		return true;
	}
	function show_props(obj, obj_name) {
		for (var i in obj){
			document.write("<br>" + obj_name + "." + i + " = " + obj[i] );
		}
	}
function _hcc_popUp(urlStr,nameStr){ 
	wind=window.open( urlStr , nameStr , "screenx=0, screeny=0, width=640, height=440, scrollbars, resizable"); 
}
function init(fn) {
	if(self!=top){
		alert("This page has been opened within a window - contrary to copyright laws. The screen will reload immediately.");
		top.location.href=self.location.href; 
	}
	if(rooturl>""){
		ilen=rooturl.length;
		testhref=self.location.href;
		testh=testhref.substring(0,ilen);
		if(rooturl!=testh && testhref.substring(0,21)!="file:///C:/datafiles/" && testhref.substring(0,21)!="file:///c:/datafiles/" && testhref.substring(0,17)!="http://localhost/"){
alert(rooturl + " .vs. " + testhref);
			alert ("This page has been copied contrary to copyright laws. The screen will reload.");
			newhref=rooturl;
			if(pageurl>"" && pageurl.substr(0,1)!="<") newhref=rooturl+pageurl;
			top.location.href=newhref;
		}
	}
	if(!isIE){
		window.scrollbars.visible=true; 
		window.menubar.visible=true; 
		window.statusbar.visible=true; 
		window.toolbar.visible=true; 
		window.locationbar.visible=true; 
	}
}
	function gem(sfx,dom,usr,nam,op,stl){
		var nStr=usr;
		nStr+="@";
		nStr+=dom + "." + sfx;
		var oStr="<a ";
		if(stl) oStr+=stl;
		oStr+=" href=\"mailto:" + nStr;
		if(nam=="-")nam=nStr;
		oStr+="\">" + nam + "</a>";
		if(op) document.write(oStr);
		return oStr;
	}
	function navButtons(normal, active, indented, indentedActive, width, height ){
		normalButton = normal;
		activeButton = active;
		indentButton = indented;
		indActButton = indentedActive;
		buttonWidth  = width;
		buttonHeight = height;
	}
	function navOver(imgName){
		document.images[imgName].src = activeButton;
	}
	function navOut(imgName){
		document.images[imgName].src = normalButton;
	}
	function navIndOver(imgName){
		document.images[imgName].src = indActButton;
	}
	function navIndOut(imgName){
		document.images[imgName].src = indentButton;
	}
	function addNavLeft(navID, navURL, navText){
		var navTest;
		if( navURL.substring(0,3) == "../" ){
			navTest=navURL.substring(3);
		}else{
			navTest=navURL;
		}
		if( needSubNav == "yes" && subNavOutput != "" ) document.write( subNavOutput );
		subNavOutput = "";
		needSubNav = "no";
		if( thisFile.indexOf(navTest)<0 ){
			document.write( "<tr><td valign=top class=navLeft><a style='text-decoration:none;'"
					+ " onmouseover=\"navOver('" + navID 
					+ "');\" onmouseout=\"navOut('" + navID 
					+ "');\" href=\"" + navURL + "\"><img name=\"" + navID 
					+ "\" src=\"" + normalButton + "\" width=" 
					+ buttonWidth + " height=" + buttonHeight + " border=0></td><td valign=top><a"
					+ " style='text-decoration:none;'"
					+ " class=\"navLeft\" onmouseover=\"navOver('" + navID 
					+ "');\" onmouseout=\"navOut('" + navID 
					+ "');\" href=\"" + navURL + "\">" + navText + "</a></td></tr>" );
		}else{
			needSubNav = "yes";
			document.write( "<tr><td valign=top class=navLeft><img src=\"" + activeButton + "\" width="
					+ buttonWidth + " height=" + buttonHeight + " border=0></td><td "
					+ "valign=top class=\"navLeft\">" + navText + "</a></td></tr>" );
		}
	}
	function addSubNavItem(navID, navURL, navText){
		var navTest;
		if( navURL.substring(0,3) == "../" ){
			navTest=navURL.substring(3);
		}else{
			navTest=navURL;
		}
		if( thisFile.indexOf(navTest)<0 ){
			subNavOutput += "<tr><td valign=top class=navIndLeft><a style='text-decoration:none;'"
					+ " onmouseover=\"navIndOver('" + navID 
					+ "');\" onmouseout=\"navIndOut('" + navID 
					+ "');\" href=\"" + navURL + "\"><img name=\"" + navID 
					+ "\" src=\"" + indentButton + "\" width=" 
					+ buttonWidth + " height=" + buttonHeight + " border=0></td><td valign=top><a"
					+ " style='text-decoration:none;'"
					+ " class=\"navIndLeft\" onmouseover=\"navIndOver('" + navID 
					+ "');\" onmouseout=\"navIndOut('" + navID 
					+ "');\" href=\"" + navURL + "\">&nbsp;&nbsp;&nbsp;" 
					+ navText + "</a></td></tr>"
		}else{
			needSubNav = "yes";
			subNavOutput += "<tr><td valign=top class=navIndLeft><img src=\"" + indActButton + "\" width="
					+ buttonWidth + " height=" + buttonHeight + " border=0></td><td "
					+ "valign=top class=\"navIndLeft\"><spacer type=block width=15 height=1>" 
					+ navText + "</a></td></tr>"
	}}
	var thisFile = " " + document.location;
	var normalButton = "";
	var activeButton = "";
	var indentButton = ""
	var indActButton = "";
	var subNavOutput = "";
	var needSubNav   = "no";
	var isIE = false
	if ( navigator.userAgent.indexOf("MSIE") != -1 && navigator.appVersion.substring(0,1) > 3 &&
		((navigator.userAgent.indexOf("Windows") != -1) || (navigator.userAgent.indexOf("HP-UX") != -1))){
		isIE = true;
	}
