<%--
##					menu-editlist.jsp

Revize multi-level menu manager

Parameters are passed on url as jsp arguments.  All parameters are optional.

Parameters:
	onoff-			on or off; if specified, sets publishing to specified value
					(no changes made to publishing status if not supplied)
	linkmodule-		name of link module containing menu (default is links)
	sectionid-		sectionid of menu to operate on
	sectionname-	sectionname to retrieve ???
	sectionsfilter-	filter used to read sections module; if not specified,
					sections module is not processed
	pageid-			link manager recordid of currently selected page (default is none)
	linksfilter-	filter used to select links record (default uses sectionid argument)
	displaylevel-	number of menu levels always displayed (default is 1)
	toplevel-		lowest level menu item displayed (default is 0)
	bottomlevel-	highest level menu item displayed (default is 99)
					(custom portal code if sectionsfilter supplied - see code)
	sortfield-		indicates field to use for sorting (default is linkseq)
	folder-			folder for new pages or one of the following methods of determining:
						*none* or /	Does not use (folder can be specified in link manager)
						*prompt*	prompts for foldername when new level created before
						default		Determines from sections module or parent link item
							 		prompts if folder can not be determined for new page
					TODO: Ideally prompt should be in link manager only if template link
	filelocation-	folder appended to page folder for uploaded documents (default uploads)
					(TODO: currently always set to "uploads")
	linknewsection-	list of templates that can create new sections (rz:link attribute)
						*prompt*	prompts if link will create a new section BEFORE
									calling the link manager
						list of templates that permit a new section
						(preceed template name with * if new section is assumed)
	newpagebutton-	specifies when new page button should appear as follows:
						before		only appears before items at same level (default)
						after		only appears after items at same level
						both		appears before and after same level items
						number		if positive only appears at bottom if the number of
									items is equal or greater than number
					Note: The new subpage (which STARTS a new level) will always appear
					only once after the item under which the sub pages will be created.
					TODO: get code from rochester hills; upgrade and merge
	nexturl-		follow on edit form passed to link manager
	templates-		if specified, list of available templates (default is all)

	showsectionids-	if true, display linksectionid & linktosectionid (default false)
	showrecordid-	if true, display recordid (default false)
	showparentid-	if true, display linkparentid(default false)
	showparentkey-	if true, display linkparent (default false)
	showpagekey-	if true, display page permissions pagekey (default false)
	showsortkey-	if true, display linksortkey calculated by rz.menusort (default false)
	showlevel-		if true, display linklevel (default false)
	showstyle-		if true, display linkstyle calculated by rz.menusort (default false)
	showhidden-		if true, display hidden links as calculated by rz.menusort (default false)
	showorphan-		if true, display orphan links as calculated by rz.menusort (default false)
	showbuttons-	if true, display new, edit and delete button (default true)
	showdebug-		if true, display debugging information (default false)
	showconsole-	if true, display detailed debugging information (default false)
	repair-			if true, sets RZ.repair to true for link manager (default false)
	auto-			if true, automatically edit next menu item (default false)
					used to update link manager and page permission databases

NOTES:
	RZ.set value from edit this list button is passed to link manager on new and edit buttons.

***********************************************************************
TODO: review lines containing "custom portal code" for non-portal usage
***********************************************************************

--%>
<%-- #BeginRZ-PageHeader --%>
<%@ page language="java" %>
<%@ include file = "/util/setup_editlist_header.jsp" %>
<%-- #EndRZ-PageHeader --%>
<% //rz.pageoptions = "cache"; %>
<html>
<head>
<%@ page import="revize.data.*,revize.publish.*,revize.store.*" %>
<%--
--%>

<title>Revize Multi-level Menu: <%=rz.webspace%></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

<style type="text/css">
<!--
.normal {
	font-family: Trebuchet MS, Verdana, Arial;
	font-size: 12px;
	background-color:F7F7F7;
}
.menuHidden {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #999999;
	text-decoration: none;
}
.menuDisplay {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #000000;
	text-decoration: none;
}
.menuSelectedParent {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #CC0000;
	text-decoration: none;
}
.menuSelectedItem {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #CC0000;
	font-weight: bold;
	text-decoration: none;
}
.menuSelectedLevel {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #000000;
	font-style: italic;
	font-weight: bold;
	text-decoration: none;
}
.menuSelectedChild {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #000000;
	font-weight: bold;
	text-decoration: none;
}
.menuSelectedUncle {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #000000;
	font-style: italic;
	text-decoration: none;
}
.menuOrphan {
	font-family: Trebuchet MS, Verdana, Arial;
	color: #000000;
	text-decoration: line-through;
}
.box {
	font-family: Trebuchet MS, Verdana, Arial;
	font-size: 12px;
	border: 1px solid #999999;
}
-->
</style>
<%--#RevizeProperties: USE REVIZE MENU (DOCUMENT PROPERTIES) TO EDIT DATA BELOW:
status=edit
server=secure.interactive-innovations.net
projectName=cityofsouthbend
label=
location=webspace_links-editlist.jsp
version=
docType=editpage
subType=list
moduleName=
fieldName=
channels=|
description=
--%></head>
<%!
String linkmodule = "";
String[] linkrecords = new String[99];
String[] linkdisplays = new String[99];
String folder = "";
boolean showconsole = false;
String debugMsg = "";
/**
 * 	Determine folder for prior level section (if new button)
 *	or current record section (if edit button)
 *
 *	arg		prior link level for new button; recordid for edit button
 *	type	type of button: "new" or "edit"
 *
 *	linkrecords[level] is the record used to determine the level tosection
 *	(i.e. the first record encountered at the prior level)
 */
String getFolder(RZTagSupport rz, int arg, String linkpathname, String type)
{
	String folderValue = "";
	String filter = "";
	String recordid = "";
	String tosectionid = "";

	//----- If folder is not used
	if (folder.equals("*none*") || folder.equals("/"))
		return "/";

	//----- no folder if arg is less than zero (top level)
	else if (arg < 0)
		return folder;

	else if (folder.equals("*prompt*") && type.equals("edit"))
		folderValue = linkpathname;

	else if (type.equals("edit"))		//if edit action, arg is recordid...
		recordid = "" + arg;			//...used to lookup folder name

	// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * \\
	//				From this point on the type argument is "new"

	else if (!folder.equals("")			//if folder is not blank and does...
	&& folder.indexOf("*") != 0)		//...not start with *, use it
		return folder;

	else if (arg < linkrecords.length)	//if new action and arg is within...
		recordid = linkrecords[arg];	//...range, it is valid prior level

	else								//otherwise assume invalid prior level
		return "_revize_folder_menu_level_too_high (" + arg + ")";

	//----- return if setFolder will prompt for folder
	if (folder.equals("*prompt*"))
		return folder;

	if (recordid == null)	//recordid for arg level undefined
		return "_revize_folder_menu_level_invalid (" + arg + ")";

	if (StringUtils.toInt(recordid,-9999) < 0)	//recordid invalid
		return "_revize_folder_links._recordid_invalid (recordid=" + recordid + ")";

	//----- Look up section folder based on current or parent recordid
	//		(recordid is current record for edit or parent if new item)
	if (rz.isvalidfield(linkmodule,"linktosectionid") && rz.isvalidmodule("sections"))
	{
		tosectionid = rz.fetch(linkmodule,"linktosectionid","report,recordid="+recordid);
		if (rz.nodata)	//no record returned from fetch
			return "_revize_folder_links._recordid_not_found (recordid=" + recordid + ")"
				 + "\n--where=" + filter
				 + "\n--" + tosectionid;

		if (StringUtils.toInt(tosectionid,-999) < 0)	//sectionid invalid
			return "_revize_folder_sections.sectionid_invalid (sectionid=" + tosectionid + ")"
				 + "\n--where=" + filter;

		if (rz.isvalidfield(linkmodule,"linktosectionid") && rz.isvalidfield("sections","folder"))
		{
			filter = "sections.sectionid=" + tosectionid;		 //sections filter
			folderValue = rz.fetch("sections","folder","",filter);

			if (rz.nodata)	//section record not found
				return "_revize_folder_sections.sectionid_not_found (sectionid=" + tosectionid + ")"
					 + "\n--where=" + filter
					 + "\n--" + folderValue;
		}
	}
	else	//determine folder based on parent folder passed as linkpathname
	{
		folderValue = linkpathname;
	}
	return folderValue;
}
%>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%@ include file="/util/setup_editlist_javascript.jsp" %>
<script language="JavaScript" src="/revize/util/snippet_helper_fieldvalues.js" type="text/JavaScript"></script>
<script language="JavaScript" type="text/JavaScript">
var useSectionId = false;
var useToSectionId = false;
var useAncestor = false;
</script>

