mmenualign = 'left'  
adress='custom/design/arow_ap.gif'

var docx, docy

//code for centering the menu
if (mi) {  //Internet Explorer
	if (mac) {
		docx = parseInt((document.body.clientWidth / 2) - 452 , 10)
		docy = parseInt((document.body.clientHeight / 2) - 261 , 10)
		if ( document.body.clientWidth<=910 ) {
			docx = 4
		}
		if ( document.body.clientHeight<=586 ) {
			docy = 28
		}
	} else {
		docx = document.all.menuposdiv.offsetLeft
		docy = document.all.menuposdiv.offsetTop - 10
	}
}else {  //Netscape and Opera
	docx = Math.round((window.innerWidth/2)-451)
	docy = Math.round((window.innerHeight/2)-261)
	if ( window.innerWidth <= 910 )
		docx = 4
	if ( window.innerHeight <= 566 )
		docy = 28
}

xoff=docx
xoffsubs=docx
yoff=docy

if (mac) {
	yoff = yoff + 1  //menu position offset on the y-axis on MAC
}

width=185
height=23
heightn1=22
n2off=0
scroll = false

callbackfill('z','600')  //draws a colored bar behind menu level 1 items to ensure that the menu level 1 total width fits the html design
startmenuitem('a')
makemenuitem('01','','Home','go.aspx?to=default.aspx&navn=Home','65')
makemenuitem('02','sub02','Corporate','','90')
makemenuitem('03','sub03','News Focus','','100')
makemenuitem('04','sub04','Job','','50')
makemenuitem('05','sub05','Publications','','105')
makemenuitem('06','sub06','Contact','','75')
endmenuitem()

startsubitem('sub02')
makesubitem('sub0201','','Profile','go.aspx?to=default.aspx%3fm%3d2%26i%3d250&navn=Profile')
makesubitem('sub0202','sub0202','Organisation','')
makesubitem('sub0203','sub0203','Products','')
makesubitem('sub0204','sub0204','HR','')
makesubitem('sub0205','sub0205','Product Technology','')
makesubitem('sub0206','','Environment','go.aspx?to=default.aspx%3fm%3d2%26i%3d217&navn=Environment')
makesubitem('sub0207','','History','go.aspx?to=default.aspx%3fm%3d2%26i%3d218&navn=History')
makesubitem('sub0208','','Corporate Video Presentation','go.aspx?to=default.aspx%3fm%3d2%26i%3d276&navn=Corporate+Video+Presentation')
endsubitem()

startsubitem('sub03')
makesubitem('sub0301','','Latest from Aalborg Portland','go.aspx?to=default.aspx%3fm%3d3%26i%3d1%26pr%3d1&navn=Latest+from+Aalborg+Portland')
makesubitem('sub0302','','Newsletter','go.aspx?to=default.aspx%3fm%3d2%26i%3d274%26pluslink%3dtilmeldbreve&navn=Newsletter')
makesubitem('sub0303','sub0303','Press Room','')
makesubitem('sub0304','','Arrangement calendar','go.aspx?to=default.aspx%3fm%3d3%26i%3d4%26pr%3d1&navn=Arrangement+calendar')
makesubitem('sub0305','','Investor relations','go.aspx?to=default.aspx%3fm%3d2%26i%3d221&navn=Investor+relations')
endsubitem()

startsubitem('sub04')
makesubitem('sub0401','','Vacant Positions','go.aspx?to=default.aspx%3fm%3d2%26i%3d296&navn=Vacant+Positions')
makesubitem('sub0402','','CV Bank - Send your application','go.aspx?to=default.aspx%3fm%3d2%26i%3d297&navn=CV+Bank+-+Send+your+application')
makesubitem('sub0403','','Recruitment process','go.aspx?to=default.aspx%3fm%3d2%26i%3d298&navn=Recruitment+process')
makesubitem('sub0404','sub0404','HR Policy','')
endsubitem()

startsubitem('sub05')
makesubitem('sub0501','','Financial reports','go.aspx?to=default.aspx%3fm%3d2%26i%3d117&navn=Financial+reports')
makesubitem('sub0502','','Environmental reports','go.aspx?to=default.aspx%3fm%3d2%26i%3d118&navn=Environmental+reports')
makesubitem('sub0503','','Group publications','go.aspx?to=default.aspx%3fm%3d2%26i%3d120&navn=Group+publications')
endsubitem()

