//** All Levels Navigational Menu- (c) Dynamic Drive DHTML code library: http://www.dynamicdrive.com
//** Script Download/ instructions page: http://www.dynamicdrive.com/dynamicindex1/ddlevelsmenu/
//** Usage Terms: http://www.dynamicdrive.com/notice.htm
//** July 7th, 08'- Creation Date
//** July 16th, 08'- Updated to v 1.3:
	//1) Adds "Side Bar" orientation option. 
	//2) Drop Down Menus now auto adjust their positioning if too close to either right or bottom window edges.
	//3) Enhanced IFRAME shim "coverage" on the page.
//** July 19th, 08'- Updated to v 1.31: Drop down menu now positions at top of window edge if there's neither room downwards or upwards to settle.
//** Aug 13th, 08'- v1.32: Moved "rel" attribute from menu's <li> elements to inner <a>, for validation reasons
//** Sept 10th, 08'- Updated to v 1.4:
	//1) Added optional "sliding" animation when sub menus are revealed.
	//2) Arrow images now dynamically positioned, instead of relying on CSS's "right" property
//** Oct 11th, 08'- Updated to v 1.5:
	//1) Sliding animation behavior tweaked
	//2) Added ability to disable iframeshim, customize speed of sliding animation
//** Dec 23rd, 08'- Updated to v 2.0:
	//1) Animation speed refined to be function of time (ie: 1 sec)
	//2) Added two animations that can be individually enabled/disabled- "slide in" and "fade in".
	//3) Script now automatically moves HTML for all sub menus to the end of the page, to avoid any containership issues if they are nested in other elements.
//** Jan 12, 09'- Updated to v 2.1:
	//1) Added ability to disable the arrow images from the top level items (see option "showarrow")
	//2) For Top Level Menu items containing a SPAN element (for sliding doors technique), arrow images are inserted inside SPAN.