<table border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
	<td>
	  <table align="CENTER" width="96%"  border="0" cellspacing="0" cellpadding="0" class="wholepage">
        <tr>
          <td height="30">
            <div align="center"><strong><font face="Arial, Helvetica, sans-serif">Menu Manager</font></strong></div>
          </td>
        </tr>
      </table>
	  <%
	String onoff = request.getParameter("onoff");
	if (onoff != null)
	{
		boolean onoffValue = Boolean.valueOf(onoff).booleanValue();
		PublishingEngine.getInstance(rz.webspace).setAcceptingPublishEvents(onoffValue);
	}

	String sectionidfield = "";
	linkmodule =  StringUtils.getParameter(request,"linkmodule");
	if (linkmodule.equals("")) linkmodule="links";

	String sectionid = StringUtils.getParameter(request,"sectionid");
	//if (sectionid.equals("")) sectionid="0";
	String sectionname = StringUtils.getParameter(request,"sectionname");
	String sectionsfilter = StringUtils.getParameter(request,"sectionsfilter");
	String linksfilter = StringUtils.getParameter(request,"linksfilter");

	String pageid = StringUtils.getParameter(request,"pageid");
	pageid = rz.getmenurecordid(pageid);
	String displaylevel = StringUtils.getParameter(request,"displaylevel");
	int toplevel = StringUtils.toInt(StringUtils.getParameter(request,"toplevel"));
	int bottomlevel = StringUtils.toInt(StringUtils.getParameter(request,"bottomlevel"),99);

	String sortfield = StringUtils.getParameter(request,"sortfield");
	if (sortfield.equals("")) sortfield="linkseq";

	String templates = StringUtils.getParameter(request,"templates");
	String linknewsection = StringUtils.getParameter(request,"linknewsection");
	if (linknewsection.equals("")) linknewsection = rz.config("menu_newsection");

	/* Now needs to be passed as jsp parameter
	// custom portal code for top nav levels
	// TODO: (consider adding to sections module as optional fields)
	linknewsection = "content";
	if (sectionsfilter.length() > 0)
		linknewsection = "*";			//force newsection=yes for top nav
	*/

	// custom portal code for top nav levels
	if (bottomlevel < 99)
	{
		if (StringUtils.toInt(sectionid) <= -3)
			bottomlevel = 0;
		else if (StringUtils.toInt(sectionid) < 0)
			bottomlevel = 1;
	}

	folder = StringUtils.getParameter(request,"folder");
	if (!folder.equals("")
	&& !folder.equals("/")
	&& !folder.equals("*none*")
	&& !folder.equals("*prompt*"))
	{
		if (folder.startsWith("/")) folder = folder.substring(1);
		folder = StringUtils.toFilename(folder,"folders");
		String filelocation = "/uploads";
		if (folder.length() > 0)
			filelocation = "/" + folder + "/uploads";
	}
	String nexturl = StringUtils.getParameter(request,"nexturl");
	if (nexturl.equals("")) nexturl = rz.config("menu_nexturl");

	boolean showsectionids = ( StringUtils.getParameter(request,"showsectionids").equals("true") );
	boolean showrecordid = ( StringUtils.getParameter(request,"showrecordid").equals("true") );
	boolean showparentid = ( StringUtils.getParameter(request,"showparentid").equals("true") );
	boolean showparentkey = ( StringUtils.getParameter(request,"showparentkey").equals("true") );
	boolean showpagekey = ( StringUtils.getParameter(request,"showpagekey").equals("true") );
	boolean showsortkey = ( StringUtils.getParameter(request,"showsortkey").equals("true") );
	boolean showlevel = ( StringUtils.getParameter(request,"showlevel").equals("true") );
	boolean showstyle = ( StringUtils.getParameter(request,"showstyle").equals("true") );
	boolean showhidden = ( StringUtils.getParameter(request,"showhidden").equals("true") );		//default false
	boolean showorphan = ( StringUtils.getParameter(request,"showorphan").equals("true") );
	boolean showbuttons = ( !StringUtils.getParameter(request,"showbuttons").equals("off") );	//default true
	boolean showdebug = ( StringUtils.getParameter(request,"showdebug").equals("true") );
	showconsole = ( StringUtils.getParameter(request,"showconsole").equals("true") );
	boolean repair = ( StringUtils.getParameter(request,"repair").equals("true") );
	boolean auto = ( StringUtils.getParameter(request,"auto").equals("true") );

	String menu_system = rz.config("menu_system");
	boolean isWebGen = (menu_system.equals("") || menu_system.indexOf("webgen") != -1);
%>

