function whereAmI() {
	var ret_string="";
	this_url=""+document.location
	this_url=this_url.toLowerCase()

	ix=this_url.indexOf("?")
if (ix>0) {
this_url=this_url.substring(0,ix)
}
ix=this_url.indexOf("http://")

if (ix==0) {

//check for metaplas and eldim (modified kls 2004.05.31)
ix=this_url.indexOf("/",10)
if (this_url.indexOf("metaplas")!=-1) {
home_url="http://www.sulzermetco.com/eprise/SulzerMetco/Sites/Metaplas/Main.htm"
this_url=this_url.substring(ix)
}
else {
home_url=this_url.substring(0,ix)
}

}
this_url=this_url.replace("http://www.sulzermetco.com","")
//alert(this_url)
	x=hashtable[this_url];
	if (!x) {
		//alert(this_url)	
		tmp=find_closest();
		//alert(tmp)
		x=hashtable[tmp];
	}
	if (x) {
	
	j=x.indexOf("dqm_subdescA")
	index=x.replace("dqm_subdescA","");
	i=index.lastIndexOf("_");
	
	if (j>=0) {
		menu=eval("dqm_subdescA"+index)
		url=eval("dqm__urlA"+index)
		ret_string="<a class='navsubOrange' href='"+url+"'  >"+menu+"</a>"
		while(i>0) {
			index=index.substring(0,i)
			i=index.lastIndexOf("_");
		
			if (i>0) {
				menu=eval("dqm_subdescA"+index)
				url=eval("dqm__urlA"+index)
				ret_string="<a class='navwhere' href='"+url+"'  >"+menu+"</a>&nbsp;<span class='navwhere'>></span>&nbsp;"+ret_string;	
			}
			else {
				//alert(index)
				menu=eval("dqm__maindescA"+index)
				url=eval("dqm__urlA"+index)
				ret_string="<a class='navwhere' href='"+url+"'  >"+menu+"</a>&nbsp;<span class='navwhere'>></span>&nbsp;"+ret_string;
				return("<a class='navwhere' href='"+home_url+"'>Home</a>&nbsp;<span class='navwhere'>></span>&nbsp;"+ret_string)
			}
		}
	}
	else {
		//
		
		index=x.replace("dqm__maindescA","");
		menu=eval("dqm__maindescA"+index)
		url=eval("dqm__urlA"+index)
		ret_string="<a class='navwhere' href='"+url+"'  >"+menu+"</a>&nbsp;<span class='navwhere'></span>&nbsp;"+ret_string;
		return("<a class='navwhere' href='"+home_url+"'>Home</a>&nbsp;<span class='navwhere'>></span>&nbsp;"+ret_string)

		
	}
	}
	return("<a class='navwhere' href='"+home_url+"'>Home</a>&nbsp;<span class='navwhere'>></span>&nbsp;"+ret_string)

}


function sameLevel() {
	var ret_string=""
	this_url=""+document.location
	this_url=this_url.toLowerCase()
ix=this_url.indexOf("?")
if (ix>0) {
this_url=this_url.substring(0,ix)
}
ix=this_url.indexOf("http://")
if (ix==0) {
ix=this_url.indexOf("/",10)
//modified 2004.05.31 by kls
if (this_url.indexOf("metaplas")>0) {
this_url=this_url.substring(ix)
}

}
//alert(this_url)
this_url=this_url.replace("http://www.sulzermetco.com","")

	x=hashtable[this_url];
	if (!x) {
		tmp=find_closest();
		//alert(tmp)
		x=hashtable[tmp];
	}
	if (x) {
	index=x.replace("dqm_subdescA","");
	i=index.lastIndexOf("_");
	ret_string=" ";
	if (i>0) {
		first_part=index.substring(0,i)
		j=0
		while (j<100) {
			tmp="window.dqm__urlA"+first_part+"_"+j
			//alert(tmp)
			if (!eval(tmp)) {
				return(ret_string)
				
			}
			else {	
				//alert("t2")
				menu=eval("dqm_subdescA"+first_part+"_"+j)
				url=eval("dqm__urlA"+first_part+"_"+j)
				img=""
				if (!eval(tmp+"_0")) {
					img=""
				}
				else {
					img="<img border=0 src='/eprsup/Sulzer//triangle_orange.gif'>"
				
				}
				//alert(menu)
				ret_string=ret_string+"<tr><td>&nbsp;</td><td><a class='navsubOrange' href='"+url+"'>"+menu+"&nbsp;"+img+"</a></td></tr><tr height=5><td class=small>&nbsp;</td></tr>";
			}

			j++;
		}
	}
	}
	return (ret_string)
	
}

function traverse(index,find) {
	var i=0
	//alert("traverse"+index)
	while (i<10) {
		
		//alert("url:"+"dqm__url"+index+i)

		
		var tmp="window.dqm__urlA"+index+i
		if (!eval(tmp)) {
			//alert("found")
			return("")
		}
		else {
			//return("")
			url=eval("window.dqm__urlA"+index+i)
			//
			li=url.lastIndexOf("/")
			url2=url.substring(0,li)
			//alert(url+find)
			if (url2.toLowerCase()==find) {
			  //alert("found")
			  return (url)
			}
			else {
				var test="window.dqm__urlA"+index+i+"_0"
				
				if (eval(test)) {
					//alert(test)
					x=traverse(index+i+"_",find)
					if (x!="") {
						return x
					}
				}
			}
		}

		i=i+1
	}
	return("")
}

function find_closest() {
	ret_string=""
	this_url=""+document.location
	this_url=this_url.toLowerCase()
	this_url=this_url.replace("scripts/iseprise.dll/sulzercom/sites","com")
	tmp=this_url.indexOf("/eprise")
	if (tmp>5) {
		this_url=this_url.substring(tmp)
	}
	ix=this_url.indexOf("?")
	if (ix>0) {
		this_url=this_url.substring(0,ix)
	}
	//alert("len ht"+hashtable.length)
	//alert("entry: "+hashtable["http://www.sulzer.com/com/newsandmedia/pressreleases/pressreleaselist.htm"])
	index=0
	//this_url="http://www.sulzer.com/com/financials/annualreport2001/demo/test/test"
	x=traverse("",this_url)
	while (x==""&&this_url!="") {
		li=this_url.lastIndexOf("/")
		this_url=this_url.substring(0,li)
		//alert(this_url)
		x=traverse("",this_url)
	}
	//alert (x)
	
return (x.toLowerCase())
}