var ddlevelsmenu={
enableshim: true, //enable IFRAME shim to prevent drop down menus from being hidden below SELECT or FLASH elements? (tip: disable if not in use, for efficiency)
arrowpointers:{
	downarrow: ["/ecblank.gif", 1,1], //[path_to_down_arrow, arrowwidth, arrowheight]
	rightarrow: ["/a556c5/homepage.nsf/arrow-right.gif", 12,12], //[path_to_right_arrow, arrowwidth, arrowheight]
	showarrow: {toplevel: false, sublevel: true} //Show arrow images on top level items and sub level items, respectively?
},
hideinterval: 200, //delay in milliseconds before entire menu disappears onmouseout.
effects: {enableswipe: true, enablefade: true, duration: 500},
httpsiframesrc: "blank.htm", //If menu is run on a secure (https) page, the IFRAME shim feature used by the script should point to an *blank* page *within* the secure area to prevent an IE security prompt. Specify full URL to that page on your server (leave as is if not applicable).
///No need to edit beyond here////////////////////
topmenuids: [], //array containing ids of all the primary menus on the page
topitems: {}, //object array containing all top menu item links
subuls: {}, //object array containing all ULs
lastactivesubul: {}, //object object containing info for last mouse out menu item's UL
topitemsindex: -1,
ulindex: -1,
hidetimers: {}, //object array timer
shimadded: false,
nonFF: !/Firefox[\/\s](\d+\.\d+)/.test(navigator.userAgent), //detect non FF browsers
getoffset:function(what, offsettype){
	return (what.offsetParent)? what[offsettype]+this.getoffset(what.offsetParent, offsettype) : what[offsettype]
},
getoffsetof:function(el){
	el._offsets={left:this.getoffset(el, "offsetLeft"), top:this.getoffset(el, "offsetTop")}
},
getwindowsize:function(){
	this.docwidth=window.innerWidth? window.innerWidth-10 : this.standardbody.clientWidth-10
	this.docheight=window.innerHeight? window.innerHeight-15 : this.standardbody.clientHeight-18
},
gettopitemsdimensions:function(){
	for (var m=0; m<this.topmenuids.length; m++){
		var topmenuid=this.topmenuids[m]
		for (var i=0; i<this.topitems[topmenuid].length; i++){
			var header=this.topitems[topmenuid][i]
			var submenu=document.getElementById(header.getAttribute('rel'))
			header._dimensions={w:header.offsetWidth, h:header.offsetHeight, submenuw:submenu.offsetWidth, submenuh:submenu.offsetHeight}
		}
	}
},
isContained:function(m, e){
	var e=window.event || e
	var c=e.relatedTarget || ((e.type=="mouseover")? e.fromElement : e.toElement)
	while (c && c!=m)try {c=c.parentNode} catch(e){c=m}
	if (c==m)
		return true
	else
		return false
},
addpointer:function(target, imgclass, imginfo, BeforeorAfter){
	var pointer=document.createElement("img")
	pointer.src=imginfo[0]
	pointer.style.width=imginfo[1]+"px"
	pointer.style.height=imginfo[2]+"px"
	if(imgclass=="rightarrowpointer"){
		pointer.style.left=target.offsetWidth-imginfo[2]-2+"px"
	}
	pointer.className=imgclass
	var target_firstEl=target.childNodes[target.firstChild.nodeType!=1? 1 : 0] //see if the first child element within A is a SPAN (found in sliding doors technique)
	if (target_firstEl && target_firstEl.tagName=="SPAN"){
		target=target_firstEl //arrow should be added inside this SPAN instead if found
	}
	if (BeforeorAfter=="before")
		target.insertBefore(pointer, target.firstChild)
	else
		target.appendChild(pointer)
},
css:function(el, targetclass, action){
	var needle=new RegExp("(^|\\s+)"+targetclass+"($|\\s+)", "ig")
	if (action=="check")
		return needle.test(el.className)
	else if (action=="remove")
		el.className=el.className.replace(needle, "")
	else if (action=="add" && !needle.test(el.className))
		el.className+=" "+targetclass
},
addshimmy:function(target){
	var shim=(!window.opera)? document.createElement("iframe") : document.createElement("div") //Opera 9.24 doesnt seem to support transparent IFRAMEs
	shim.className="ddiframeshim"
	shim.setAttribute("src", location.protocol=="https:"? this.httpsiframesrc : "about:blank")
	shim.setAttribute("frameborder", "0")
	target.appendChild(shim)
	try{
		shim.style.filter='progid:DXImageTransform.Microsoft.Alpha(style=0,opacity=0)'
	}
	catch(e){}
	return shim
},
positionshim:function(header, submenu, dir, scrollX, scrollY){
	if (header._istoplevel){
		var scrollY=window.pageYOffset? window.pageYOffset : this.standardbody.scrollTop
		var topgap=header._offsets.top-scrollY
		var bottomgap=scrollY+this.docheight-header._offsets.top-header._dimensions.h
		if (topgap>0){
			this.shimmy.topshim.style.left=scrollX+"px"
			this.shimmy.topshim.style.top=scrollY+"px"
			this.shimmy.topshim.style.width="99%"
			this.shimmy.topshim.style.height=topgap+"px" //distance from top window edge to top of menu item
		}
		if (bottomgap>0){
			this.shimmy.bottomshim.style.left=scrollX+"px"
			this.shimmy.bottomshim.style.top=header._offsets.top + header._dimensions.h +"px"
			this.shimmy.bottomshim.style.width="99%"
			this.shimmy.bottomshim.style.height=bottomgap+"px" //distance from bottom of menu item to bottom window edge
		}
	}
},
hideshim:function(){
	this.shimmy.topshim.style.width=this.shimmy.bottomshim.style.width=0
	this.shimmy.topshim.style.height=this.shimmy.bottomshim.style.height=0
},
buildmenu:function(mainmenuid, header, submenu, submenupos, istoplevel, dir){
	header._master=mainmenuid //Indicate which top menu this header is associated with
	header._pos=submenupos //Indicate pos of sub menu this header is associated with
	header._istoplevel=istoplevel
	if (istoplevel){
		this.addEvent(header, function(e){
		ddlevelsmenu.hidemenu(ddlevelsmenu.subuls[this._master][parseInt(this._pos)])
		}, "click")
	}
	this.subuls[mainmenuid][submenupos]=submenu
	header._dimensions={w:header.offsetWidth, h:header.offsetHeight, submenuw:submenu.offsetWidth, submenuh:submenu.offsetHeight}
	this.getoffsetof(header)
	submenu.style.left=0
	submenu.style.top=0
	submenu.style.visibility="hidden"
	this.addEvent(header, function(e){ //mouseover event
		if (!ddlevelsmenu.isContained(this, e)){
			var submenu=ddlevelsmenu.subuls[this._master][parseInt(this._pos)]
			if (this._istoplevel){
				ddlevelsmenu.css(this, "selected", "add")
			clearTimeout(ddlevelsmenu.hidetimers[this._master][this._pos])
			}
			ddlevelsmenu.getoffsetof(header)
			var scrollX=window.pageXOffset? window.pageXOffset : ddlevelsmenu.standardbody.scrollLeft
			var scrollY=window.pageYOffset? window.pageYOffset : ddlevelsmenu.standardbody.scrollTop
			var submenurightedge=this._offsets.left + this._dimensions.submenuw + (this._istoplevel && dir=="topbar"? 0 : this._dimensions.w)
			var submenubottomedge=this._offsets.top + this._dimensions.submenuh
			//Sub menu starting left position
			var menuleft=(this._istoplevel? this._offsets.left + (dir=="sidebar"? this._dimensions.w : 0) : this._dimensions.w)
			if (submenurightedge-scrollX>ddlevelsmenu.docwidth){
				menuleft+= -this._dimensions.submenuw + (this._istoplevel && dir=="topbar" ? this._dimensions.w : -this._dimensions.w)
			}
			submenu.style.left=menuleft+"px"
			//Sub menu starting top position
			var menutop=(this._istoplevel? this._offsets.top + (dir=="sidebar"? 0 : this._dimensions.h) : this.offsetTop)
			if (submenubottomedge-scrollY>ddlevelsmenu.docheight){ //no room downwards?
				if (this._dimensions.submenuh<this._offsets.top+(dir=="sidebar"? this._dimensions.h : 0)-scrollY){ //move up?
					menutop+= - this._dimensions.submenuh + (this._istoplevel && dir=="topbar"? -this._dimensions.h : this._dimensions.h)
				}
				else{ //top of window edge
					menutop+= -(this._offsets.top-scrollY) + (this._istoplevel && dir=="topbar"? -this._dimensions.h : 0)
				}
			}
			submenu.style.top=menutop+"px"
			if (ddlevelsmenu.enableshim && (ddlevelsmenu.effects.enableswipe==false || ddlevelsmenu.nonFF)){ //apply shim immediately only if animation is turned off, or if on, in non FF2.x browsers
				ddlevelsmenu.positionshim(header, submenu, dir, scrollX, scrollY)
			}
			else{
				submenu.FFscrollInfo={x:scrollX, y:scrollY}
			}
			ddlevelsmenu.showmenu(header, submenu, dir)
		}
	}, "mouseover")
	this.addEvent(header, function(e){ //mouseout event
		var submenu=ddlevelsmenu.subuls[this._master][parseInt(this._pos)]
		if (this._istoplevel){
			if (!ddlevelsmenu.isContained(this, e) && !ddlevelsmenu.isContained(submenu, e)) //hide drop down ul if mouse moves out of menu bar item but not into drop down ul itself
				ddlevelsmenu.hidemenu(submenu)
		}
		else if (!this._istoplevel && !ddlevelsmenu.isContained(this, e)){
			ddlevelsmenu.hidemenu(submenu)
		}
	}, "mouseout")
},
setopacity:function(el, value){
	el.style.opacity=value
	if (typeof el.style.opacity!="string"){ //if it's not a string (ie: number instead), it means property not supported
		el.style.MozOpacity=value
		if (el.filters){
			el.style.filter="progid:DXImageTransform.Microsoft.alpha(opacity="+ value*100 +")"
		}
	}
},
showmenu:function(header, submenu, dir){
	if (this.effects.enableswipe || this.effects.enablefade){
		if (this.effects.enableswipe){
			var endpoint=(header._istoplevel && dir=="topbar")? header._dimensions.submenuh : header._dimensions.submenuw
			submenu.style.width=submenu.style.height=0
			submenu.style.overflow="hidden"
		}
		if (this.effects.enablefade){
			this.setopacity(submenu, 0) //set opacity to 0 so menu appears hidden initially
		}
		submenu._curanimatedegree=0
		submenu.style.visibility="visible"
		clearInterval(submenu._animatetimer)
		submenu._starttime=new Date().getTime() //get time just before animation is run
		submenu._animatetimer=setInterval(function(){ddlevelsmenu.revealmenu(header, submenu, endpoint, dir)}, 10)
	}
	else{
		submenu.style.visibility="visible"
	}
},
revealmenu:function(header, submenu, endpoint, dir){
	var elapsed=new Date().getTime()-submenu._starttime //get time animation has run
	if (elapsed<this.effects.duration){
		if (this.effects.enableswipe){
			if (submenu._curanimatedegree==0){ //reset either width or height of sub menu to "auto" when animation begins
				submenu.style[header._istoplevel && dir=="topbar"? "width" : "height"]="auto"
			}
			submenu.style[header._istoplevel && dir=="topbar"? "height" : "width"]=(submenu._curanimatedegree*endpoint)+"px"
		}
		if (this.effects.enablefade){
			this.setopacity(submenu, submenu._curanimatedegree)
		}
	}
	else{
		clearInterval(submenu._animatetimer)
		if (this.effects.enableswipe){
			submenu.style.width="auto"
			submenu.style.height="auto"
			submenu.style.overflow="visible"
		}
		if (this.effects.enablefade){
			this.setopacity(submenu, 1)
			submenu.style.filter=""
		}
		if (this.enableshim && submenu.FFscrollInfo) //if this is FF browser (meaning shim hasn't been applied yet
			this.positionshim(header, submenu, dir, submenu.FFscrollInfo.x, submenu.FFscrollInfo.y)
	}
	submenu._curanimatedegree=(1-Math.cos((elapsed/this.effects.duration)*Math.PI)) / 2
},
hidemenu:function(submenu){
	if (typeof submenu._pos!="undefined"){ //if submenu is outermost UL drop down menu
		this.css(this.topitems[submenu._master][parseInt(submenu._pos)], "selected", "remove")
		if (this.enableshim)
			this.hideshim()
	}
	clearInterval(submenu._animatetimer)
	submenu.style.left=0
	submenu.style.top="-1000px"
	submenu.style.visibility="hidden"
},
addEvent:function(target, functionref, tasktype) {
	if (target.addEventListener)
		target.addEventListener(tasktype, functionref, false);
	else if (target.attachEvent)
		target.attachEvent('on'+tasktype, function(){return functionref.call(target, window.event)});
},
init:function(mainmenuid, dir){
	this.standardbody=(document.compatMode=="CSS1Compat")? document.documentElement : document.body
	this.topitemsindex=-1
	this.ulindex=-1
	this.topmenuids.push(mainmenuid)
	this.topitems[mainmenuid]=[] //declare array on object
	this.subuls[mainmenuid]=[] //declare array on object
	this.hidetimers[mainmenuid]=[] //declare hide entire menu timer
	if (this.enableshim && !this.shimadded){
		this.shimmy={}
		this.shimmy.topshim=this.addshimmy(document.body) //create top iframe shim obj
		this.shimmy.bottomshim=this.addshimmy(document.body) //create bottom iframe shim obj
		this.shimadded=true
	}
	var menubar=document.getElementById(mainmenuid)
	var alllinks=menubar.getElementsByTagName("a")
	this.getwindowsize()
	for (var i=0; i<alllinks.length; i++){
		if (alllinks[i].getAttribute('rel')){
			this.topitemsindex++
			this.ulindex++
			var menuitem=alllinks[i]
			this.topitems[mainmenuid][this.topitemsindex]=menuitem //store ref to main menu links
			var dropul=document.getElementById(menuitem.getAttribute('rel'))
			document.body.appendChild(dropul) //move main ULs to end of document
			dropul.style.zIndex=2000 //give drop down menus a high z-index
			dropul._master=mainmenuid  //Indicate which main menu this main UL is associated with
			dropul._pos=this.topitemsindex //Indicate which main menu item this main UL is associated with
			this.addEvent(dropul, function(){ddlevelsmenu.hidemenu(this)}, "click")
			var arrowclass=(dir=="sidebar")? "rightarrowpointer" : "downarrowpointer"
			var arrowpointer=(dir=="sidebar")? this.arrowpointers.rightarrow : this.arrowpointers.downarrow
			if (this.arrowpointers.showarrow.toplevel)
				this.addpointer(menuitem, arrowclass, arrowpointer, (dir=="sidebar")? "before" : "after")
			this.buildmenu(mainmenuid, menuitem, dropul, this.ulindex, true, dir) //build top level menu
			dropul.onmouseover=function(){
				clearTimeout(ddlevelsmenu.hidetimers[this._master][this._pos])
			}
			this.addEvent(dropul, function(e){ //hide menu if mouse moves out of main UL element into open space
				if (!ddlevelsmenu.isContained(this, e) && !ddlevelsmenu.isContained(ddlevelsmenu.topitems[this._master][parseInt(this._pos)], e)){
					var dropul=this
					if (ddlevelsmenu.enableshim)
						ddlevelsmenu.hideshim()
					ddlevelsmenu.hidetimers[this._master][this._pos]=setTimeout(function(){
						ddlevelsmenu.hidemenu(dropul)
					}, ddlevelsmenu.hideinterval)
				}
			}, "mouseout")
			var subuls=dropul.getElementsByTagName("ul")
			for (var c=0; c<subuls.length; c++){
				this.ulindex++
				var parentli=subuls[c].parentNode
				if (this.arrowpointers.showarrow.sublevel)
					this.addpointer(parentli.getElementsByTagName("a")[0], "rightarrowpointer", this.arrowpointers.rightarrow, "before")
				this.buildmenu(mainmenuid, parentli, subuls[c], this.ulindex, false, dir) //build sub level menus
			}
		}
	} //end for loop
	this.addEvent(window, function(){ddlevelsmenu.getwindowsize(); ddlevelsmenu.gettopitemsdimensions()}, "resize")
},
setup:function(mainmenuid, dir){
	this.addEvent(window, function(){ddlevelsmenu.init(mainmenuid, dir)}, "load")
}
}
function roShow(docid, cn) {
var curRot;
var akey = "aRT"
if (cn == imgRotLen) {
    cn = 0;
  }
//curRot = currentRot;
for (var m=0; m<imgRotLen; m++){
if (cn == m) {
//document.getElementById("aRT" + m.toString()).className = "tocHighSelected" 
document.getElementById("TDT" + m.toString()).className = "tocHighSelected" 
currentRot = m
} else {
//document.getElementById("aRT" + m.toString()).className = "tocHigh" 
document.getElementById("TDT" + m.toString()).className = "tocHigh" 
}
}
tmp = "DIV"
tmp1 ="DTitle"
tmp2 ="DDesc"
document.getElementById("spanIMGtgt").innerHTML = document.getElementById(tmp + docid).innerHTML
document.getElementById("spanTitle").innerHTML = document.getElementById(tmp1 + docid).innerHTML
document.getElementById("spanCont").innerHTML = document.getElementById(tmp2 + docid).innerHTML
//alert(docid)
}
function RotateImgs() {
var curRot;
var akey = "aRT"
if (currentRot == imgRotLen) {
    currentRot = 0;
  }
curRot = currentRot;
for (var m=0; m<imgRotLen; m++){
if (currentRot == m) {
//document.getElementById("aRT" + m.toString()).className = "tocHighSelected" 
document.getElementById("TDT" + m.toString()).className = "tocHighSelected" 
//document.getElementById("aRT" + m.toString()).innerHTML = document.getElementById("aRT" + m.toString()).innerHTML
} else {
//document.getElementById("aRT" + m.toString()).className = "tocHigh" 
document.getElementById("TDT" + m.toString()).className = "tocHigh" 
//document.getElementById("aRT" + m.toString()).innerHTML = document.getElementById("aRT" + m.toString()).innerHTML
}
}

tmp = "DIV"
tmp1 ="DTitle"
tmp2 ="DDesc"
document.getElementById("spanIMGtgt").innerHTML = document.getElementById(tmp + arrRot[curRot]).innerHTML
document.getElementById("spanTitle").innerHTML = document.getElementById(tmp1 + arrRot[curRot]).innerHTML
document.getElementById("spanCont").innerHTML = document.getElementById(tmp2 + arrRot[curRot]).innerHTML 

  currentRot++;
}
function loadDefaultXMLSSL(xmlpath, xmlFile, start, record, flag)
{
document.getElementById("SPNews").innerHTML = "<br><center><img src='/A556C5/homepage.nsf/gears.gif'></center>";
if (flag== "new") 
		path = xmlpath + "/" + xmlFile + "?ReadViewEntries&start=" + start + "&count="+ record
	else
		path = xmlpath + "/" + xmlFile + "?ReadViewEntries&count=-1"
	
	xmlhttp=null;
	if (window.XMLHttpRequest)
  	{  // code for IE7, Firefox, Opera, etc.
  		xmlhttp =new XMLHttpRequest();
  	}
	else if (window.ActiveXObject)
  	{// code for IE6, IE5
  		xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
  	}
	if (xmlhttp!=null)
  	{	
		if (window.XMLHttpRequest) {	
  		xmlhttp.onreadystatechange=function() {
		state_Change();
		}
		} else {
		xmlhttp.onreadystatechange=state_Change();
		}
  		xmlhttp.open("GET",path,false);
  		xmlhttp.send(null);
  	}
	else
  	{
  		alert("Your browser does not support XMLHTTP.");
  	}
//alert("A")
}
function loadDefaultXMLSSLPrint(xmlpath, xmlFile, start, record, flag)
{
document.getElementById("SPNewsPrint").innerHTML = "<br><center><img src='/A556C5/homepage.nsf/gears.gif'></center>";
if (flag== "new") 
		path = xmlpath + "/" + xmlFile + "?ReadViewEntries&start=" + start + "&count="+ record
	else
		path = xmlpath + "/" + xmlFile + "?ReadViewEntries&count=-1"
	
	xmlhttp=null;
	if (window.XMLHttpRequest)
  	{  // code for IE7, Firefox, Opera, etc.
  		xmlhttp =new XMLHttpRequest();
  	}
	else if (window.ActiveXObject)
  	{// code for IE6, IE5
  		xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
  	}
	if (xmlhttp!=null)
  	{	
		if (window.XMLHttpRequest) {	
  		xmlhttp.onreadystatechange=function() {
		state_Change();
		}
		} else {
		xmlhttp.onreadystatechange=state_Change();
		}
  		xmlhttp.open("GET",path,false);
  		xmlhttp.send(null);
  	}
	else
  	{
  		alert("Your browser does not support XMLHTTP.");
  	}
//alert("A")
}
function state_Change()
{
	
	var parser = "";
	if (xmlhttp.readyState==4)
  	{// 4 = "loaded"
  		if (xmlhttp.status==200)
    		{// 200 = "OK"
    			if (window.ActiveXObject) {	
			source = new ActiveXObject("Microsoft.XMLDOM");
    			source.async = false;
    			source.loadXML(xmlhttp.responseText);
			} else {
			parser=new DOMParser();
  			 source=parser.parseFromString(xmlhttp.responseText,"text/xml");
			//retrieveNodevalues(vnodes);
			//source=xmlhttp.responseXML;
			}
    			//alert(xmlhttp.responseText);
    			if(source.parseError.errorCode != 0)
				showError();
	    	}
  		else
    		{
    			alert("Problem retrieving XML data:" + xmlhttp.statusText);
    		}
  	}
}
function loadDefaultXMLRestrictToCategory(xmlpath, xmlFile, key, start, record)
{
	
	document.getElementById("SPNews").innerHTML = "<br><center><img src='/A556C5/homepage.nsf/gears.gif'></center>";
	path = xmlpath + "/" + xmlFile + "?ReadViewEntries&RestrictToCategory=" + key + "&start=" + start + "&count="+ record
	
	xmlhttp=null;
	if (window.XMLHttpRequest)
  	{  // code for IE7, Firefox, Opera, etc.
  		xmlhttp =new XMLHttpRequest();
  	}
	else if (window.ActiveXObject)
  	{// code for IE6, IE5
  		xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
  	}
	if (xmlhttp!=null)
  	{	
		if (window.XMLHttpRequest) {	
  		xmlhttp.onreadystatechange=function() {
		state_Change();
		}
		} else {
		xmlhttp.onreadystatechange=state_Change();
		}
  		xmlhttp.open("GET",path,false);
  		xmlhttp.send(null);
  	}
	else
  	{
  		alert("Your browser does not support XMLHTTP.");
  	}
}