<script language="JavaScript" type="text/javascript">
/*------------------------------------------------------------------------------
Global variables
------------------------------------------------------------------------------*/
RZ.repair = <%=repair%>
RZ.auto = <%=auto%>
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function developerOptions()
{
	var roles = parent.RZ.roles.toLowerCase() + '|';
	if (roles == ''
	|| roles == '|'
	|| roles.indexOf('superuser|') != -1
	|| roles.indexOf('adminstrator|') != -1
	|| roles.indexOf('developer|') != -1)
		return reloadPage('<%=pageid%>','showdebug=true')
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function updateSection(pageid,parameters)
{
	RZsetcookie( 'RZsectionid', RZgetfieldvalue(document.topForm.sectionid) )
	return reloadPage();
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function updateOptions(pageid,parameters)
{
	var sectionid = RZgetfieldvalue(document.menuForm.sectionid);
	var currentid = RZgetfieldvalue(document.topForm.sectionid)
	if (currentid != sectionid)
	{
		RZsetfieldvalue(document.topForm.sectionid, sectionid)

		// if specified sectionid not in the menu list, add it
		if (RZgetfieldvalue(document.topForm.sectionid) != sectionid)
		{
			var opt = document.topForm.sectionid.options.length		//add and select record id
			document.topForm.sectionid.options[opt] = new Option('',sectionid);
			document.topForm.sectionid.options[opt].selected = true;
		}
	}
	return reloadPage();
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function reloadPage(pageid,parameters)
{
	RZ.parameters = location.pathname
	if (typeof document.menuForm == 'undefined')	//debug form fields when debug NOT active
	{
		RZaddUrlParameter( 'webspace=' + RZ.webspace )
		RZaddUrlParameter( 'linkmodule=<%=linkmodule%>' )
		RZaddUrlParameter( 'linknewsection=<%=linknewsection%>' )
		RZaddUrlParameter( 'sectionsfilter=<%=sectionsfilter%>' );
		RZaddUrlParameter( 'linksfilter=<%=linksfilter%>' );
		RZaddUrlParameter( 'folder=<%=folder%>' )
		RZaddUrlParameter( 'templates=<%=templates%>' )
		RZaddUrlParameter( 'nexturl=<%=nexturl%>' )
		RZaddUrlParameter( 'level=<%=displaylevel%>' )
		RZaddUrlParameter( 'toplevel=<%=toplevel%>' )
		RZaddUrlParameter( 'bottomlevel=<%=bottomlevel%>' )
		RZaddUrlParameter( 'sortfield=<%=sortfield%>' )
		RZaddUrlParameter( 'set=' + escape(RZ.setparameter) )
	}
	else											//debug form fields
	{
		if (typeof pageid == 'undefined' || pageid == '')
			pageid = document.menuForm.pageid.value
		RZ.parameters = location.pathname
		RZaddUrlParameter( 'webspace=' + document.menuForm.webspace.value )
		RZaddUrlParameter( 'linkmodule=' + document.menuForm.linkmodule.value )
		RZaddUrlParameter( 'linknewsection=' + document.menuForm.linknewsection.value )
		RZaddUrlParameter( 'sectionsfilter=' + document.menuForm.sectionsfilter.value )
		RZaddUrlParameter( 'linksfilter=' + document.menuForm.linksfilter.value )
		RZaddUrlParameter( 'folder=' + document.menuForm.folder.value )
		RZaddUrlParameter( 'nexturl=' + document.menuForm.nexturl.value )
		RZaddUrlParameter( 'level=' + document.menuForm.displaylevel.value )
		RZaddUrlParameter( 'toplevel=' + document.menuForm.toplevel.value )
		RZaddUrlParameter( 'bottomlevel=' + document.menuForm.bottomlevel.value )
		RZaddUrlParameter( 'sortfield=' + document.menuForm.sortfield.value )
		RZaddUrlParameter( 'set=' + escape(document.menuForm.setfield.value) )
		checkBoxes('get')
	}

	//----- Common argument, not displayed on the debug form
	RZaddUrlParameter( 'permissions_template=' + RZ.permissions_template )
	RZaddUrlParameter( 'permissions_parent=' + RZ.permissions_parent )
	RZaddUrlParameter( 'sectionid=' + RZgetfieldvalue(document.topForm.sectionid) );
	RZaddUrlParameter( 'sectionname=' + RZgetfieldvalue(document.topForm.sectionid,'text') );
	RZaddUrlParameter( 'pageid=' + pageid )		//on debug form but passed as argument

	if (typeof parameters != 'undefined')
		RZ.parameters += '&' + parameters;
	location.replace( RZ.parameters )
	return false;	//cancel submit
}
/*----------------------------------------------------------------------------------------
Either set or get checkbox options.  These function are placed in this function so both
the set and get commands are added when checkbox fields are updated.
------------------------------------------------------------------------------*/
function checkBoxes(action)
{
	if (action == 'get')
	{
		RZaddUrlParameter( 'showsectionids=' + RZgetfieldvalue(document.menuForm.sectionids) )
		RZaddUrlParameter( 'showrecordid=' + RZgetfieldvalue(document.menuForm.recordid) )
		RZaddUrlParameter( 'showparentid=' + RZgetfieldvalue(document.menuForm.parentid) )
		RZaddUrlParameter( 'showparentkey=' + RZgetfieldvalue(document.menuForm.parentkey) )
		RZaddUrlParameter( 'showpagekey=' + RZgetfieldvalue(document.menuForm.pagekey) )
		RZaddUrlParameter( 'showsortkey=' + RZgetfieldvalue(document.menuForm.sortkey) )
		RZaddUrlParameter( 'showlevel=' + RZgetfieldvalue(document.menuForm.level) )
		RZaddUrlParameter( 'showstyle=' + RZgetfieldvalue(document.menuForm.style) )
		RZaddUrlParameter( 'showhidden=' + RZgetfieldvalue(document.menuForm.hidden) )
		RZaddUrlParameter( 'showorphan=' + RZgetfieldvalue(document.menuForm.orphan) )
		RZaddUrlParameter( 'showbuttons=' + RZgetfieldvalue(document.menuForm.buttons) )
		RZaddUrlParameter( 'showdebug=' + RZgetfieldvalue(document.menuForm.debug) )
		RZaddUrlParameter( 'showconsole=' + RZgetfieldvalue(document.menuForm.console) )
		RZaddUrlParameter( 'repair=' + RZgetfieldvalue(document.menuForm.repair) )
		RZaddUrlParameter( 'auto=' + RZgetfieldvalue(document.menuForm.auto) )
	}
	else
	{
		RZsetfieldvalue( document.menuForm.sectionids, '<%=showsectionids%>' )
		RZsetfieldvalue( document.menuForm.recordid, '<%=showrecordid%>' )
		RZsetfieldvalue( document.menuForm.parentid, '<%=showparentid%>' )
		RZsetfieldvalue( document.menuForm.parentkey, '<%=showparentkey%>' )
		RZsetfieldvalue( document.menuForm.pagekey, '<%=showpagekey%>' )
		RZsetfieldvalue( document.menuForm.sortkey, '<%=showsortkey%>' )
		RZsetfieldvalue( document.menuForm.level, '<%=showlevel%>' )
		RZsetfieldvalue( document.menuForm.style, '<%=showstyle%>' )
		RZsetfieldvalue( document.menuForm.hidden, '<%=showhidden%>' )
		RZsetfieldvalue( document.menuForm.orphan, '<%=showorphan%>' )
		RZsetfieldvalue( document.menuForm.buttons, '<%=showbuttons%>' )
		RZsetfieldvalue( document.menuForm.debug, '<%=showdebug%>' )
		RZsetfieldvalue( document.menuForm.console, '<%=showconsole%>' )
		RZsetfieldvalue( document.menuForm.repair, '<%=repair%>' )
		RZsetfieldvalue( document.menuForm.auto, '<%=auto%>' )
	}
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function clickFolder(parentid,recordid,level,icon)
{
	clearAuto();
	if (icon != 'minus')
		reloadPage(recordid)
	else if (level > 0)
		reloadPage(parentid)
	else
		reloadPage(-1)
}
/*------------------------------------------------------------------------------
folder- Value returned from getFolder() java method
callType- Type of call: edit, samelevel or newlevel
------------------------------------------------------------------------------*/
function setFolder(folder,callType)
{
	var msg = '';

	//----- Ask is new will create a new section
	if ('<%=linknewsection%>' == '*prompt*')
	{
		RZ.link.links.linknewsection = '';
		if (callType != 'edit')
		{
			msg = 'Does this page start a new section?\n\n'
			    + 'Click Ok for Yes; Cancel for No';
			if (confirm(msg))
				RZ.link.links.linknewsection = '*';
		}
	}

	//----- If prompting for folder
	if (callType != 'edit'
	&& '<%=folder%>' == '*prompt*')
	//&& ('<%=folder%>' == '*prompt*' || folder == ''))
	{
		msg = 'Enter folder for New Page (enter "/" for site root):'
		folder = prompt(msg,'')
		if (folder == null || folder == '') return false;
	}

	//----- report errors determining folder
	if (folder.indexOf("_revize_folder_") == 0)
	{
		var msg = "Could not determine folder:\n\n" + folder;
		if (!RZconfirm(msg)) return false;
		folder = '';
	}

	//----- set links folder property
	if (folder == '/') folder = '';
	RZ.link.links.linkpathname = folder;

	//----- set linkmanager auto continue if auto update mode is enabled
	if (typeof document.menuForm != 'undefined'
	&& RZgetFieldValue(document.menuForm.auto) != 'off')
		RZ.link.links.linkautocontinue = true;

	return true;
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
function clearAuto()
{
	if (typeof document.menuForm != 'undefined'
	&& RZgetFieldValue(document.menuForm.auto))
		RZsetFieldValue(document.menuForm.auto,'off')
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
editbuttons = new Array();
displayedRecordids = new Array();
RZsetuphandler( 'ondelete', 'return processDelete()' )

function processDelete()
{
	//----- Find recordid of item prior to one being deleted
	for (var i=0; i<displayedRecordids.length; i++)
	{
		if (displayedRecordids[i] == RZ.recordid) break;
	}
	var hash = '';
	if (i<displayedRecordids.length)
	{

	}
	if (i>0)
		hash = '#_rz' + displayedRecordids[i-1];

	//----- Append hash of prior id to current url and return to RZdelete()
	var url = location.href;
	var pos = url.lastIndexOf('#');
	if (pos != -1) url = url.substring(0,pos);

	var obj = new Object();
	obj.nexturl = url + hash;
	return obj;
}
/*---------------------------------------------------------------------------
Toggle link repair mode
----------------------------------------------------------------------------*/
function repairMode()
{
	var debugState = !RZ.repair
	var msg = 'Set link repair mode ' + debugState + '?'
	if (confirm(msg))
		RZ.repair = debugState
	return void(0)
}
/*------------------------------------------------------------------------------
------------------------------------------------------------------------------*/
</script>
<%
	int displayedItems = 0;
	String selectedParentHash = "";
	int columns_before_display = 0;

	//----- Check for required parameters, modules and field
	String errorMsg = "";
	boolean isPublishing = PublishingEngine.getInstance(rz.webspace).isAcceptingPublishEvents();

	if (!rz.isvalidmodule(linkmodule))
		errorMsg += "<br>" + linkmodule + " module does not exist "
		          + "(default is links) use \"linkmodule\" parameter on url to specify different module";
	else
	{	// Validate required fields
		String fieldMsg = "";
		if (!rz.isvalidfield(linkmodule,"linkdisplay"))  fieldMsg += ", " + "linkdisplay";
		if (!rz.isvalidfield(linkmodule,"linkparent"))   fieldMsg += ", " + "linkparent";
		if (!rz.isvalidfield(linkmodule,"linkparentid")) fieldMsg += ", " + "linkparentid";
		if (!rz.isvalidfield(linkmodule,"linklevel"))    fieldMsg += ", " + "linklevel";
		if (!rz.isvalidfield(linkmodule,"linkstyle"))    fieldMsg += ", " + "linkstyle";
		if (!rz.isvalidfield(linkmodule,"linksortkey"))  fieldMsg += ", " + "linksortkey";

		if (fieldMsg.length() > 0)
			errorMsg += "<br>" + linkmodule + " module does not contain the following required field(s): "
			         + fieldMsg.substring(2);

		if (rz.isvalidfield(linkmodule,"linksectionid"))
			sectionidfield = "linksectionid";
		else if (rz.isvalidfield(linkmodule,"sectionid"))	//backward compatiblity
			sectionidfield = "sectionid";

		if (sectionid.length() > 0 || sectionsfilter.length() > 0)
		{
			if (sectionidfield.equals(""))
				errorMsg += "<br>sectionid url parameter specified but "
				         + linkmodule + " module does not contain linksectionid field";
		}

		if (errorMsg.length() == 0 && !isPublishing)
			errorMsg = "Publishing is Disabled";
	}

	// display message
	if (errorMsg.length() > 0)
	{
		%>
	  <table width="100%%" border="0" cellspacing="2" cellpadding="0">
  		<tr>
		  <td align="center" class="normal"><font color="#CC0000"><strong><%=errorMsg%></strong></font></td>
		</tr>
	  </table>
	  <%
	}
%>
<script language="JavaScript" type="text/javascript">
useSectionId = <%=sectionidfield.length() > 0 && sectionid.length() > 0%>;	//if passed on url
useToSectionId = <%=rz.isvalidfield(linkmodule,"linktosectionid")%>;
useAncestor = <%=rz.isvalidfield(linkmodule,"linkancestor")%>;
</script>

	  <form name="topForm" id="topForm" method="post" action="" onSubmit="return updateSection()">
	    <table border="0" align="center" cellpadding="0" cellspacing="5" class="box">
  		<tr bgcolor="#E0F0FF">

    	  <% if (showsectionids) { %>
    	  <% columns_before_display += 3; %>
    	    <td colspan="3" height="30" align="center" class="normal"><strong>sectionid<br>
			  tosectionid</strong></td>
		  <% } %>

    	  <% if (showrecordid) { %>
    	  <% columns_before_display += 4; %>
    	  <td colspan="4" height="30" align="center" class="normal"><strong>recordid<br>
			   linkid</strong></td>
		  <% } %>

    	  <% if (showparentid) { %>
    	  <% columns_before_display++; %>
    	  <td height="30" align="center" class="normal"><strong>parentid</strong></td>
		  <% } %>

    	  <% if (showparentkey) { %>
    	  <% columns_before_display++; %>
    	  <td align="left" class="normal"><strong>linkparent<br>(LM module)</strong></td>
		  <% } %>

    	  <% if (showpagekey) { %>
    	  <% columns_before_display++; %>
    	  <td align="left" class="normal"><strong>pagekey<br>(derived)</strong></td>
		  <% } %>

    	  <% if (showlevel) { %>
    	  <% columns_before_display++; %>

    	  <td height="30" align="center" class="normal"><strong>Level<sub>1</sub></strong></td>
		  <% } %>


    	  <% if (showbuttons) { %>
    	  <% columns_before_display++; %>

    	  <td height="30" align="center" class="normal"><strong>Actions</strong></td>
		  <% } %>


    	  <% if (sortfield.equals("linkseq")) { %>
		  <% columns_before_display++; // link name column also counted %>

    	  <td height="30" align="right" bgcolor="#E0F0FF" class="normal"><strong>&nbsp;Seq&nbsp;</strong></td>
		  <% } %>

    	  <td height="30" align="center" class="normal">
			  <table width="100%" border="0" cellspacing="0" cellpadding="0">
        	    <tr>
          		  <td class="normal"><div id="sections" align="center" style="visibility:hidden">
	  		        <!-- ***************** START OF SECTION DROP DOWN ***************** -->
					<%
					boolean haveSection = false;
					if (sectionsfilter.length() > 0 && sectionid.length() == 0)
						sectionid = rz.getcookie("RZsectionid");

					String sectionidfilter = sectionsfilter;
					if (sectionidfilter.length() == 0)
						sectionidfilter = "_recordid<0";	//gets no records
					%>
					<strong>&nbsp; Choose Section: </strong>
					<select name="sectionid">
			        <rz:list module="sections" sort="sectionid asc" output="none"
					 options="" filter="<%=sectionidfilter%>">
					<% while ( rz.listnext() ){ %>
					<% if (rz.listindex < 0) break; %>
						<rz:listbody><rz:fetch
						 module="sections" field="sectionname" output="none"
						 options="size=30,wrap=Virtual"/>
						<%
						rz.fetch("sections","sectionid");
						if (rz.content.equals(sectionid)) haveSection = true;
						%>
					      <option value="<%=rz.content%>"><%=rz.fetch("sections","sectionname")%></option>
						</rz:listbody>
					<%}	//end section list %>
					</rz:list>
					<%
					if (!haveSection && sectionid.length() > 0)
					{
						if (sectionname.equals("")) sectionname = sectionid;
						%><option selected="selected" value="<%=sectionid%>"><%=sectionname%></option><%
					}
					else if (!haveSection && sectionsfilter.length() == 0)
					{
						%><option selected="selected" value="">--All Sections--</option><%
					}
					else if (!haveSection)
					{
						sectionid = "-999";
						%><option selected="selected" value="<%=sectionid%>">--Select--</option><%
					}
					%>
					</select>
					<a href="javascript:updateSection()"><img
					src="images/edit/go-arrow.gif" alt="Select" border="0" align="absbottom"
					style="border-bottom-width:2px; border-bottom-color:#E0F0FF; "></a>
                  </div></td>
                  <td align="right">
		  		  	<!-- ******************** START OF EXIT BUTTON ******************** -->
					<%-- #BeginRZ-ActionImage --%>
					<%-- Option:type=EditListExitImage --%>
					<%-- Option:forwardURL= --%>
					<%-- Option:imageSrcURL=images/edit/exit.gif --%>
					<!-- REVIZE CANCEL UPDATE AND RETURN TO PRIOR PAGE (edit list) -->
					<script language="JavaScript" type="text/javascript">
					RZ.nexturl = '';
					RZ.img = '<img src="images/edit/exit.gif" alt="Exit Screen" border="0" />';
					RZ.options = '';
					if (typeof RZaction != 'undefined') RZaction('exit');
					</script>
					<%-- #EndRZ-ActionImage --%>
                  </td>
				</tr>
      		  </table>
		  </td>
		  <% if (showstyle) { %>
    	  <td height="30" class="normal"><strong>&nbsp;style</strong></td>
		  <% } %>


  </tr>

<!-- ************************** Menu List ****************************** -->
<%
int pos = 0;
debugMsg = "";	//clear class variable;
String filter = "";
String options = "deletedrecords";

if (linksfilter.length() > 0 && !linksfilter.equals("*none*"))
{
	filter = linksfilter;
}
else if (isWebGen) //Below is some what custom portal code
{
	// filter used when NOT top nav
	// do not allow top nav if home page (sectionid==0)
	if (sectionid.length() > 0)
		filter = sectionidfield + "=" + sectionid;	//only this section links...

	if (!sectionid.equals("0")			//...or top nav pointing to this section
	&& rz.isvalidfield(linkmodule,"linktosectionid"))
	{
		if (rz.isvalidfield(linkmodule,"linktosectionid"))
		filter += " or linktosectionid=" + sectionid;	//plus pointed to section

		if (rz.isvalidfield(linkmodule,"rootsectionid"))
		filter += " or rootsectionid=" + sectionid;		//plus root section
	}

	// include rte links (override default if linkrte!=on)
	filter = "linkrte!=X and (" + filter + ")";

	// allow all RTE & non-RTE links when section not specified
	if (sectionid.equals("")) filter = "linkrte!=X";

	// filter and options used for top nav
	if (StringUtils.sub(sectionid,0,1).equals("-"))
	{
		filter = sectionidfield + "=" + sectionid;
		if (!showdebug) options = "";	//no deleted records
	}
}
else
{
	//----- If sectionid specified, use for filter
	if (sectionid.length() > 0)
	{
		filter = sectionidfield + "=" + sectionid;	//only this section links...

		if (rz.isvalidfield(linkmodule,"linktosectionid"))
		{
			if (rz.isvalidfield(linkmodule,"linktosectionid"))
				filter += " or linktosectionid=" + sectionid;	//plus pointed to section

			if (rz.isvalidfield(linkmodule,"rootsectionid"))
				filter += " or rootsectionid=" + sectionid;		//plus root section

			if (pageid.length() > 0)
				filter += " or linkparentid=" + pageid;			//plus current selection children
		}
		if (filter.length() > 0) filter = "(" + filter + ")";
	}

	//----- Prepend linkrte filter with AND
	if (filter.indexOf("linkrte") == -1)
	{
		if (filter.length() > 0)
			filter = "linkrte!=X and " + filter;
		else
			filter = "linkrte!=X";
	}
}

String newPageId = "0";
if (StringUtils.sub(sectionid,0,1).equals("-"))
	newPageId = "-999";

boolean isEditOnlyNote = false;
boolean	isThisPageNote = false;
boolean	isRteLinkNote = false;
boolean	isCenterListNote = false;
boolean	isLastPageNote = false;
boolean isNextPageNote = false;
boolean isDeletedNote = false;
boolean haveItem = false;
int[] countActive = new int[0];
int[] countOrphan = new int[0];

%>
<rz:list groupbyfield="linklevel" module="<%=linkmodule%>" sort="" output="none"
 	options="<%=options%>" filter="<%=filter%>">
<%@	page import = "revize.taglib.content.*,revize.taglib.content.data.*" %>
<%
//----- process menu items
/* new call format
*/

String menuopts = "sectionid=" + sectionid
		     + ",pageid=" + pageid
		     + ",displaylevel=" + displaylevel
		        + ",sortfield=" + sortfield;
if (showorphan) menuopts += ",showall";
rz.menusorter(menuopts);

HashMap menuStyle = rz.menu.menuStyle;
countActive = rz.menu.countActive;
countOrphan = rz.menu.countOrphan;
HashMap linkOwner = rz.menu.linkOwner;

HashMap lastpage = rz.menu.lastpage;
HashMap nextpage = rz.menu.nextpage;

/* old calling formats; keep for testing backward compatibility of menusorter()
//Object[] menuProperties = rz.menusort(rz.listRecords,pageid,displaylevel);
Object[] menuProperties = rz.menusort("pageid=" + pageid + ",displaylevel=" + displaylevel);
HashMap menuStyle = (HashMap)menuProperties[0];
countActive = (int[])menuProperties[1];
countOrphan = (int[])menuProperties[2];
HashMap lastpage = (HashMap)menuProperties[3];
HashMap nextpage = (HashMap)menuProperties[4];
*/

String style = "";
String stylePriorItem = "";
String styleReturn = "";

int indentlevel = 0;
int menu_level = -1;		//initialize with or w/o any links
int next_level = 1;			//skip next level new button
int linklevel = 0;

boolean[] selected_level = new boolean[99];
for (int i=0; i<99; i++) selected_level[i] = false;

String linkdisplay = "";
String linkrte = "";
String linktype = "";
String linkurl = "";

String recordid = "";
String linkid = "";

int parentid = 0;
int linkparentid = 0;
String linkpageid = "";
String linksectionid = "";
String linktosectionid = "";
String rootsectionid = "";
String linkfilename = "";
String linkpathname = "";
String linkscript = "";

String linkfolder = "";
String linkoptions = "showurl,none,template,url";
if (!sortfield.equals("linkseq")) linkoptions += ",noseq";

String[] parentkeys = new String[99];
String[] linkparentids = new String[99];
String[] linksectionids = new String[99];
String[] linktosectionids = new String[99];
String[] linkpathnames = new String[99];
boolean showButton = false;

//----- loop through all menu items plus 1 extra pass to close levels
if (showconsole)
	debugMsg += "rz.listlimit: " + rz.listlimit + " filter=" + filter + "\n"
	         + "\n-----------------------------------------------"
	         + "\n                  WHILE LOOP"
	         + "\n-----------------------------------------------"
	         + "\n";

while (rz.listnext() || rz.listindex <= rz.listlimit+1)
{
	//----- Get data for this link item (unless last pass to add bottom new button)
	//		TODO: consider reseting on last pass when outside array bounds however
	//			  some logic may expect the most recent value for some varibles.
	if (rz.listindex>=0 && rz.listindex <= rz.listlimit)
	{
		%>
		<rz:link name="links" target="" output="none"
		options="<%=linkoptions%>"
		filelocation=""
		imagelocation=""
		linkpathname = '<%=folder%>'
		linknewsection = '<%=linknewsection%>'
		template="<%=templates%>">
		</rz:link>
		<%
		recordid = rz.recordid;
		linkdisplay = rz.content;
		linktype = rz.linktype;
		linkurl = rz.url;
		linkscript = rz.script;		//only run for items with new button

		if (sectionidfield.length() > 0)
			linksectionid = rz.fetch(rz.listmodule,sectionidfield,"report");
		if (rz.isvalidfield(linkmodule,"linktosectionid"))
			linktosectionid = rz.fetch(rz.listmodule,"linktosectionid","report");
		if (rz.isvalidfield(linkmodule,"rootsectionid"))
			rootsectionid = rz.fetch(rz.listmodule,"rootsectionid","report");
		linklevel = StringUtils.toInt( rz.fetch(rz.listmodule,"linklevel","report") );
		linkid = rz.fetch(rz.listmodule,"linkid","report");
		linkparentid = StringUtils.toInt( rz.fetch(rz.listmodule,"linkparentid","report") );
		linkpageid = rz.fetch(rz.listmodule,"pageid","raw");
		if (rz.nodata) linkpageid = "0";
		linkfilename = rz.fetch(rz.listmodule,"linkfilename","raw");
		pos = linkfilename.lastIndexOf("/");
		if (pos == -1)
			linkpathname = "";
		else
			linkpathname = linkfilename.substring(0,pos);
		if (rz.tracestack.length() > 0) break;		//quit if errors
	}

	//----- Get prior level parentid (set to 999 if top level)
	parentid = 0;
	if (linklevel > 0 && linkrecords[linklevel-1] != null)
		parentid = StringUtils.toInt(linkrecords[linklevel-1]);
	if (parentid == 0)
		parentid = 999;

	if (showconsole)
	{
		debugMsg +="\nlistindex: " + StringUtils.right("000"+rz.listindex,3)
				 + " rec(" + StringUtils.right("000"+rz.listitemid(),3) +") "
				 + " menu_level=" + menu_level
				 + "           " + linkdisplay
				 + "\n"
				 + "           parentid=" + parentid
				 + " linkparentid=" + linkparentid
				 + " linkpageid=" + linkpageid
				 + "\n";
	}

	if (!style.equals(""))
	    stylePriorItem = style;

	//String linkOwner = (String)rz.menuProperties.linkOwner.get(rz.listitemid());
	if (rz.listindex < 0 || rz.listindex > rz.listlimit)
	{
    	style = "";		//keeps item from displaying
		linklevel = 0;
		linkparentid = 0;
	}
    //****************************************************************
    //      Througly test when no menu items pass filter or test below
    //		New button must appear so we can't execute break;
    //****************************************************************
	else if
	(
		sectionid.length() > 0					//sectionid url argument exists
		/* new menusort call format
		&& !showorphan
		&& !showorphan
		&& !sectionid.equals(linksectionid)		//link not created on this page
		&& !sectionid.equals(linktosectionid)	//link does not point to this page
		&& !sectionid.equals(rootsectionid)
		&& !linkOwner.equals("parent")			//not placed on last page
		&& !linkOwner.equals("child")			//not placed on next page
		*/
		/* old menusort call format */
		&& !showorphan
		&& !sectionid.equals(linksectionid)		//link not created on this page
		&& !sectionid.equals(linktosectionid)	//link does not point to this page
		&& !sectionid.equals(rootsectionid)
		&& lastpage.get(rz.listitemid())==null	//not placed on last page
		&& nextpage.get(rz.listitemid())==null	//not placed on next page
		//&& parentid != linkparentid 			//parent not displayed on this page
	)
	{	//then skip this item
		if (showconsole)
		{
			debugMsg +="skip: sectionid=" + sectionid
			         + " linksectionid=" + linksectionid
			         + " linktosectionid=" + linktosectionid
			         + "\n";
		}
    	style = "";				//keeps item from displaying
		if (rz.listindex == rz.listlimit && rz.listlimit > 0)
			rz.listindex++;		//bump loop counter if not at beg or end
		if (haveItem) continue;	//can not continue if new button not displayed
	}
	else
	{
    	//style = (String)rz.menuProperties.menuStyle.get(rz.listitemid());
		style = (String)menuStyle.get(rz.listitemid());
    	if (style == null) style = "menuUnknown";
    	styleReturn = style;

		linkrte = rz.fetch(rz.listmodule,"linkrte","raw");

 	  	indentlevel = linklevel;
 	  	if (toplevel > 0) indentlevel = indentlevel-toplevel+1;
		if (style.equals("menuOrphan")) indentlevel = 0;

		if (style.equals("menuHidden") && !showhidden) style="";
		if (style.equals("menuOrphan") && !showorphan) style="";

		if (style.equals("menuSelectedParent")) // && selectedParentHash.equals(""))
			selectedParentHash = recordid;

		linkrecords[linklevel] = recordid;		//remember parent recordid
		linkdisplays[linklevel] = linkdisplay;	//remember last item encountered
	}

	// link tag below used to define link manager properties including default folder
	// and page permission inheritance for buttons.

	// link tag needed here when no items; otherwise only call when items are visible
	// to prevent reset permission properties for hidden items.
	if (rz.listlimit < 0)
	{
		%>
		<!-- listindex=<%=rz.listindex%>: <%=linkdisplay%>  -->
		<rz:link name="links" target="" output="none"
		options="<%=linkoptions%>"
		filelocation=""
		imagelocation=""
		linkpathname = '<%=folder%>'
		linknewsection = '<%=linknewsection%>'
		template="<%=templates%>">
		<script language="JavaScript" type="text/JavaScript"><%=rz.script%></script>
		</rz:link>
		<%
	}
	linkparentids[linklevel] = new Integer(linkparentid).toString();
	linksectionids[linklevel] = linksectionid;
	linktosectionids[linklevel] = linktosectionid;
	linkpathnames[linklevel] = linkpathname;
	if (showconsole)
	{
		debugMsg +="\n*linklevel: " + linklevel
				 + "  linksectionids:" + linksectionids[linklevel]
				 + "  linktosectionids:" + linktosectionids[linklevel]
				 + "  linkpathnames:" + linkpathnames[linklevel]
				 + "\n";
	}

	//----- Determine next level
	if (rz.listindex < rz.listlimit
	&& !styleReturn.equals("menuOrphan"))
		next_level = Integer.parseInt(rz.groupnextvalue);
	else
		next_level = -1;		//move all the way up

	if (showconsole)
	{
		debugMsg +="next_level:" + next_level
				 + "  style:" + styleReturn + " displayed:"+(style.length()>0)
				 + "\n";
	}

	%>
	<rz:listbody>
	<%

	//----- If moving down a level
	if (menu_level < linklevel && rz.listindex <= rz.listlimit)
	{
		// prior level folder (errors reported when button clicked)
		int tempLevel = menu_level; String tempFolder = "";
		if (tempLevel >= 0) tempFolder = linkpathnames[tempLevel];
		linkfolder = getFolder(rz,menu_level,tempFolder,"new");

		if (showconsole)
		{
			debugMsg +="\nmove down("+(menu_level)+" --> "+linklevel
			         + "): StylePriorItem:" + stylePriorItem
		             + "\n"
		             + "         folder:" + linkfolder
		             + "\n";
		}

		menu_level = linklevel;	// remember next level

		showButton = false;
		if (menu_level == 0
		|| stylePriorItem.equals("menuSelectedItem")
		|| stylePriorItem.equals("menuSelectedParent"))
			showButton = true;

		if (menu_level < toplevel || menu_level > bottomlevel)
			showButton = false;

		if (sectionid.equals("-999"))
			showButton = false;

		if (showButton)
		{
			selected_level[menu_level] = true;
			String alt = "Create New Item at same level ";
			if (menu_level == 0) alt += "(TOP) ";
			alt += "as:\\n" + linkdisplays[menu_level] + " (level " + menu_level + ")";
  			%>

  		<!-- ******************** START OF NEW BUTTON (SAME LEVEL) ******************** -->
		<script language="JavaScript" type="text/JavaScript">
		//----- Execute the script generated by the rz link tag used by new button for linkparent
		//		Must run here so subsequent items as the same levels to not over-ride these values.
		<%=linkscript%>
		</script>
		<tr>
		  <td colspan="<%=columns_before_display%>">&nbsp;</td>
		  <td colspan="1">
      		<%
			for (int i=0; i<(indentlevel*2)+1; i++)
			{
				%>
				<img src="/revize/images/edit/folder_space.gif" width="9" height="9">
				<%
			}

			//----- If newtosectionid is NOT zero, new section option is not available
			//		(this code repeated for other new button at same level)
			//
			String newtosectionid = linksectionids[linklevel];	//start with this level linksectionid
			if (menu_level > 0
			&& linktosectionids[menu_level-1] != null)				//if there is a parent record
				newtosectionid = linktosectionids[menu_level-1];	//parent tosectionid

			if (!isWebGen
			|| toplevel == menu_level
			|| newtosectionid.equals(sectionid))		//if parent is not a new section...
				newtosectionid = "0";					//...allow new section option

			if (showconsole)
			{
				if (menu_level > 0)
				debugMsg +="\ntop new button same level menu_level:"+(menu_level-1)
				         + " parenttosection:" + linktosectionids[menu_level-1]
						 + "\n                           sectionid:"
						 + StringUtils.sub(sectionid+" ",0,2)
						 + " newtosectionid:" + newtosectionid
						 + "\n";
			}
			%>
		    <%-- #BeginRZ-ActionImage --%>
		    <%-- Option:type=EditListInsertImage --%>
		    <%-- Option:imageSrcURL=images/edit/new_sm_parent.gif --%>
		    <script language="JavaScript" type="text/JavaScript">
		RZ.module = '<%=linkmodule%>'; RZ.linkname = 'links';
		RZ.recordid = 'new';
		RZ.nexturl = '';
		if (<%=!auto%>) RZ.nexturl = '<%=nexturl%>'
		RZ.popupwidth = '500'; RZ.popupheight = '400'; RZ.popupscroll = 'yes';
		RZ.img = '<img src="images/edit/new_sm_parent.gif" alt="' + "<%=alt%>" + '" border="0" />';
		RZ.set = '<%=linkmodule%>.linkparentid=<%= linkparentids[menu_level] %>,'
		if (useToSectionId)
		{
			RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= linksectionids[linklevel] %>,'
			RZ.set += '<%=linkmodule%>.linktosectionid=<%= newtosectionid %>,'
		}
		else if (useSectionId)		//sectionid argument
			RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= sectionid %>,'

		if (useAncestor)
			RZ.set += '<%=linkmodule%>.linkancestor=???,'

		RZ.set += '<%=linkmodule%>.pageid=<%= newPageId %>,'
			    + '<%=linkmodule%>.linkvisible=1,'
			    + '<%=linkmodule%>.linklevel=<%= menu_level %>';
		if (RZ.setparameter != '')
			RZ.set += ',' + RZ.setparameter;

		RZ.linklevel = '<%= menu_level %>';
		RZ.options = '';
		RZ.script = "setFolder('"
		          + <%=StringUtils.convertStringForSource(linkfolder)%>
		          + "','samelevel');";
		if (typeof RZaction != 'undefined') RZaction('newitem');
		</script>
		    <%-- #EndRZ-ActionImage --%>
		  </td>
		  <% if (showstyle) { %>
		  <td>&nbsp;</td>
		  <% } %>
		  <% if (false) { //fake out DW; add TD that spans all the potentially hidden columns %>
		  <td colspan="13"></td>
		  <% } %>
		</tr>
  		<!-- ********************* END OF NEW BUTTON (SAME LEVEL) ********************* -->

		<%
		} // end if style == menuSelectedItem
  	} // end of moving down a level
	/////////////////////////// START OF VALID MENU ITEM ////////////////////////////
  	if (!style.equals("")
  	&& rz.listindex >= 0 && rz.listindex <= rz.listlimit)
  	{
		haveItem = true;
		displayedItems++;
		if (showconsole) debugMsg += "     Valid Link:" + linkdisplay + "\n";
		%>
		<script language="JavaScript" type="text/javascript">
			displayedRecordids[displayedRecordids.length] = '<%=recordid%>';
		</script>
		<tr>
		<rz:fetch module="<%=rz.listmodule%>" field="_recordid" output="none" />

		<% if (showsectionids) { %>
		  <td align="right" valign="top" nowrap class="normal">&nbsp;&nbsp;<rz:fetch
		  module="<%=linkmodule%>" field="<%=sectionidfield%>" output="html" />
		  </td>
		  <td align="center" valign="top" nowrap class="normal">&nbsp;&nbsp;&nbsp;</td>
		  <td align="right" valign="top" nowrap class="normal">
			<% if (rz.isvalidfield(linkmodule,"linktosectionid")){ %>
		    <rz:fetch module="<%=linkmodule%>" field="linktosectionid" output="html" />
		    <% } %>
		    &nbsp;&nbsp;&nbsp;
		  </td>
		<% } %>

		<% if (showrecordid) { %>
		  <td class="normal">&nbsp;</td>
		  <td align="right" valign="top" class="normal">
		  <%
			String tooltip = "linktype: " + linktype
						   + "\nlinkfilename: " + linkfilename
						   + "";
		  %>
		  <!-- <a href="javascript:void clearAuto();reloadPage(<%=recordid%>)" title="<%=tooltip%>"><%=recordid%></a> -->
		  <a href="<%=linkurl%>" title="<%=tooltip%>" target="menu-editlist"><%=recordid%></a>
		  </td>
		  <td class="normal">&nbsp;&nbsp;</td>
		  <td align="right" valign="top" class="normal"><%=linkid%>&nbsp;&nbsp;</td>
		<% } %>


		<% if (showparentid) { %>
		  <td align="center" valign="top"><%=linkparentid%></td>
		<% } %>


		<% if (showparentkey) { %>
		  <td align="left" valign="top" nowrap><rz:fetch
 module="<%=rz.listmodule%>" field="linkparent" output="html"
 options="size=30,wrap=Virtual"/></td>
		<% } %>


		<% if (showpagekey) { %>
		  <td align="left" valign="top" nowrap>
		    <%
		    if (linktype.indexOf("template") != -1		//if template
		    || linktype.indexOf("noneXXX") != -1)			//or none (future)
			{
				rz.fetch( rz.listmodule, "linkpage" );
				rz.content += "[" + linkid + "]";
			}
			else
				rz.content = "...N/A...";
			%>
			<%=rz.content%>
		  </td>
		<% } %>


		<% if (showlevel) { %>
		  <td align="center" valign="top">&nbsp;<%=linklevel%>&nbsp;</td>
		<% } %>

		<!-- ******************* Start EDIT/DELETE Column ******************* -->
		<% if (showbuttons) { %>
		  <td align="center" valign="top" nowrapclass="normal">
		  	<%
			if (linkrte.equals("yes")) 				//added by rte
			{
				isRteLinkNote = true;
				%>
				RTE Link<sub>4</sub>
				<%
			}
			else if (isWebGen
			&& menu_level >= toplevel				//not current page
			&& !linkpageid.equals("0") 				//not left nav
			&& !linkpageid.equals("-999")) 			//not top nav
			{
				isCenterListNote = true;
				%>
				Center List<sub>3</sub>
				<%
			}
			else if (isWebGen
			&& menu_level >= toplevel
			//&& linkOwner.equals("parent"))
			&& lastpage.get(recordid) != null)
			{	//link created on last page as indented link and must be edited there
				isLastPageNote = true;
				%>
				Parent Page<sub>2</sub>
			<%
			}

			//TODO: This is desirable now on non webgen because children do not display
			//		due to sectionid filter.
			//else if (linkOwner.equals("child"))
			else if (nextpage.get(recordid) != null)
			{	//link created and only appears on next page and must be edited there
				isNextPageNote = true;
				%>
				Child Page<sub>2</sub>
				<%
			}
			else if (sectionid.length() > 0
			&& !sectionid.equals(linksectionid)) 	//link not created on this page
			{	//assume points to this page because it is not "Last Page" or "Next Page"
				isThisPageNote = true;
				%>
				Section Home<sub>2</sub>
				<%
			}
			else
			{ 	// start EDIT button display %>
				<%-- #BeginRZ-ActionImage --%>
				<%-- Option:type=EditListEditImage --%>
				<%-- Option:imageSrcURL=images/edit/edit_sm.gif --%>
				<script language="JavaScript" type="text/javascript">
				RZ.module = '<%=rz.listmodule%>'; RZ.linkname = 'links';
				RZ.recordid = '<%=rz.listitemid()%>';
				RZ.nexturl = '';
				if (<%=!auto%>) RZ.nexturl = '<%=nexturl%>'
				RZ.popupwidth = ''; RZ.popupheight = ''; RZ.popupscroll = '';
				RZ.img = '<img src="images/edit/edit_sm.gif" alt="Edit Item" border="0" />';


				//----- Need set for validation and repair functionality
				RZ.set = '<%=linkmodule%>.linkparentid=<%= linkparentids[menu_level] %>,'
				if (useToSectionId)
				{
					RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= linksectionids[menu_level] %>,'
					// not passing linktosectionid on edit repair
				}
				else if (useSectionId)		//sectionid argument
					RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= sectionid %>,'

				RZ.set += '<%=linkmodule%>.pageid=<%= newPageId %>,'
						+ '<%=linkmodule%>.linkvisible=1,'
						+ '<%=linkmodule%>.linklevel=<%= menu_level %>';

				if (RZ.setparameter != '')
					RZ.set += ',' + RZ.setparameter;


				RZ.linklevel = '<%=rz.fetch(rz.listmodule,"linklevel")%>'
				RZ.options = '';
				<%	// folder errors reported when button clicked
					int tempLevel = linklevel-1; String tempFolder = "";
					if (tempLevel >= 0) tempFolder = linkpathnames[tempLevel];
					String arg = getFolder(rz,StringUtils.toInt(rz.listitemid()),
					                       tempFolder,"edit");
					arg = StringUtils.convertStringForSource(arg);

					if (showconsole)
					{
						debugMsg +="edit button: linklevel="+linklevel
								 + "\n"
								 + "         folder:" + tempFolder
								 + "\n";
					}
				%>
				RZ.script = "setFolder('"
						  + <%= arg %>
						  + "','edit');";

				// display edit button and save for use with auto update function
				if (typeof RZaction != 'undefined') editbuttons[RZ.recordid] = RZaction('edititem');
				</script>
				<%-- #EndRZ-ActionImage --%>

				<% if (next_level > linklevel)
				{ // display * footnote delete if lower level (child) items
					%>
					<img src="images/edit/delete_sm_fade.gif" alt="Parents with Childen cannot be deleted" border="0" />
					<%
					isEditOnlyNote = true;

				} else { // display active delete if NO lower level items %>
					<%-- #BeginRZ-ActionImage --%>
					<%-- Option:type=EditListDeleteImage --%>
					<%-- Option:forwardURL= --%>
					<%-- Option:imageSrcURL=images/edit/delete_sm.gif --%>
					<script language="JavaScript" type="text/javascript">
					RZ.module = '<%=rz.listmodule%>';
					RZ.recordid = '<%=rz.listitemid()%>';
					RZ.name = 'RZdelete' + RZ.recordid;
					RZ.img = '<img src="images/edit/delete_sm.gif" alt="Delete Item" border="0" />';
					RZ.options = '';
					if (typeof RZaction != 'undefined') RZaction('delete');
					</script>
					<%-- #EndRZ-ActionImage --%>

					<% if (rz.isvalidfield(linkmodule,"linkvisible")) { %>
						<rz:fetch
						 module="links" field="linkvisible" output="none"
						 options="display,wrap=Virtual"></rz:fetch>
						<%-- #BeginRZ-ActionImage --%>
						<%-- Option:type=ForwardEditFormImage --%>
						<%-- Option:imageSrcURL=images/edit/eye-open.png --%>
						<!-- Revize Forward to Edit Form -->
						<script language="JavaScript" type="text/JavaScript">
						RZ.module = '<%=linkmodule%>';
						RZ.recordid = '<%=rz.recordid%>';
						RZ.nexturl = "visible-editform.jsp";
						RZ.popupwidth = '300'; RZ.popupheight = '200'; RZ.popupscroll = 'no';
						RZ.img = '<img src="images/edit/eye-<%=rz.content.equals("1")?"open":"closed"%>.png" '
							   + 'alt="Make Link <%=rz.content.equals("1")?"INVISIBLE":"Visible"%>" border="0" />';
						RZ.set = '';
						RZ.options = '';
						if (typeof RZaction != 'undefined') RZaction('editform');
						</script>
						<%-- #EndRZ-ActionImage --%>
					<% } // end invisible %>
				<% } // end active delete button %>
        	<% } // end button display %>
		  </td>
		<% } //end button column %>
		<!-- ******************** End EDIT/DELETE Column ******************** -->

    	<% if (sortfield.equals("linkseq")) { %>
		  <td align="right" valign="top" nowrap="nowrap" class="<%=style.equals("menuSelectedItem")?"box":"normal"%>">&nbsp;
		  	<rz:fetch
			 module="<%=rz.listmodule%>" field="linkseq" output="html"
			 options="size=30,wrap=Virtual,noerrormessage"/>&nbsp;
		  </td>
    	<% } %>

		<!-- ******************* START DISPLAY MENU ITEM ******************* -->
		  <td valign="top" nowrap="nowrap" class="<%=style.equals("menuSelectedItem")?"box":"normal"%>">
			<a name="<%=recordid%>"></a>

			<%
			for (int i=0; i<(indentlevel*2); i++)
			{ 	%>
				<img src="/revize/images/edit/folder_space.gif" width="9" height="9">
				<%
			}

			String icon = "space";
			if (next_level > linklevel)	//lower level items
			{
				icon = "plus";
				if (showhidden
				|| style.indexOf("SelectedItem") != -1
				|| style.indexOf("SelectedParent") != -1 )
					icon = "minus";
			}
			String deletedFlag = "";
			if (rz.record.isMarkedForDeletion() && showdebug)
			{
				deletedFlag = "+";
				isDeletedNote = true;
			}

			//----- rz:link tag needed below to set permissions properties
			%>
			<!-- listindex=<%=rz.listindex%>: <%=linkdisplay%>  -->
			<a href="javascript:clickFolder(<%=linkparentid%>,<%=recordid%>,<%=linklevel%>,'<%=icon%>')"><span
			class="<%=style%>"><img src="/revize/images/edit/folder_<%=icon%>.gif" width="9" height="9" border="0">
      		<%=linkdisplay%><%=deletedFlag%></span></a>
			<% if (showsortkey) { %>
			<br>sortkey:<rz:fetch module="<%=rz.listmodule%>" field="linksortkey" output="html" />
			<% } %>
		  </td>
		<!-- ******************** END DISPLAY MENU ITEM ******************** -->
		<% if (showstyle) { %>
		  <td valign="top">&nbsp;<%=style%></td>
		<% } %>
		</tr>
        <!-- ******************** NEW BUTTON (NEXT LEVEL) ******************** -->
  	    <%
		showButton = false;

  	    // next level is not same as this level and this item selected
  	    if (menu_level >= next_level && style.equals("menuSelectedItem"))
  	    	showButton = true;

		// center list
		if (menu_level >= toplevel				//not current page
		&& !linkpageid.equals("0")				//not left nav
		&& !linkpageid.equals("-999"))			//not top nav
			showButton = false;					//must be center list

		// embedded link
		if (linkrte.equals("yes"))
			showButton = false;

		// don't show the next level new button on next page items.
		if (sectionid.length() > 0
		&& !sectionid.equals(linksectionid)		//link not created on this page
		&& !sectionid.equals(linktosectionid)	//and not a link to this page
		&& parentid == linkparentid)			//and parent displayed on this page
			showButton = false;					//so "Last Page" or "Next Page" link

		/* TODO: not sure why this was added - may omit new button somewhere
		// linkto another section and not top nav
		if (!linktosectionid.equals(sectionid)
		&& !StringUtils.sub(sectionid,0,1).equals("-"))
			showButton = false;
		*/

		// outside of top and bottom level ranges
		if (menu_level < (toplevel-1) || menu_level >= bottomlevel)
			showButton = false;

		if (showButton)
  	    {
			// folder errors reported when new button clicked
			int tempLevel = linklevel; String tempFolder = "";
			if (tempLevel >= 0) tempFolder = linkpathnames[tempLevel];
			linkfolder = getFolder(rz,linklevel,tempFolder,"new");

			if (showconsole)
				debugMsg += "\n"
						  + "new subpage: linklevel=" + linklevel
						  + "\n"
						  + "         folder:" + linkfolder
						  + "\n";


			//----- Determine parentkey for permissions & newtosectionid for section option
			String newtosectionid = "0";			//if parent is same as page section...
													//...let linkmanager define tosectionid
			String parentkey = rz.fetch(linkmodule,"linkparent","report");

			// 12-15-2005 DO TODO: For ventura this was needed to correctly set (or fix?)
			// the linkparent when not using tosection field.  Needs further analysis
			// (may only be appropriate when not using tosectionid or when repairing linkparent)
			// parentkey = rz.fetch(linkmodule,"linkpage","report") + "[" + linkid + "]";

			if (!linksectionid.equals(linktosectionid))		//link starts new section
			{
				linktype = rz.fetch(linkmodule,"linktype","report");

				// template or urltemplate
				if (linktype.indexOf("template") != -1)
				{
					String linkpage = rz.fetch(linkmodule,"linkpage","report");

					if (linkid.equals("-999"))			//unique
						parentkey = linkpage + "[]";
					else								//dependent
						parentkey = rz.fetch(linkmodule,"linkpage","report") + "[" + linkid + "]";

					//----- On webgen, if this link goes to a new section and it is a template link,
					//		disallow newsection by setting newtosectionid to non-zero.
					//
					//		This presented too big a challenge for indented links on a page starting
					//		a new section when their parent also started a new section.
					if (isWebGen)
					{
						// if parent is template type, set tosectionid to parent recordid
						if (linktype.equals("template"))
						{
							newtosectionid = recordid;
						}
						// if urltemplate, then check referenced template
						// (leave newtosectionid=0 if template record not found)
						else
						{
							String whereopt = linkmodule + "recordid=" + linkid;
							rz.fetch(linkmodule,"linktosectionid","report,"+whereopt);
							newtosectionid = rz.content;
						}
					// Leave newtosectionid=0 for any other type of link
					}
				}
			}
			%>
		<tr>
		  <td colspan="<%=columns_before_display%>">&nbsp;</td>
		  <td>
      		<%
			for (int i=0; i<((indentlevel+1)*2)+3; i++)
			{
				%>
				<img src="/revize/images/edit/folder_space.gif" width="9" height="9">
				<%
			}
			%>
      		<% String alt = "Create New Item at Next Level (" + (linklevel+1) + ")"; %>
		    <%-- #BeginRZ-ActionImage --%>
            <%-- Option:type=EditListInsertImage --%>
            <%-- Option:imageSrcURL=images/edit/new_sm.gif --%>
            <script language="JavaScript" type="text/javascript">
			RZ.module = '<%=linkmodule%>'; RZ.linkname = 'links';
			RZ.recordid = 'new';
			RZ.nexturl = '';
			if (<%=!auto%>) RZ.nexturl = '<%=nexturl%>'
			RZ.popupwidth = ''; RZ.popupheight = ''; RZ.popupscroll = '';
			RZ.img = '<img src="images/edit/new_sm_child.gif" alt="' + "<%=alt%>" + '" border="0" />';

			RZ.set = '<%=linkmodule%>.linkparentid=<%= recordid %>,'
			if (useToSectionId)
			{
				RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= linktosectionid %>,'
				RZ.set += '<%=linkmodule%>.linktosectionid=<%= newtosectionid %>,'
			}
			else if (useSectionId)
				RZ.set += '<%=linkmodule%>.<%=sectionidfield%>=<%= sectionid %>,'

			if (useAncestor)
				RZ.set += '<%=linkmodule%>.linkancestor=???,'

			RZ.set += '<%=linkmodule%>.pageid=<%= newPageId %>,'
					+ '<%=linkmodule%>.linkvisible=1,'
					+ '<%=linkmodule%>.linklevel=<%= menu_level+1 %>';

			if (RZ.setparameter != '')
				RZ.set += ',' + RZ.setparameter;

			RZ.linklevel = '<%= linklevel+1 %>';
			RZ.options = '';
			RZ.parentkey = '<%= parentkey %>';
			RZ.script = "setFolder('"
					  + <%=StringUtils.convertStringForSource(linkfolder)%>
					  + "','newlevel');";
			if (typeof RZaction != 'undefined') RZaction('newitem');
			</script>
            <%-- #EndRZ-ActionImage --%>
		  </td>
		  <% if (showstyle) { %>
		  <td>&nbsp;</td>
		  <% } %>
		  <% if (false) { //fake out DW %>
		  <td colspan="13"></td>
		  <% } %>
		</tr>
		    <%
		}
	} //////////////////////////// END OF VALID MENU ITEM /////////////////////////////

	//----- While moving up a level (next_level=-1 if this is last item)
	while (next_level < menu_level)
	{
		// folder errors reported when new button clicked
		int tempLevel = menu_level-1; String tempFolder = "";
		if (tempLevel >= 0) tempFolder = linkpathnames[tempLevel];
		linkfolder = getFolder(rz,menu_level-1,tempFolder,"new");

		if (showconsole)
		{
			debugMsg +="\nmoving up("+menu_level+" --> "+ (menu_level-1)
			         +"): rec(" + recordid + ") next_level:" + next_level
					 + "\n"
					 + "         folder:" + linkfolder
					 + "\n";
		}

		showButton = false;
		if (haveItem && (menu_level == 0 || selected_level[menu_level]))
			showButton = true;

		if (menu_level < toplevel || menu_level > bottomlevel)
			showButton = false;

		if (showButton)
		{
			String alt = "Create New Item at ";
			if (menu_level == 0) alt += "TOP ";
			alt += "(" + linkdisplays[menu_level] + ") Level " + menu_level;
			selected_level[menu_level] = false;
			%>
<!-- TODO: bottom new button -->
			<%
		}
		menu_level--;	// reduce group level
	} // end while menu_level > 0
	%>
	</rz:listbody>
		<%
if (rz.listindex >= rz.listlimit) rz.listindex++;	//bump counter on last & extra pass
} // end rz:list while
%>
		</rz:list>
		<tr>

<% if (false) { //fake out DW %>
		  <td colspan="15"><% } else {	out.println("<td colspan=" + columns_before_display+1 + ">");} %>

		Click on New button add a link;
			  <% if (haveItem) { %>
		Click on <strong>link name</strong> to create or view lower links<br>
<% } %>
		Click on Exit button when done adding links<br>

        <strong><br>
        NOTES:</strong><br>
        <% if (isEditOnlyNote) { %>
		<img src="images/edit/delete_sm_fade.gif" alt="Parents with Childen cannot be deleted" border="0" /> Links with children can not be deleted<br>
<% } %>

<% if (isDeletedNote) { %>
		+ These Links are marked as deleted but referenced by a url link<br>
<% } %>

<% if (showlevel) { %>
		1) Depth within the site of page containing the link (Home page and top nav are level 0)<br>
<% } %>

<% if (isThisPageNote || isLastPageNote || isNextPageNote) { %>
		2) These links must be edited on the page where they were added<br>
<% } %>

<% if (isCenterListNote) { %>
		3) These links must be edited from the center of this page<br>
<% } %>

<% if (isRteLinkNote) { %>
		4) These links must be edited within the Rich Text Editor<br>
<% } %>

		  </td>

<% if (showstyle && false) { //should be needed but messes up when showstyle is true%>
		  <td>&nbsp;</td>
<% } %>

		</tr>
	  </table>
<%
if(!showdebug)
{
	%><div align="center"><a href="javascript:developerOptions()"><font
	color="#FFFFFF" face="Arial, Helvetica, sans-serif">Advanced Options</font></a></div>
<%
}
%>
	  </form>
		<script language="JavaScript" type="text/javascript">
		//display sections dropdown if there are any items
		if (document.topForm.sectionid.length > 1)
			document.getElementById('sections').style.visibility='visible'
		</script>
	  <br />
	  <% if (showdebug) { %>
	  <form name="menuForm" id="menuForm" method="post" action="" onSubmit="return updateOptions()">
  		<table width="100%" border="0" align="right" cellpadding="0" cellspacing="0" class="box">
    	  <tr valign="top">
      		<td width="99%" align="center" valign="top">
        	  <table width="100%" border="0" cellpadding="0" cellspacing="0">
          		<tr>
            	  <td width="33%" valign="top">
              		<table border="0" cellpadding="1" cellspacing="2" class="normal">
                	  <tr align="left" valign="top">
                  		<th colspan="2">Display&nbsp;Options</th>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="level" type="checkbox" id="level" value="true" />
                  		</td>
						<td>level</td>
					  </tr>
					  <tr valign="top">
                  		<td align="right">
                    	  <input name="sectionids" type="checkbox" id="sectionids" value="true" />
                  		</td>
						<td>sectionid(s)</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="recordid" type="checkbox" id="recordid" value="true" />
                  		</td>
						<td>recordid<sub>1</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="parentid" type="checkbox" id="parentid" value="true" />
                  		</td>
						<td>parentid</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="parentkey" type="checkbox" id="parentkey" value="true" />
                  		</td>
						<td>parentkey</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="pagekey" type="checkbox" id="pagekey" value="true" />
                  		</td>
						<td>pagekey</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="sortkey" type="checkbox" id="sortkey" value="true" />
                  		</td>
						<td>sort key<sub>2</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="style" type="checkbox" id="style" value="true" />
                  		</td>
						<td>style <sub>3</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="hidden" type="checkbox" id="hidden" value="true" />
                  		</td>
						<td>Hidden Items<sub>4</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="orphan" type="checkbox" id="orphan" value="true" checked/>
                  		</td>
						<td> Show All Items<sub>5</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="buttons" type="checkbox" id="buttons" value="true" checked/>
                  		</td>
						<td> buttons: new, edit &amp; delete</td>
					  </tr>
					  <tr valign="top">
                  		<td align="right">
                    	  <input name="debug" type="checkbox" id="debug" value="true" checked/>
                  		</td>
						<td> Diagnostics (this info)</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="console" type="checkbox" id="console" value="true"/>
                  		</td>
						<td> Debug Messages</td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="repair" type="checkbox" id="repair" value="true"
onClick="RZ.repair = document.menuForm.repair.checked" />
                  		</td>
						<td> Link Repair Mode<sub>6</sub></td>
					  </tr>
                	  <tr valign="top">
                  		<td align="right">
                    	  <input name="auto" type="checkbox" id="auto" value="true"/>
                  		</td>
						<td> Auto update mode<sub>7</sub></td>
					  </tr>
              		</table>
				  </td>
				  <td width="33%" align="center" valign="top"><font size="2">Version 4.3.40U</font>
					<br>
					<table border="0" cellspacing="0" cellpadding="0">
					  <tr>
						<td align="center">
						  <table border="0" cellpadding="3" cellspacing="5" class="normal">
                			<tr align="center">
                  			  <th colspan="4" nowrap>
                    			<input type="submit" name="submit" value="Redisplay Using Updated Settings" />
                  </th>
							</tr>
                			<tr>
                  			  <th align="left" nowrap>Menu Items</th>
							  <td align="center">Active</td>
							  <td align="center">Orphans<sub>4</sub></td>
							  <td align="left">parent_key</td>
							</tr>
                			<%
	int totalActive = 0;
	int totalOrphan = 0;

	/*
	int levelMax = rz.menuProperties.countActive.length;
	if (rz.menuProperties.countOrphan.length > levelMax)
		levelMax = rz.menuProperties.countOrphan.length;
	*/
	int levelMax = countActive.length;
	if (countOrphan.length > levelMax)
		levelMax = countOrphan.length;

	for (int level=0; level<levelMax; level++)
	{
		%>

                			<tr>
                  			  <td>Level <%=level%></td>
							  <td align="center">&nbsp;<%=countActive[level]%>&nbsp;</td>
							  <td align="center">&nbsp;<%=countOrphan[level]%>&nbsp;</td>
							  <td nowrap>
                    			<script language="JavaScript" type="text/javascript">
				if(typeof RZ.linkparentnew.links != 'undefined'
				&& typeof RZ.linkparentnew.links['<%=level%>'] != 'undefined')
					document.write(RZ.linkparentnew.links['<%=level%>'])
              </script>
                  </td>
							</tr>
                			<%
		totalActive += countActive[level];
		totalOrphan += countOrphan[level];
	}
%>

                			<tr>
                  			  <td>Total</td>
							  <td align="center">&nbsp;<%=totalActive%>&nbsp;</td>
							  <td align="center">&nbsp;<%=totalOrphan%>&nbsp;</td>
							  <td align="center" nowrap>&nbsp;</td>
							</tr>
              			  </table>
						</td>
					  </tr>
					  <tr>
						<td align="center">
						  <%if (isPublishing) {%>
						  <input name="publish" type="button" id="publish" value="Publish Channels"
onClick="RZpopupUrl('publish','../admincenter/channels.jsp')">
						  <%}%>
						</td>
					  </tr>
					  <tr>
						<td align="center">
						  <input type="button" name="publishing"
						  value="<%=isPublishing?"Disable":"Enable"%> Publishing"
onClick="clearAuto();reloadPage(document.menuForm.pageid.value,'onoff=<%=isPublishing?"false":"true"%>')">
						</td>
					  </tr>
					  <tr>
						<td align="center">
						  <input name="debugger" type="button"
onClick="RZstartDebugger()" value="Start Debugger">
						</td>
					  </tr>
					  <tr>
						<td align="center">
						  <input name="setdebug" type="button"
onClick="RZdebug()" value="Debug Mode">
						</td>
					  </tr>
					  <tr>
						<td align="center">
						  <input name="setdebug" type="button"
onClick="document.getElementById('notes').style.display='block';" value="Display Notes">
						</td>
					  </tr>
					</table>
				    <br>
					<font size="2">filter: <%=filter%>
					<br>
					nexturl: <%=nexturl%>
				  </font>				  </td>
				  <td width="33%" align="right" valign="top">
              		<table border="0" cellpadding="0" cellspacing="3" class="normal">
                	  <tr>
                  		<th colspan="2" nowrap>Additional Options</th>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>webSpace:</td>
						<td valign="top" nowrap>
                    	  <input name="webspace" type="text" id="webspace" value="<%=rz.webspace%>" size="20" />
                  		</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>Link&nbsp;Manager Module:</td>
						<td valign="top" nowrap>
                    	  <input name="linkmodule" type="text" id="linkmodule" value="<%=linkmodule%>" size="20" />
                  		</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>linknewsection:</td>
						<td valign="top" nowrap>
                    	  <input name="linknewsection" type="text" id="linknewsection" value="<%=linknewsection%>" size="20" />
                  		</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>sectionid:</td>
						<td nowrap>
                    	  <input name="sectionid" type="text" id="sectionid" value="<%= sectionid %>" size="20" />
				  		</td>
					  </tr>
					  <tr>
						<td align="right" nowrap>sectionsfilter:</td>
						<td nowrap>
						  <input name="sectionsfilter" type="text" value="<%= sectionsfilter %>" size="20" />
						</td>
					  </tr>
					  <tr>
						<td align="right" nowrap>linksfilter:</td>
						<td nowrap>
						  <input name="linksfilter" type="text" id="linksfilter" value="<%= linksfilter %>" size="20" />
						</td>
					  </tr>
					  <tr>
                  		<td align="right" nowrap>folder:</td>
						<td nowrap>
                    	  <input name="folder" type="text" id="folder" value="<%= folder %>" size="20" />
      					</td>
					  </tr>
					  <tr>
                  		<td align="right" nowrap>nexturl:</td>
						<td nowrap>
                    	  <input name="nexturl" type="text" id="nexturl" value="<%= nexturl %>" size="20" />
      					</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>Current Selection:</td>
						<td nowrap>
                    	  <input name="pageid" type="text" id="pageid" value="<%= pageid %>" size="5" />
      (pageid&nbsp;argument)</td>
					  </tr>
					  <tr>
                  		<td align="right" nowrap>Display Level:</td>
						<td nowrap>
                    	  <input name="displaylevel" type="text" id="displaylevel" value="<%=displaylevel%>" size="5" />
      (level &nbsp;argument)<sub>8</sub></td>
					  </tr>
					  <tr>
                  		<td align="right" nowrap>Top Level:</td>
						<td nowrap>
                    	  <input name="toplevel" type="text" id="toplevel" value="<%=toplevel%>" size="5" />
for new buttons<sub>9</sub>
      					</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>Bottom Level:</td>
						<td nowrap>
                    	  <input name="bottomlevel" type="text" id="bottomlevel" value="<%=bottomlevel%>" size="5" />
						  for new buttons<sub>9</sub>
      					</td>
					  </tr>
                	  <tr>
                  		<td align="right" nowrap>Sort Field:</td>
						<td nowrap>
                    	  <input name="sortfield" type="text" id="sortfield" value="<%=sortfield%>" size="20" />
      					</td>
					  </tr>
                	  <tr>
                        <td align="right" nowrap>RZ.set:</td>
                        <td nowrap>
                          <input name="setfield" type="text" id="setfield" value="<%=rz.setparameter%>" size="20" />
                        </td>
              	      </tr>
              		</table>
				  </td>
				</tr>
        	  </table>
			</td>
		  </tr>
    	  <tr valign="top" id="notes" style="display:none">
      		<td>
        	  <table width="100%" border="0" cellpadding="0" cellspacing="0" class="normal">
          		<tr>
            	  <td colspan="2">
              		<hr noshade/>
            	  </td>
				</tr>
          		<tr>
            	  <td colspan="2"><em>&nbsp;&nbsp;</em><strong>Note:</strong><em><strong>&nbsp;The above diagnostic options and information only appear when the currently logged user is: </strong></em><strong>root, administrator or developer</strong></td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(1)&nbsp;</td>
				  <td>clicking on <strong>recordid</strong>  opens page referenced by the link in a new window.</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
          		<tr>
            	  <td width="10" align="center" valign="top">&nbsp;&nbsp;(2)&nbsp;</td>
				  <td><strong>sort key</strong> is calculated by using the sequence number of each item concatenated with the parent sequence number all the way up the family tree.</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
          		<tr>
            	  <td width="10" align="center" valign="top">&nbsp;&nbsp;(3)&nbsp;</td>
				  <td>
              		<p><strong>style</strong>  is based on the selected item or the relationship to the selected item.&nbsp; Current values are:</p>
					<ul>
                	  <li><span class="menuDisplay">menuDisplay</span>: all items at the current <em><strong>display level</strong></em><sub>7</sub> selected regardless of current selection</li>
					  <li><span class="menuHidden">menuHidden</span>: item outside current selection hierarchy</li>
					  <li><span class="menuOrphan">menuOrphan</span>: parent or grandparent does not exist</li>
					  <li><span class="menuSelectedChild">menuSelectedChild</span>: item is child of current selection</li>
					  <li><span class="menuSelectedItem">menuSelectedItem</span>: <strong><em>currently selected item</em></strong></li>
					  <li> <span class="menuSelectedLevel">menuSelectedLevel</span>: item is at same level as current selection and has same parent</li>
					  <li> <span class="menuSelectedParent">menuSelectedParent</span>: parent or grandparent of selected item</li>
					  <li><span class="menuSelectedUncle">menuSelectedUncle</span>: item has same parent as selection and at same level</li>
					</ul>
					<p>Since all styles start with &quot;menu&quot;, only the subsequent text is shown (e.g. menuDisplay is shown as Display).</p>
				  </td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(4)&nbsp;</td>
				  <td><strong>hidden items</strong> Displays  links at all levels; even those  not normally displayed because their parent is not selected and their level is greater than the display level.</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(5)&nbsp;</td>
				  <td><strong>show all  items</strong> Displays orphans (parent or grandparent  longer  exists);&nbsp;displays links marked as deleted; displays  urltemplate link at top level that is redundant because the template referenced by the  urltemplate is  in the list at the same level. </td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(6)&nbsp;</td>
				  <td><strong>link repair</strong> Used by link manager to repair certian link properties.&nbsp; If linktosectionid is zero and linksectionid is not, set tosectionid=sectionid; If set defined level/sectionid/tosectionid values use on edit rather than existing record values.</td>
				</tr>
				<tr>
                  <td align="center" valign="top">&nbsp;</td>
                  <td>&nbsp;</td>
			    </tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(7)&nbsp;</td>
				  <td><strong>auto update</strong> Used to update or repair data by automatically calling link manager for every menu item starting with NEXT link displayed following the currently selected item down to the last item.&nbsp; The autocontinue property is set before calling the link manager so it automatically continues immediately after loading.&nbsp; The nexturl argument is not passed when auto update is specified.&nbsp; The auto mode is cleared after the last item is updated.&nbsp; To start the auto update, select the menu item before the one to auto update, check the auto update checkbox and then click on Redisplay.&nbsp; To speed up the process, disable publishing.&nbsp; NOTE: Must click on Redisplay button to take effect. </td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
				<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(8)&nbsp;</td>
				  <td><strong>display  level</strong> is specified by the level parameter  which defines at which level all items are displayed.</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;</td>
				  <td>&nbsp;</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top">&nbsp;&nbsp;(9)&nbsp;</td>
				  <td><strong>top level / bottom level</strong> if specified new pages can only be added at or below the top level and at or above the bottom level.</td>
				</tr>
          		<tr>
            	  <td align="center" valign="top"></td>
				  <td height="5"></td>
				</tr>
        	  </table>
			</td>
		  </tr>
  		</table>
	  </form>
	</td>
  </tr>
</table>
<script language="JavaScript" type="text/JavaScript">
	checkBoxes('set')
</script>
<% } %>


<script language="JavaScript" type="text/JavaScript">
	RZsetfieldvalue(document.topForm.sectionid,'<%=sectionid%>')

	//----- must be after java list
	<%if (selectedParentHash.equals("")) selectedParentHash=pageid; %>

	//----- Return from new, reset pageid and reload
	//		TODO: should be done with jsp code
	var newid = '';
	var pos = location.hash.indexOf('_rz');
	if (pos != -1 && location.hash.indexOf('<%=linkmodule%>') == 1 )
		newid = RZsubstring(location.hash,pos+3);

	//----- If returning from new, reload page selecting the new pageid
	if (newid != '' && !isNaN(newid) && '<%=pageid%>' != newid)
	{
		reloadPage( newid );
	}

	//----- If auto mode enabled
	else if (<%=auto%>)
	{
		//----- Find recordid of item prior to one being deleted
		var isScript = false;
		var isFound = false;
		for (i in editbuttons)
		{
			if (isScript)
			{
				eval( editbuttons[i] );	//execute this edit button
				isFound = true;
				break;
			}
			if (i == '<%=pageid%>') isScript = true; //run next button
		}
		if (!isFound) clearAuto();		//end of autorun
		//RZ.statuswin = window.open('','Auto Update Status','left=1,top=1,width=300,height=100');
	}

	//----- If more than 20 items, reposition to parent current selection parent
	else if (<%=displayedItems > 20%>)
	{
		location.hash = "<%=selectedParentHash%>";
	}
	else if (document.all)
		location.hash = '';		//clear hash for ie
</script>
<pre>
<%= rz.tracestack %>
<%= debugMsg %>
</pre>
</body>
</html>