// dyna.js v1.2 by David Kearns
// copyright 2000,2001 by Doceus, Inc.
//
// These routines should provide a framework for
// commonly used DHTML functions, in a way that should
// divorce the browser from the code, so that the 
// developer need not worry about what platform the
// user is using.
//

// For purposes of the Intranet, we will attempt to guess
// what browser is being used.
//
// There are obvious problems with this scheme, as browsers
// are constantly changing, but I feel that in this case
// this should be sufficient
//
var NN = (document.layers) ? 1 : 0;
var IE = (document.all) ? 1 : 0;
var D2 = (document.getElementById ) ? 1 : 0;

var dynaJsDebug = 0;

if (dynaJsDebug) window.status = 'Start debug info...';

// Capture events for cursor tracking. Setup global variables
var cursorX = 0;
var cursorY = 0;
document.onmousemove = mouseTrack;
if (NN)
{	document.captureEvents(Event.MOUSEMOVE);
}

// Debug info. Uncomment if you wish to use it.
// window.defaultStatus = 'NN:'+NN+' IE:'+IE+' D2:'+D2;

// Return a pointer to the object specified by the ID "reference".
// In netscape 4 this must be a layer.
// The Object reference returned by this is suitable for passing
// to any function below that has an obj attribute.
//
// In order to assure this, you can use CF_DHTMLContainer
function dyObject(reference)
{	if (D2)
	{	return document.getElementById(reference);
	}
	else if (IE)
	{	return document.all[reference];
	}
	else if (NN)
	{	return document.layers[reference];
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

////////////////////////////////////////////////////////////////////////////////////////////

// Provide a method for error reporting, in the odd case that a user
// is not using one of the approved browsers
// NN 4.x, IE 4.x or higher, NN 6.x
function err(msg)
{	//alert(msg);
	exit;
}

// Cursor move triggers event to set global variables
function mouseTrack(e) {
	if (NN)
	{	cursorX=e.pageX;
		cursorY=e.pageY;
	}
	else if (D2 && IE)
	{	cursorX=event.x+document.body.scrollLeft; 
		cursorY=event.y+document.body.scrollTop;
	}
	else if (IE) 
	{	cursorX=event.x; 
		cursorY=event.y;
	}
	else if (D2)
	{	cursorX=e.clientX + parseInt(window.scrollX);
		cursorY=e.clientY + parseInt(window.scrollY);
	}
	// debug info
	// window.status = cursorX + ' ' + cursorY;
}

// Return the y coordinate of the object
function dyTop(obj)
{	if (IE)
	{	return(parseInt(obj.style.pixelTop));
	}
	else if (D2)
	{	return(parseInt(obj.style.top));
	}
	else if (NN)
	{	return(obj.top);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Return the x coordinate of the object
function dyLeft(obj)
{	if (IE)
	{	return(parseInt(obj.style.pixelLeft));
	}
	else if (D2)
	{	return (parseInt(obj.style.left));
	}
	else if (NN)
	{	return(obj.left);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Return the height of the object in pixels
function dyHeight(obj)
{	if (IE)
	{	return(parseInt(obj.clientHeight));
	}
	else if (D2)
	{	return (parseInt(obj.style.height));
	}
	else if (NN)
	{	return obj.clip.height;
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Return the width of the object in pixels
function dyWidth(obj)
{	if (IE)
	{	return(parseInt(obj.clientWidth));
	}
	else if (D2)
	{	return(parseInt(obj.style.width));
	}
	else if (NN)
	{	return(obj.clip.width);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Moves the object to the specified X Y coordinates
function dyMoveTo(obj,x,y)
{	if (D2)
	{	obj.style.left = x;
		obj.style.top = y;
	}
	else if (IE)
	{	obj.style.pixelLeft = x;
		obj.style.pixelTop = y;
	}
	else if (NN)
	{	obj.moveTo(x,y);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Moves the object by x,y pixels. Use negative numbers for up or right
function dyMoveBy(obj,x,y)
{	if (IE)
	{	obj.style.pixelLeft = dyLeft(obj) + x;
		obj.style.pixelTop = dyTop(obj) + y;
	}
	else if (D2)
	{	obj.style.left += x;
		obj.style.top += y;
	}
	else if (NN)
	{	obj.moveBy(x,y);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Make the object visible.
function dyShow(obj)
{	if (D2)
	{	obj.style.display = '';
		obj.style.visibility = 'visible';
	}
	else if (IE)
	{	obj.style.visibility = 'visible';
	}
	else if (NN)
	{	obj.visibility = 'visible';
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Hide the object
function dyHide(obj)
{	if (D2)
	{	obj.style.display = 'none';
		//obj.style.visibility = 'hidden';
	}
	else if (IE)
	{	obj.style.visibility = 'hidden';
	}
	else if (NN)
	{	obj.visibility = 'hidden';
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

// Resize the height and width of the object to h,w. The upper right hand corner
// of the object will remain static.
function dyResizeTo(obj,h,w)
{	if (D2)
	{	obj.style.height=h;
		obj.style.width=w;
	}
	else if (IE)
	{	obj.style.height=h;
		obj.style.width=w;
	}
	else if (NN)
	{	obj.clip.height = h;
		obj.clip.width = w;
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

//Change the background color of the object. This might not always work, depending on other factors.
function dyColor(obj,color)
{	if (D2)
	{	obj.style.backgroundColor = color;
		obj.bgColor = color;
	}
	else if (IE)
	{	obj.style.backgroundColor = color;
	}
	else if (NN)
	{	obj.bgColor = color;
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

//This should return the width of the browser page. 
function dyFieldWidth()
{	if (IE)
	{	return(document.body.clientWidth);
	}
	else if (D2)
	{	return(window.innerWidth);
	}
	else if (NN)
	{	return(window.innerWidth);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

//This should return the height of the browser page. 
function dyFieldHeight()
{	if (IE)
	{	return(document.body.clientHeight);
	}
	else if (D2)
	{	return(window.innerHeight);
	}
	else if (NN)
	{	return(window.innerHeight);
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

////////////////////////////////////////////////////////////////////////////////////////////
// Dynamic Rewriting functions.
// Previously thought to not work on NN6/Mozilla. I was wrong.

//Dynamically rewrite the object.
function dyRewrite(obj,text)
{	if (dynaJsDebug) window.status = 'dyRewrite called on object ['+obj.name+']...';
	
	if (IE || D2)
	{	obj.innerHTML = text;
		if (dynaJsDebug) window.status = 'IE or D2: obj.innerHTML set...';
	}
	else if (NN)
	{	obj.document.open();
		if (dynaJsDebug) window.status = 'NN: about to writeln the text ['+text+']';
		obj.document.writeln(text);
		if (dynaJsDebug) window.status = 'NN: obj.document.writeln()...';
		obj.document.close();
		if (dynaJsDebug) window.status = 'NN: obj.document.close()...';
	}
	else
	{	err('IE 4+ or Navigator 4+ is required');
	}
}

/////////////////////////////////////////////////////////////////////////////////////////////
// Dynamic popup menus
//

// Setup global variable for use in PopUpMenus
if (IE)
{	document.write('<span style="visibility:hidden;display:none;position:absolute;top:100;left:100;z-index:99;" id="dyPUM"></span>');
}
else if (NN)
{	if (dynaJsDebug) window.status = 'Creating Layer...';
	document.write('<layer name="dyPUM" visibility="hide" left="0" top="0" z-index="99" bgcolor="#ffff00"><P></layer>\n');
}
else if (D2)
{	document.write('\n\n\n\n<!-- Popup Menu SPAN will be inserted dynamically later -->\n\n\n\n');
}
else
{	document.write('\n\n\n\n<!-- Popup menus require IE, Netscape 4 or a DOM2 compliant browser -->\n\n\n\n');
}

/* pop up the menu
   accepts the following:
	labels
	links
	x y coords (auto)
	h w (auto)
	style - bgcolor
			textcolor
			overflow
			hovercolor
			hoverbgcolor
			bordersize
			bordercolor
			linkclass
	usage: dyPopMenu(labels,links,options);
		lables - comma seperated list of labels
		links - comma seperated list of links
		options - comma seperated list of options (see above)
*/
function dyPopMenu(labels,links,options)
{	var dyPUM = dyObject('dyPUM');
	var dyPUMmenu = '';
	var PUMlabels = labels.split(',');
	var PUMlinks = links.split(',');
	var PUMoptions = options.split(',');
	var PUMx = cursorX;
	var PUMy = cursorY;
	var PUMz = 1;
	var PUMh = (1==0);
	var PUMw = (1==0);
	var PUMbgcolor = 'white';
	var PUMcolor = 'black';
	var PUMborder = 0;
	var PUMbordercolor = 'silver';
	var PUMhoverbgcolor = 'yellow';
	var PUMhovercolor = 'black';
	var PUMoverflow = 'visible';
	var PUMlinkclass = (1==0);
	
	if (dynaJsDebug) window.status = 'Global variables created...';
	
	// Make sure timer isn't still running from before.
	if (typeof hidePUM != 'undefined')
		dyPUMKillTimeout();
		
	if (dynaJsDebug) window.status = 'Previous timer killed...';
	
	if (D2)
	{	if (!dyPUM)
		{	document.body.innerHTML += '<span style="visibility:hidden;display:none;position:absolute;top:100;left:100;z-index:99;" id="dyPUM"></span>';
			dyPUM = dyObject('dyPUM');
		}
	}
	
	// Resize the menu small
	dyResizeTo(dyPUM,1,1);
	
	if (dynaJsDebug) window.status = 'Menu resized small...';
	
	// Analyze the options
	for (j=0; j<PUMoptions.length; j++)
	{	var PUMoption = PUMoptions[j].split('=');
		switch(PUMoption[0].toLowerCase())
		{	case "x":
				PUMx = PUMoption[1];
				break;
			case "y":
				PUMy = PUMoption[1];
				break;
			case "z":
				PUMz = parseInt(PUMoption[1]);
				break;
			case "h":
				PUMh = parseInt(PUMoption[1]);
				break;
			case "w":
				PUMw = parseInt(PUMoption[1]);
				break;
			case "bgcolor":
				PUMbgcolor = PUMoption[1];
				break;
			case "textcolor":
				PUMcolor = PUMoption[1];
				break;
			case "bordersize":
				PUMborder = parseInt(PUMoption[1]);
				break;
			case "bordercolor":
				PUMbordercolor = PUMoption[1];
				break;
			case "hoverbgcolor":
				PUMhoverbgcolor = PUMoption[1];
				break;
			case "hovercolor":
				PUMhovercolor = PUMoption[1];
				break;
			case "overflow":
				PUMoverflow = PUMoption[1];
				break;
			case "linkclass":
				PUMlinkclass = PUMoption[1];
				break;
		}
	}
	
	if (dynaJsDebug) window.status = 'Options parsed...';
	
	// Insert ILayer in NN
	if (NN)
		dyPUMmenu = dyPUMmenu + '<ilayer name="PUMILayer" bgcolor="'+PUMbordercolor+'" height="0" width="0">';
		
//	if (dynaJsDebug) window.status = 'ILayer inserted in NN...';
	
	// Insert border if it exists
	if (IE || D2)
	{	dyPUMmenu = dyPUMmenu + '<table cellpadding="'+PUMborder+'" cellspacing="0" bgcolor="'+PUMbordercolor+'" border="0" id="PUMoutertable"';
		if (PUMh)
		{	dyPUMmenu = dyPUMmenu + ' height="'+PUMh+'"';
		}
		if (PUMh)
		{	dyPUMmenu = dyPUMmenu + ' width="'+PUMw+'"';
		}
		dyPUMmenu = dyPUMmenu + '>';
		if (PUMw)
		{	dyPUMmenu = dyPUMmenu + '<COLGROUP><COL width="'+PUMw+'">';
		}
		dyPUMmenu = dyPUMmenu + '<tr><td valign="top">';
	}
	// HTML the menu
	dyPUMmenu = dyPUMmenu + '<table bgcolor="'+PUMbgcolor+'" cellpadding="4" cellspacing="0" id="PUMtable" border="0"';
	if (!NN)
	{	dyPUMmenu += ' height="100%" width="100%" style="position:relative;"';
	}
	dyPUMmenu += '>';
	for (i=0; i<PUMlabels.length; i++)
	{	if (PUMlinks[i].search(/javascript:/i) == 0)
		{	dyPUMmenu += '<tr><td nowrap valign="top" id="PUM'+i+'"';
			if (IE)
			{	dyPUMmenu += ' style="cursor:hand;"';
			}
			if (!NN)
			{	dyPUMmenu += ' onmouseover="dyPUMHiliteMenuItem('+i+',this,\''+PUMhoverbgcolor+'\',\''+PUMhovercolor+'\','+PUMlabels.length+',\''+PUMbgcolor+'\',\''+PUMcolor+'\')" onmouseout="dyPUMLoliteMenuItem('+i+',this,\''+PUMbgcolor+'\',\''+PUMcolor+'\')" onclick="'+PUMlinks[i].replace(/javascript:/i,'')+';return false;"';
			}
			dyPUMmenu += '><P><A HREF=""';
			if (!NN)
			{	dyPUMmenu += ' ONMOUSEOVER="dyPUMKillTimeout();" ONMOUSEOUT="dyPUMResetTimer();dyPUMCancelBubble();"';
			}
			dyPUMmenu += ' id="PUM'+i+'link" style="text-decoration:none!important;color:'+PUMcolor+'"';
		}
		else
		{	dyPUMmenu += '<tr><td nowrap valign="top" id="PUM'+i+'"';
			if (IE)
			{	dyPUMmenu += ' style="cursor:hand;"';
			}
			if (!NN)
			{	dyPUMmenu += ' onmouseover="dyPUMHiliteMenuItem('+i+',this,\''+PUMhoverbgcolor+'\',\''+PUMhovercolor+'\','+PUMlabels.length+',\''+PUMbgcolor+'\',\''+PUMcolor+'\')" onmouseout="dyPUMLoliteMenuItem('+i+',this,\''+PUMbgcolor+'\',\''+PUMcolor+'\')" onclick="dyObject(\'PUM'+i+'link\').click();"';
			}
			dyPUMmenu += '><P><A HREF="'+PUMlinks[i]+'"';
			if (!NN)
			{	dyPUMmenu += ' ONMOUSEOVER="dyPUMKillTimeout();" ONMOUSEOUT="dyPUMResetTimer();dyPUMCancelBubble();"';
			}
			dyPUMmenu += ' id="PUM'+i+'link" style="text-decoration:none!important;color:'+PUMcolor+'"';
		}
		if (PUMlinkclass)
		{	dyPUMmenu += ' class="'+PUMlinkclass+'"';
		}
		dyPUMmenu += '>'+PUMlabels[i]+'</A></P></td>';
		dyPUMmenu += '</tr>';
	}
	dyPUMmenu = dyPUMmenu + '</table>';
	
	if (IE || D2)
		dyPUMmenu = dyPUMmenu + '</td></tr></table>';

	// close ilayer if necessary
	if (NN)
		dyPUMmenu = dyPUMmenu + '</ilayer>';

	if (dynaJsDebug) window.status = 'Menu created in HTML...';
	
	// Set overflow
	if (IE)
	{
		if (PUMoverflow == 'x')
		{	if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'auto';
			if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'visible';
		}
		else if (PUMoverflow == 'y')
		{	if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'auto';
			if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'visible';
		}
		else
		{	if (dyPUM.style.overflow)
				dyPUM.style.overflow = PUMoverflow;
			if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'visible';
			if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'visible';
		}
	}
	
	if (dynaJsDebug) window.status = 'Overflow set...';
	
	// Resize the menu small
	dyResizeTo(dyPUM,1,1);
	
	if (dynaJsDebug) window.status = 'Menu resized small (part 2)...';
	
	// Put HTML inside
	dyRewrite(dyPUM,dyPUMmenu);
	
	if (dynaJsDebug) window.status = 'Menu object rewritten with menu...';
	
	// If Height and/or Width exist, use them.
	if (!NN)
	{	if (!isNaN(dyHeight(dyObject('PUMtable'))))
		{	if (PUMh && PUMw)
			{	dyResizeTo(dyPUM,PUMh,PUMw);
			}
			else if (PUMh)
			{	dyResizeTo(dyPUM,PUMh,dyWidth(dyObject('PUMtable')));
			}
			else if (PUMw)
			{	dyResizeTo(dyPUM,dyHeight(dyObject('PUMtable')),PUMw);
			}
			else
			{	dyResizeTo(dyPUM,dyHeight(dyObject('PUMtable')),dyWidth(dyObject('PUMtable')));
			}
		}
	}
	else
	{	dyPUM.document.PUMILayer.clip.left = -PUMborder;
		dyPUM.document.PUMILayer.clip.right = dyWidth(dyPUM.document.PUMILayer) + PUMborder;
		var ILH = dyHeight(dyPUM.document.PUMILayer);
		var ILW = dyWidth(dyPUM.document.PUMILayer);
		if (PUMh)
		{	ILH = PUMh;
		}
		if (PUMw)
		{	ILW = PUMw;
		}
		var kludge = 18;
		dyResizeTo(dyPUM,ILH,ILW);
		/*dyPUM.clip.top = kludge - PUMborder;
		dyPUM.clip.bottom = ILH - kludge + PUMborder;
		dyPUM.clip.right = ILW-PUMborder;
		dyPUM.clip.left = -PUMborder;
		PUMy = PUMy - kludge;*/
	}
	
	if (dynaJsDebug) window.status = 'Menu resized correctly...';
	
	// Color the background
	dyColor(dyPUM,PUMbgcolor);
	
	if (dynaJsDebug) window.status = 'Menu recolored correctly...';
	
	// Move to the spot where it should live
	dyMoveTo(dyPUM,PUMx,PUMy);
	if (IE || D2)
		dyPUM.style.zIndex = PUMz;
		
	if (dynaJsDebug) window.status = 'Menu moved to ultimate location...';
		
	// Kill select boxes on IE
	if (IE)
	{	allsel = document.all.tags("SELECT");
		for (var s=0; s<allsel.length; s++)
		{	allsel[s].style.visibility = 'hidden';	
		}
	}
	// Show it.
	dyShow(dyPUM);
	
	if (dynaJsDebug) window.status = 'Menu displayed...';
	
	// Check to ensure it's "in the field"
	if (parseInt(PUMx)+dyWidth(dyPUM) > dyFieldWidth())
	{	PUMx = PUMx - dyWidth(dyPUM);
		dyMoveTo(dyPUM,PUMx,PUMy);
	}
	if (parseInt(PUMy)+dyHeight(dyPUM) > dyFieldHeight())
	{	PUMy = PUMy - dyHeight(dyPUM);
		dyMoveTo(dyPUM,PUMx,PUMy);
	}
	
	if (dynaJsDebug) window.status = 'Menu moved if off-screen...';
	
	// Install event handlers
	hidePUM = setTimeout('dyPUMHideForGood();',1000);
	dyPUM.onmouseover = dyPUMKillTimeout;
	dyPUM.onmouseout = dyPUMResetTimer;
	
	if (dynaJsDebug) window.status = 'Event handlers installed...';
}

function dyPUMResetTimer()
{	clearTimeout(hidePUM);
	hidePUM = setTimeout('dyPUMHideForGood();',100);
}

function dyPUMHideForGood()
{	clearTimeout(hidePUM);
	dyHide(dyObject('dyPUM'));
	// Restore select boxes on IE
	if (IE)
	{	allsel = document.all.tags("SELECT");
		for (var s=0; s<allsel.length; s++)
		{	allsel[s].style.visibility = 'visible';	
		}
	}
}

function dyPUMKillTimeout()
{	clearTimeout(hidePUM);
}

function dyPUMCancelBubble()
{	if (IE || D2)
	{	window.event.cancelBubble=true;
	}
}

function dyPUMHiliteMenuItem(i,trowobj,hoverbgcolor,hovercolor,maxI,bgcolor,linkcolor)
{	var PUMt = dyObject('PUMtable');
	for (var x=0; x<PUMt.rows.length; x++)
	{	dyColor(PUMt.rows[x].cells[0],bgcolor);
	}
	for (var y=0; y<maxI; y++)
	{	dyObject('PUM'+y+'link').style.color = linkcolor;
	}
	dyColor(trowobj,hoverbgcolor);
	dyObject('PUM'+i+'link').style.color = hovercolor;
}

function dyPUMLoliteMenuItem(i,trowobj,bgcolor,linkcolor)
{	dyColor(trowobj,bgcolor);
	dyObject('PUM'+i+'link').style.color = linkcolor;
}

/* pop up text
   accepts the following:
   text
   options
	x y coords (auto)
	h w (auto)
	style - bgcolor
			textcolor
			overflow
			hovercolor
			hoverbgcolor
			bordersize
			bordercolor
			textclass
	usage: dyPopTest(text,options);
		text - html
		options - comma seperated list of options (see above)
*/
function dyPopText(passedintext,options)
{	var dyPUM = dyObject('dyPUM');
	var dyPUMtext = '';
	var PUMoptions = options.split(',');
	var PUMx = cursorX;
	var PUMy = cursorY + 15;
	var PUMz = 1;
	var PUMh = (1==0);
	var PUMw = (1==0);
	var PUMbgcolor = 'white';
	var PUMcolor = 'black';
	var PUMborder = 0;
	var PUMbordercolor = 'silver';
	var PUMhoverbgcolor = 'yellow';
	var PUMhovercolor = 'black';
	var PUMoverflow = 'visible';
	var PUMtextclass = (1==0);
	
	// Make sure timer isn't still running from before.
	if (typeof hidePUM != 'undefined')
		dyPUMKillTimeout();

	if (D2)
	{	if (!dyPUM)
		{	document.body.innerHTML += '<span style="visibility:hidden;display:none;position:absolute;top:100;left:100;" id="dyPUM"></span>';
			dyPUM = dyObject('dyPUM');
		}
	}
	
	// Hide PUM just in case
	dyHide(dyPUM);
	
	// Wipe previous text
	dyRewrite(dyPUM,'');
	
	// Resize the pum small
	dyResizeTo(dyPUM,1,1);
	
	// Analyze the options
	for (j=0; j<PUMoptions.length; j++)
	{	var PUMoption = PUMoptions[j].split('=');
		switch(PUMoption[0].toLowerCase())
		{	case "x":
				PUMx = PUMoption[1];
				break;
			case "y":
				PUMy = PUMoption[1];
				break;
			case "z":
				PUMz = parseInt(PUMoption[1]);
				break;
			case "h":
				PUMh = PUMoption[1];
				break;
			case "w":
				PUMw = PUMoption[1];
				break;
			case "bgcolor":
				PUMbgcolor = PUMoption[1];
				break;
			case "textcolor":
				PUMcolor = PUMoption[1];
				break;
			case "bordersize":
				PUMborder = parseInt(PUMoption[1]);
				break;
			case "bordercolor":
				PUMbordercolor = PUMoption[1];
				break;
			case "hoverbgcolor":
				PUMhoverbgcolor = PUMoption[1];
				break;
			case "hovercolor":
				PUMhovercolor = PUMoption[1];
				break;
			case "overflow":
				PUMoverflow = PUMoption[1];
				break;
			case "textclass":
				PUMtextclass = PUMoption[1];
				break;
		}
	}
	
	// Insert ILayer in NN
	if (NN)
		dyPUMtext = dyPUMtext + '<ilayer name="PUMILayer" bgcolor="'+PUMbordercolor+'" height="0" width="0">';
	
	// Insert border if it exists
	if (IE || D2)
		dyPUMtext = dyPUMtext + '<table cellpadding="'+PUMborder+'" cellspacing="0" bgcolor="'+PUMbordercolor+'" border="0" id="PUMoutertable"><tr><td valign="top">';
	// HTML the menu
	dyPUMtext = dyPUMtext + '<table bgcolor="'+PUMbgcolor+'" cellpadding="4" cellspacing="0" id="PUMtable" style="position:relative;" border="0">';
	
	dyPUMtext = dyPUMtext + '<tr><td><p';
	if (PUMtextclass)
		dyPUMtext = dyPUMtext + ' class="'+PUMtextclass+'"';
	dyPUMtext = dyPUMtext + '>'+passedintext+'</td></tr>';
	
	dyPUMtext = dyPUMtext + '</table>';

	if (IE || D2)
		dyPUMtext = dyPUMtext + '</td></tr></table>';
	
	// close ilayer if necessary
	if (NN)
		dyPUMtext = dyPUMtext + '</ilayer>';
	
	// Set overflow
	if (IE)
	{
		if (PUMoverflow == 'x')
		{	if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'auto';
			if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'visible';
		}
		else if (PUMoverflow == 'y')
		{	if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'auto';
			if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'visible';
		}
		else
		{	if (dyPUM.style.overflow)
				dyPUM.style.overflow = PUMoverflow;
			if (dyPUM.style.overflowX)
				dyPUM.style.overflowX = 'visible';
			if (dyPUM.style.overflowY)
				dyPUM.style.overflowY = 'visible';
		}
	}
	// Resize the menu small
	dyResizeTo(dyPUM,1,1);
	// Put HTML inside
	dyRewrite(dyPUM,dyPUMtext);
	// If Height and Width exist, use them.
	if (PUMh && PUMw)
	{	dyResizeTo(dyPUM,PUMh,PUMw);
		if (NN)
		{	var ILH = dyHeight(dyPUM.document.PUMILayer);
			var ILW = dyWidth(dyPUM.document.PUMILayer);
			var kludge = 18;
			dyResizeTo(dyPUM,ILH,ILW);
			dyPUM.clip.top = kludge + PUMborder;
			dyPUM.clip.bottom = ILH - kludge + PUMborder;
			PUMy = PUMy - kludge;
		}
	}
	else
	{	if (!NN)
		{	if (!isNaN(dyHeight(dyObject('PUMtable'))))
				dyResizeTo(dyPUM,dyHeight(dyObject('PUMtable')),dyWidth(dyObject('PUMtable')));
		}
		else
		{	dyPUM.document.PUMILayer.clip.left = -PUMborder;
			dyPUM.document.PUMILayer.clip.right = dyWidth(dyPUM.document.PUMILayer) + PUMborder;
			var ILH = dyHeight(dyPUM.document.PUMILayer);
			var ILW = dyWidth(dyPUM.document.PUMILayer);
			var kludge = 18;
			dyResizeTo(dyPUM,ILH,ILW);
			dyPUM.clip.top = kludge - PUMborder;
			dyPUM.clip.bottom = ILH - kludge + PUMborder;
			dyPUM.clip.right = ILW-PUMborder;
			dyPUM.clip.left = -PUMborder;
			PUMy = PUMy - kludge;
		}
	}
	// Color the background
	dyColor(dyPUM,PUMbgcolor);
	// Move to the spot where it should live
	dyMoveTo(dyPUM,PUMx,PUMy);
	if (IE || D2)
		dyPUM.style.zIndex = PUMz;
	// Show it.
	dyShow(dyPUM);

	// Check to ensure it's "in the field"
	if (parseInt(PUMx)+dyWidth(dyPUM) > dyFieldWidth())
	{	PUMx = PUMx - dyWidth(dyPUM);
		dyMoveTo(dyPUM,PUMx,PUMy);
	}
	if (parseInt(PUMy)+dyHeight(dyPUM) > dyFieldHeight())
	{	PUMy = PUMy - dyHeight(dyPUM);
		dyMoveTo(dyPUM,PUMx,PUMy);
	}

	// Install event handlers
	hidePUM = setTimeout('dyHide(dyObject("dyPUM"));',5000);
	dyPUM.onmouseover = dyPUMKillTimeout;
	dyPUM.onmouseout = dyPUMResetTimer;
}