//Defines the getReadyState function
// 0 Object is not initialized
// 1 Loading object is loading data 
// 2 Loaded object has loaded data 
// 3 Data from object can be worked with 
// 4 Object completely initialized  
function getReadyState() 
{
	if (source.readyState == 4) 
		return true;
	setTimeout("getReadyState()", 100);
}
//Defines the showError() function		
function showError() 
{
	var strError = new String;
	var err = source.parseError;
	strError = 'Error!\n' +
	'file url: '+err.url +' \n'+
	'line no.:'+err.line +'\n'+
	'char: '+ err.linepos + '\n' +
	'source: '+err.srcText+'\n'+
	'code: '+err.errorCode+'\n'+
	'description: '+err.reason+'\n';
	//document.all.item("HTMLresults").innerHTML = strError;
	alert(strError);
}
function retrieveNodevalues(key) 
{
var nresult="";
//document.getElementById("sphell").innerHTML = "blank2a"
//if (getReadyState()) 
//	{
if (window.ActiveXObject) {	
source.setProperty("SelectionLanguage", "XPath");		
var node = source.selectNodes(key);
for(i = 0; i < node.length ; i++) 
			{
				nresult = nresult + node.item(i).text			
			}
} else {
//alert("CIM")
//alert(source.readyState)
//document.getElementById("iddummy").innerHTML="start2"
xmlDoc=document.implementation.createDocument("","",null);
//document.getElementById("iddummy").innerHTML="start2a"
xmlDoc.async=false;
//document.getElementById("iddummy").innerHTML="start2b"
xmlDoc = xmlhttp.responseXML;
//document.getElementById("iddummy").innerHTML="start2c"
var mnodes=xmlDoc.evaluate(key, xmlDoc, null, XPathResult.ANY_TYPE,null);
//var mnodes=source.evaluate(key, source, null, XPathResult.ANY_TYPE,null);
var mresult=mnodes.iterateNext();
//document.getElementById("iddummy").innerHTML="start3"
while(mresult)
  {
nresult = nresult + mresult.childNodes[0].nodeValue
mresult=mnodes.iterateNext();
  }
}
	       
//	}
return nresult;
}
function retrieveNodevaluesPrint(key) 
{
var nresult="";
//alert(key)
//if (getReadyState())
//	{
if (window.ActiveXObject) {	
source.setProperty("SelectionLanguage", "XPath");		
var node = source.selectNodes(key);
for(i = 0; i < node.length ; i++) 
			{
				if((i+1)%2==0) {
				nresult = nresult + node.item(i).text + "</tr><tr><td>&nbsp;</td><td>&nbsp;</td></tr>"
				} else {
				nresult = "<tr>" + nresult + node.item(i).text
				}				
			}
} else {
xmlDoc=document.implementation.createDocument("","",null);
xmlDoc.async=false;
xmlDoc = xmlhttp.responseXML;
var mnodes=xmlDoc.evaluate(key, xmlDoc, null, XPathResult.ANY_TYPE,null);
var mresult=mnodes.iterateNext();
i=0
while(mresult)
  {
				if((i+1)%2==0) {
				nresult = nresult + mresult.childNodes[0].nodeValue +  "</tr><tr><td>&nbsp;</td><td>&nbsp;</td></tr>"
				} else {
				nresult = "<tr>" + nresult +  mresult.childNodes[0].nodeValue
				}	
//nresult = nresult + mresult.childNodes[0].nodeValue
i=i+1
mresult=mnodes.iterateNext();
  }
}
return nresult;
}
function fncNwPaging(currpg,jourpath)
 {
var xpage="";
 var tmpnxt ="";
var tmpprv = "";
if ( currpg <= xprvpg) {
  xprvpg = xprvpg - jmaxpg;
  xnxtpg = xnxtpg - jmaxpg;
} 
if ( currpg >= xnxtpg) {
  xnxtpg = xnxtpg + jmaxpg;
  xprvpg = xprvpg + jmaxpg;
}
if (jloop < jmaxpg) {
jmaxpg = jloop
}
//alert(jmaxpg + "heelo")
for(g =0; g<jmaxpg;g++) {
	if (jloop > jmaxpg) {
		if ((g+1+xprvpg) == currpg) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + xprvpg +1)+ "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCall(" +  (g + xprvpg +1) + ",\"" + jourpath +"\")' class='LinkRed'>" + (g + xprvpg +1) + "</a>&nbsp;"	
		}
	} else {
		if (currpg == (g+1)) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + 1) + "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCall(" + (g+1)+ ",\"" + jourpath +"\")' class='LinkRed'>" + (g + 1) + "</a>&nbsp;"
		}
	}
}
if (jloop > 0) {
if (xnxtpg >= jloop) {
//tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>»</span>"
tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/A556C5/homepage.nsf/redright.gif' border=0></span>"
} else {
//tmpnxt = "<a href='javascript:fncPgCall(" + xnxtpg + ",\"" + jourpath +"\")'  class='LinkRed'>»</a>"
tmpnxt = "<a href='javascript:fncPgCall(" + xnxtpg + ",\"" + jourpath +"\")'  class='LinkRed'><img src='/A556C5/homepage.nsf/redright.gif' border=0></a>"
}
if (xprvpg == 0) {
// tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>«</span>"
 tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/A556C5/homepage.nsf/redleft.gif' border=0></span>"
} else {
//tmpprv = "<a href='javascript:fncPgCall(" + xprvpg + ",\"" + jourpath +"\")' class='LinkRed'>«</a>"
tmpprv = "<a href='javascript:fncPgCall(" + xprvpg + ",\"" + jourpath +"\")' class='LinkRed'><img src='/A556C5/homepage.nsf/redleft.gif' border=0></a>"
}
} 
document.getElementById("nwPaging").innerHTML = tmpprv +"&nbsp;" + xpage +"&nbsp;" + tmpnxt
}
function fncNwPagingPrinted(currpg,jourpath)
 {
var xpage="";
 var tmpnxt ="";
var tmpprv = "";
if ( currpg <= xprvpg) {
  xprvpg = xprvpg - jmaxpg;
  xnxtpg = xnxtpg - jmaxpg;
} 
if ( currpg >= xnxtpg) {
  xnxtpg = xnxtpg + jmaxpg;
  xprvpg = xprvpg + jmaxpg;
}
if (jloop < jmaxpg) {
jmaxpg = jloop
}
//alert(jmaxpg + "heelo")
for(g =0; g<jmaxpg;g++) {
	if (jloop > jmaxpg) {
		if ((g+1+xprvpg) == currpg) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + xprvpg +1)+ "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCallPrinted(" +  (g + xprvpg +1) + ",\"" + jourpath +"\")' class='LinkRed'>" + (g + xprvpg +1) + "</a>&nbsp;"	
		}
	} else {
		if (currpg == (g+1)) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + 1) + "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCallPrinted(" + (g+1)+ ",\"" + jourpath +"\")' class='LinkRed'>" + (g + 1) + "</a>&nbsp;"
		}
	}
}
if (jloop > 0) {
if (xnxtpg >= jloop) {
//tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>»</span>"
tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/A556C5/homepage.nsf/redright.gif' border=0></span>"
} else {
//tmpnxt = "<a href='javascript:fncPgCallPrinted(" + xnxtpg + ",\"" + jourpath +"\")'  class='LinkRed'>»</a>"
tmpnxt = "<a href='javascript:fncPgCallPrinted(" + xnxtpg + ",\"" + jourpath +"\")'  class='LinkRed'><img src='/A556C5/homepage.nsf/redright.gif' border=0></a>"
}
if (xprvpg == 0) {
// tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>«</span>"
 tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/A556C5/homepage.nsf/redleft.gif' border=0></span>"
} else {
//tmpprv = "<a href='javascript:fncPgCallPrinted(" + xprvpg + ",\"" + jourpath +"\")' class='LinkRed'>«</a>"
tmpprv = "<a href='javascript:fncPgCallPrinted(" + xprvpg + ",\"" + jourpath +"\")' class='LinkRed'><img src='/A556C5/homepage.nsf/redleft.gif' border=0></a>"
}
} 
document.getElementById("nwPaging").innerHTML = tmpprv +"&nbsp;" + xpage +"&nbsp;" + tmpnxt
}
function fncNwPagingCat(currpg,jourpath,catCookie)
 {
var xpage="";
 var tmpnxt ="";
var tmpprv = "";
if ( currpg <= xprvpg) {
  xprvpg = xprvpg - jmaxpg;
  xnxtpg = xnxtpg - jmaxpg;
} 
if ( currpg >= xnxtpg) {
  xnxtpg = xnxtpg + jmaxpg;
  xprvpg = xprvpg + jmaxpg;
}
if (jloop < jmaxpg) {
jmaxpg = jloop
}
for(g =0; g<jmaxpg;g++) {
	if (jloop > jmaxpg) {
		if ((g+1+xprvpg) == currpg) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + xprvpg +1)+ "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCallCat(" +  (g + xprvpg +1) + ",\"" + jourpath +"\",\""+catCookie +"\")' class='LinkRed'>" + (g + xprvpg +1) + "</a>&nbsp;"	
		}
	} else {
		if (currpg == (g+1)) {
		xpage = xpage + "<span style='text-decoration:none;color:black;font-family:arial, Helvetica, sans-serif;l;font-size:11px'>"+  (g + 1) + "</span>&nbsp;"
		} else {
		xpage = xpage + "<a href='javascript:fncPgCallCat(" + (g+1)+ ",\"" + jourpath +"\",\""+catCookie +"\")' class='LinkRed'>" + (g + 1) + "</a>&nbsp;"
		}
	}
}
if (jloop > 0) {
if (xnxtpg >= jloop) {
//tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>»</span>"
tmpnxt =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/A556C5/homepage.nsf/redright.gif' border=0></span>"
} else {
//tmpnxt = "<a href='javascript:fncPgCallCat(" + xnxtpg + ",\"" + jourpath +"\")'  class='LinkRed'>»</a>"
tmpnxt = "<a href='javascript:fncPgCallCat(" + xnxtpg + ",\"" + jourpath +"\",\""+catCookie +"\")'  class='LinkRed'><img src='/A556C5/homepage.nsf/redright.gif' border=0></a>"
}
if (xprvpg == 0) {
// tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'>«</span>"
 tmpprv =  "<span style='text-decoration:none;color:black;font-family:arial;l;font-size:11px'><img src='/a556c5/homepage.nsf/redleft.gif' border=0></span>"
} else {
//tmpprv = "<a href='javascript:fncPgCallCat(" + xprvpg + ",\"" + jourpath +"\")' class='LinkRed'>«</a>"
tmpprv = "<a href='javascript:fncPgCallCat(" + xprvpg + ",\"" + jourpath +"\",\""+catCookie +"\")' class='LinkRed'><img src='/a556c5/homepage.nsf/redleft.gif' border=0></a>"
}
} 
document.getElementById("nwPaging").innerHTML = tmpprv +"&nbsp;" + xpage +"&nbsp;" + tmpnxt
}
function fncPgCall(currpg,jourpath)
 {
var tmpstart = ""
tmpstart = (currpg * jcount) - (jcount -1)
loadDefaultXMLSSL(jourpath, viewname, tmpstart, jcount, "new")
fetchHTML = retrieveNodevalues(vnodes); 
document.getElementById("SPNews").innerHTML = "<table width='100%' border='0' cellpadding='5' cellspacing='1' class='normaltext'>" + fetchHTML + "</table>";
fncNwPaging(currpg,jourpath)
}
function fncPgCallPrinted(currpg,jourpath)
 {
var tmpstart = ""
tmpstart = (currpg * jcount) - (jcount -1)
loadDefaultXMLSSLPrint(jourpath, "lsvPublishedPrinted", tmpstart, jcount, "new")
fetchHTML = retrieveNodevaluesPrint(vnodes); 
document.getElementById("SPNewsPrint").innerHTML = "<table width='100%' border='0' cellpadding='5' cellspacing='1' class='normaltext'>" + fetchHTML + "</table>";
fncNwPagingPrinted(currpg,jourpath)
}
function fncPgCallCat(currpg,jourpath,catCookie)
 {
//falert("crap")
var tmpstart = ""
tmpstart = (currpg * jcount) - (jcount -1)
//alert("crap1")
loadDefaultXMLRestrictToCategory(jourpath, viewname,catCookie, tmpstart, jcount)
//alert("A")
fetchHTML = retrieveNodevalues(vnodes);
document.getElementById("SPNews").innerHTML = "<table width='100%' border='0' cellpadding='5' cellspacing='1' class='normaltext'>" + fetchHTML + "</table>";
fncNwPagingCat(currpg,jourpath,catCookie)
}
/*
old set cookie
function setCookie(c_name,value,expiredays)
{
var exdate=new Date();exdate.setDate(exdate.getDate()+expiredays);
document.cookie=c_name+ "=" +escape(value)+
((expiredays==null) ? "" : ";expires="+exdate.toGMTString());
}
*/
function setCookie(name, value, expires, path, domain, secure)
{
	document.cookie = name + "=" + escape(value) + ((expires) ? "; expires=" + expires : "") + ((path) ? "; path=" + path : "") + ((domain) ? "; domain=" + domain : "") + ((secure) ? "; secure" : "");
							
}
function getCookie(c_name)
{
if (document.cookie.length>0)
  {
  c_start=document.cookie.indexOf(c_name + "=");
  if (c_start!=-1)
    { 
    c_start=c_start + c_name.length+1; 
    c_end=document.cookie.indexOf(";",c_start);
    if (c_end==-1) c_end=document.cookie.length;
    return unescape(document.cookie.substring(c_start,c_end));
    } 
  }
return "";
}
function DeleteCookie (name) {  
alert(name)
//	var exp = new Date();  
//	exp.setTime (exp.getTime() - 1);  
	document.cookie = name + "=" + "; expires=Thu, 01-Jan-70 00:00:01 GMT;"
}
function fncwindowopen(tmpURL) {
var strOpener = "resizable=yes,width=800,height=600,toolbar=no,menubar=no,scrollbars=yes,location=no,titlebar=no" 
window.open(tmpURL,"",strOpener)
}
function GetFlash(param,xmlpath,xmlFile) {
document.getElementById("flvvideo").innerHTML = "<br><center><img src='/A556C5/homepage.nsf/gears.gif'></center>";
document.getElementById("flvtitle").innerHTML = "<br><center>Loading......</center>";
document.getElementById("flvcontent").innerHTML = "";
var fnodes = "/viewentries/viewentry/entrydata[@name='FlashAttachmentFlash']/text"
var tnodes = "/viewentries/viewentry/entrydata[@name='FlashTitle']/text"
var cnodes = "/viewentries/viewentry/entrydata[@name='FlashDescription']/text"
LoadGetFlash(param,xmlpath,xmlFile)
 var fHTML = retrieveNodevalues(fnodes);
var gHTML = retrieveNodevalues(tnodes); 
var zHTML = retrieveNodevalues(cnodes);  
document.getElementById("flvvideo").innerHTML = fHTML
document.getElementById("flvtitle").innerHTML = gHTML
document.getElementById("flvcontent").innerHTML = zHTML
}
function LoadGetFlash(param,xmlpath,xmlFile) {
	path = "/"+ xmlpath + "/" + xmlFile + "?ReadViewEntries&RestrictToCategory=" + param
	
	xmlhttp=null;
	if (window.XMLHttpRequest)
  	{  // code for IE7, Firefox, Opera, etc.
  		xmlhttp =new XMLHttpRequest();
  	}
	else if (window.ActiveXObject)
  	{// code for IE6, IE5
  		xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
  	}
	if (xmlhttp!=null)
  	{	
		if (window.XMLHttpRequest) {	
  		xmlhttp.onreadystatechange=function() {
		state_Change();
		}
		} else {
		xmlhttp.onreadystatechange=state_Change();
		}
  		xmlhttp.open("GET",path,false);
  		xmlhttp.send(null);
  	}
	else
  	{
  		alert("Your browser does not support XMLHTTP.");
  	}
//alert("A")
}
function cycle3() {
var skey;

  if (currentAd3 == imgCt3) {
    currentAd3 = 0;
  }
var banner3 = document.getElementById('adBanner3');
var link3 = document.getElementById('adLink3');
  banner3.src=imgs3[currentAd3];
  banner3.alt=alt3[currentAd3];
  document.getElementById('adLink3').href=lnks3[currentAd3];

for (var m=0; m<imgCt3; m++){
if (currentAd3 == m) {
skey = "rptspan" + m;
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpagecur' name='rptpagenum'>" + (m + 1) +"</a>"
} else {
skey = "rptspan" + m;
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpage' name='rptpagenum'>" + (m + 1)+"</a>"
}
}

if (currentAd3 == 0) {
document.getElementById("spanbck").innerHTML = "«";
} else {
document.getElementById("spanbck").innerHTML = "<a href='javascript:spanbck()' class='rptpagebck'>«</a>"
}

if (currentAd3 == (imgCt3-1)) {
document.getElementById("spanfwd").innerHTML = "»";
} else {
document.getElementById("spanfwd").innerHTML = "<a href='javascript:cycle3()' class='rptpagefwd'>»</a>"
}
 
  currentAd3++;
}


