// Version:	0.6.0
// Build:	3
// Date:	2007-05-16
// Author:	Dietrich Roland Pehlke
// Client:	Schlangenberg mbH (AT)
// State:	@dev

var d=document;
var lastMenu =0;
var lastInfo =0;

function menu(aRefNum) {
	if (aRefNum != lastMenu) {
		if (lastMenu > 0) setState (lastMenu, 'hidden');
	} else {
		resetMenu();
		return 1;
	}
	lastMenu = aRefNum;
	setState(lastMenu, 'visible');
	return 1;
}

function setState (aNum, aState) {
	var ref = d.getElementById('submenu_'+aNum);
	if (ref) ref.style.visibility = aState;
}

function resetMenu () {
	if (lastMenu > 0) {
		setState (lastMenu, 'hidden');
		lastMenu = 0;
	}
}

function show_text( aNumber ) {
	var wf = "";	
	wf = wf+"width=400";
	wf = wf+ ",height=400";
	wf = wf+ ",resizable=yes";
	wf = wf+ ",scrollbars=yes";
	wf = wf+ ",menubar=no";
	wf = wf+ ",toolbar=no";
	wf = wf+ ",directories=no";
	wf = wf+ ",location=no";
	wf = wf+ ",status=yes";	
	
	var wfile = 'text_'+ aNumber +'.html';
	
	window.open(wfile,"SchlangenbergDetail",wf);
}

window.onmouseup = function test_for_reset(e) {
	// alert("aRef: "+e.screenX);
	if (lastMenu > 0)  resetMenu();
}