startsubitem('sub06')
makesubitem('sub0601','','Geography - World Wide','go.aspx?to=default.aspx%3fm%3d2%26i%3d299&navn=Geography+-+World+Wide')
makesubitem('sub0602','','Contact form','go.aspx?to=default.aspx%3fm%3d2%26i%3d277&navn=Contact+form')
endsubitem()

startsubsubitem('sub0202')
makesubsubitem('sub020201','Owner','go.aspx?to=default.aspx%3fm%3d2%26i%3d205&navn=Owner')
makesubsubitem('sub020202','Organisational structure','go.aspx?to=default.aspx%3fm%3d2%26i%3d252&navn=Organisational+structure')
makesubsubitem('sub020203','Board of Directors','go.aspx?to=default.aspx%3fm%3d2%26i%3d202&navn=Board+of+Directors')
makesubsubitem('sub020204','Executive Committee','go.aspx?to=default.aspx%3fm%3d2%26i%3d204&navn=Executive+Committee')
endsubsubitem()

startsubsubitem('sub0203')
makesubsubitem('sub020301','Grey cement','go.aspx?to=default.aspx%3fm%3d2%26i%3d211&navn=Grey+cement')
makesubsubitem('sub020302','White cement','go.aspx?to=default.aspx%3fm%3d2%26i%3d212&navn=White+cement')
makesubsubitem('sub020303','Ready-mixed concrete','go.aspx?to=default.aspx%3fm%3d2%26i%3d213&navn=Ready-mixed+concrete')
endsubsubitem()

startsubsubitem('sub0204')
makesubsubitem('sub020401','HR mission','go.aspx?to=default.aspx%3fm%3d2%26i%3d247&navn=HR+mission')
makesubsubitem('sub020402','HR strategy','go.aspx?to=default.aspx%3fm%3d2%26i%3d215&navn=HR+strategy')
makesubsubitem('sub020403','Organisation policy','go.aspx?to=default.aspx%3fm%3d2%26i%3d242&navn=Organisation+policy')
makesubsubitem('sub020404','People and competencies ','go.aspx?to=default.aspx%3fm%3d2%26i%3d243&navn=People+and+competencies+')
endsubsubitem()

startsubsubitem('sub0205')
makesubsubitem('sub020501','Services','go.aspx?to=default.aspx%3fm%3d2%26i%3d292&navn=Services')
makesubsubitem('sub020502','Expertise','go.aspx?to=default.aspx%3fm%3d2%26i%3d293&navn=Expertise')
endsubsubitem()

startsubsubitem('sub0303')
makesubsubitem('sub030301','Press policy','go.aspx?to=default.aspx%3fm%3d2%26i%3d253&navn=Press+policy')
makesubsubitem('sub030302','Press contact','go.aspx?to=default.aspx%3fm%3d2%26i%3d261&navn=Press+contact')
makesubsubitem('sub030303','Logo materials','go.aspx?to=default.aspx%3fm%3d2%26i%3d254&navn=Logo+materials')
makesubsubitem('sub030304','Press pictures','go.aspx?to=default.aspx%3fm%3d3%26i%3d6%26pr%3d3&navn=Press+pictures')
endsubsubitem()

startsubsubitem('sub0404')
makesubsubitem('sub040401','Human Resource ','go.aspx?to=default.aspx%3fm%3d2%26i%3d280&navn=Human+Resource+')
makesubsubitem('sub040402','Recruitment ','go.aspx?to=default.aspx%3fm%3d2%26i%3d281&navn=Recruitment+')
makesubsubitem('sub040403','Development of competences','go.aspx?to=default.aspx%3fm%3d2%26i%3d282&navn=Development+of+competences')
makesubsubitem('sub040404','Pay and employment','go.aspx?to=default.aspx%3fm%3d2%26i%3d283&navn=Pay+and+employment')
makesubsubitem('sub040405','Social responsibility','go.aspx?to=default.aspx%3fm%3d2%26i%3d284&navn=Social+responsibility')
makesubsubitem('sub040406','Health and welfare','go.aspx?to=default.aspx%3fm%3d2%26i%3d285&navn=Health+and+welfare')
makesubsubitem('sub040407','Resignation or retirement','go.aspx?to=default.aspx%3fm%3d2%26i%3d287&navn=Resignation+or+retirement')
endsubsubitem()

setmenu()