function switch3(param) {

  if (currentAd3 == imgCt3) {
    currentAd3 = 0
  }
var skey;
var banner3 = document.getElementById('adBanner3');
var link3 = document.getElementById('adLink3');
banner3.src=imgs3[param];
banner3.alt=alt3[param];
document.getElementById('adLink3').href=lnks3[param];
for (var m=0; m<imgCt3; m++){
if (currentAd3 == m) {
skey = ("rptspan" + m);
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpagecur'>" + (m + 1) +"</a>"
} else {
skey = ("rptspan" + m);
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpage'>" + (m + 1)+"</a>"
}
}

if (currentAd3 == 0) {
document.getElementById("spanbck").innerHTML = "«";
} else {
document.getElementById("spanbck").innerHTML = "<a href='javascript:spanbck()' class='rptpagebck'>«</a>"
}

if (currentAd3 == (imgCt3-1)) {
document.getElementById("spanfwd").innerHTML = "»"
} else {
document.getElementById("spanfwd").innerHTML = "<a href='javascript:cycle3()' class='rptpagefwd'>»</a>"
}
currentAd3++;
}


function spanbck() {

currentAd3--;

var skey;

  if (currentAd3 == imgCt3) {
    currentAd3 = 0
  }
var banner3 = document.getElementById('adBanner3');
var link3 = document.getElementById('adLink3');
  banner3.src=imgs3[currentAd3];
  banner3.alt=alt3[currentAd3];
  document.getElementById('adLink3').href=lnks3[currentAd3];

for (var m=0; m<imgCt3; m++){
if (currentAd3 == m) {
skey = "rptspan" + m;
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpagecur'>" + (m + 1) +"</a>"
} else {
skey = "rptspan" + m;
document.getElementById(skey).innerHTML = "<a href='javascript:switch3("+m+")' class='rptpage'>" + (m + 1)+"</a>"
}
}

if (currentAd3 == 0) {
document.getElementById("spanbck").innerHTML = "«"
} else {
document.getElementById("spanbck").innerHTML = "<a href='javascript:spanbck()' class='rptpagebck'>«</a>"
}

if (currentAd3 == (imgCt3-1)) {
document.getElementById("spanfwd").innerHTML = "»"
} else {

document.getElementById("spanfwd").innerHTML = "<a href='javascript:cycle3()' class='rptpagefwd'>»</a>"
}
  
}
/***********************************************
* AnyLink Vertical Menu- © Dynamic Drive (www.dynamicdrive.com)
* This notice MUST stay intact for legal use
* Visit http://www.dynamicdrive.com/ for full source code
***********************************************/
//Contents for menu 1
var menu1=new Array()
menu1[0]='<a href="/a556c5/journals.nsf/TAB_HomeW?openform&cat=Technology%20&%20Operations^lang=english^">Technology & Operations</a>'
menu1[1]='<a href="/a556c5/homepage.nsf/0/BEA33EF742AB584F482574660031543C?opendocument">Solutions Centre</a>'
menu1[2]='<a href="/A556C5/BA.nsf/frmBA?openform">SAS on business analytics</a>'
menu1[3]='<a href="/A556C5/CoreBank.nsf/frmBA?openform">Oracle on core banking</a>'
menu1[4]='<a href="/A556C5/Temenos.nsf/frmBA?openform">Temenos</a>'
 
//Contents for menu 2, and so on
var menu2=new Array()
menu2[0]='<a href="/A556C5/BA.nsf/frmBA?openform">Business Analytics White Papers</a>'
menu2[1]='<a href="/A556C5/CoreBank.nsf/frmBA?openform">Core Banking</a>'
//Contents for menu 3
var menu3=new Array()
menu3[0]='<a href="/A556C5/BA.nsf/frmBA?openform">SAS on business analytics</a>'
menu3[1]='<a href="/A556C5/CoreBank.nsf/frmBA?openform">Oracle on core banking</a>'
menu3[2]='<a href="/A556C5/Temenos.nsf/frmBA?openform">Temenos</a>'
		
var disappeardelay=250  //menu disappear speed onMouseout (in miliseconds)
var horizontaloffset=2 //horizontal offset of menu from default location. (0-5 is a good value)
/////No further editting needed
var ie4=document.all
var ns6=document.getElementById&&!document.all
if (ie4||ns6)
document.write('<div id="dropmenudiv" style="visibility:hidden;width: 220px" onMouseover="clearhidemenu()" onMouseout="dynamichide(event)"></div>')
function getposOffset(what, offsettype){
var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
var parentEl=what.offsetParent;
while (parentEl!=null){
totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
parentEl=parentEl.offsetParent;
}
return totaloffset;
}
function showhide(obj, e, visible, hidden, menuwidth){
if (ie4||ns6)
dropmenuobj.style.left=dropmenuobj.style.top=-500
dropmenuobj.widthobj=dropmenuobj.style
dropmenuobj.widthobj.width=menuwidth
if (e.type=="click" && obj.visibility==hidden || e.type=="mouseover")
obj.visibility=visible
else if (e.type=="click")
obj.visibility=hidden
}
function iecompattest(){
return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}
function clearbrowseredge(obj, whichedge){
var edgeoffset=0
if (whichedge=="rightedge"){
var windowedge=ie4 && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15
dropmenuobj.contentmeasure=dropmenuobj.offsetWidth
if (windowedge-dropmenuobj.x-obj.offsetWidth < dropmenuobj.contentmeasure)
edgeoffset=dropmenuobj.contentmeasure+obj.offsetWidth
}
else{
var topedge=ie4 && !window.opera? iecompattest().scrollTop : window.pageYOffset
var windowedge=ie4 && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18
dropmenuobj.contentmeasure=dropmenuobj.offsetHeight
if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure){ //move menu up?
edgeoffset=dropmenuobj.contentmeasure-obj.offsetHeight
if ((dropmenuobj.y-topedge)<dropmenuobj.contentmeasure) //up no good either? (position at top of viewable window then)
edgeoffset=dropmenuobj.y
}
}
return edgeoffset
}
function populatemenu(what){
if (ie4||ns6)
dropmenuobj.innerHTML=what.join("")
}
function dropdownmenu(obj, e, menucontents, menuwidth){
if (window.event) event.cancelBubble=true
else if (e.stopPropagation) e.stopPropagation()
clearhidemenu()
dropmenuobj=document.getElementById? document.getElementById("dropmenudiv") : dropmenudiv
populatemenu(menucontents)
if (ie4||ns6){
showhide(dropmenuobj.style, e, "visible", "hidden", menuwidth)
dropmenuobj.x=getposOffset(obj, "left")
dropmenuobj.y=getposOffset(obj, "top")
dropmenuobj.style.left=dropmenuobj.x-clearbrowseredge(obj, "rightedge")+obj.offsetWidth+horizontaloffset+"px"
dropmenuobj.style.top=dropmenuobj.y-clearbrowseredge(obj, "bottomedge")+"px"
}
return clickreturnvalue()
}
function clickreturnvalue(){
if (ie4||ns6) return false
else return true
}
function contains_ns6(a, b) {
while (b.parentNode)
if ((b = b.parentNode) == a)
return true;
return false;
}
function dynamichide(e){
if (ie4&&!dropmenuobj.contains(e.toElement))
delayhidemenu()
else if (ns6&&e.currentTarget!= e.relatedTarget&& !contains_ns6(e.currentTarget, e.relatedTarget))
delayhidemenu()
}
function hidemenu(e){
if (typeof dropmenuobj!="undefined"){
if (ie4||ns6)
dropmenuobj.style.visibility="hidden"
}
}
function delayhidemenu(){
if (ie4||ns6)
delayhide=setTimeout("hidemenu()",disappeardelay)
}
function clearhidemenu(){
if (typeof delayhide!="undefined")
clearTimeout(delayhide)
}