Subversion Repositories DevTools

<%
'===================================================================
'                                               Main Menu
'===================================================================
%>
<%
'------------ VARIABLE DEFINITION -------------
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------
'----------------------------------------------
%>
<%
'------------ RUN BEFORE CONTROL RENDER -------
'----------------------------------------------
%>
<script language="JavaScript1.2">
    var linkset=new Array()
    // ---- Popup menu definition ----
    linkset[0]=''
    linkset[0]+='<div class="menuitems"><a target="_blank" href="<%=ACCESS_MANAGER_URL%>">Access&nbsp;Manager</a></div>'
    linkset[0]+='<div class="menuitems"><a target="_blank" href="<%=DEPLOYMENT_MANAGER_URL%>">Deployment&nbsp;Manager</a></div>'
    linkset[0]+='<div class="menuitems"><a target="_blank" href="<%=PRODUCTION_MANAGER_URL%>">Production&nbsp;Manager</a></div>'
    linkset[0]+='<div class="menuitems"><a target="_blank" href="<%=RELEASE_MANAGER_URL%>">Release&nbsp;Manager</a></div>'

    linkset[1]=''
    linkset[1]+='<div class="menuitems"><a href="Wikiasp/wiki.asp" target="DMWiki">Release&nbsp;Notes</a></div>'
    <%If (IsEmpty(Application("LiveSystem"))) Then%>
    linkset[1]+='<div class="menuitems"><a href="Wikiasp/wiki.asp?db=ImplementationNotes" target="DMWiki">Development&nbsp;Notes</a></div>'
    <%End If%>
    linkset[1]+='<div class="menuitems"><a href="_about.asp" target="DMAbout">About</a></div>'

    linkset[2]=''
    <%If Not objAccessControl.UserLogedIn Then%>
       linkset[2]+='<div class="menuitems"><a href="Login.asp?rfile=<%=scriptName & QSTR_FullQuery%>">Login</a></div>'
    <%Else%>
       linkset[2]+='<div class="menuitemDisable">Login</div>'
    <%End If%>

    <%If objAccessControl.UserLogedIn Then%>
       linkset[2]+='<div class="menuitems"><a href="_Logout.asp">Logout</a></div>'
    <%Else%>
       linkset[2]+='<div class="menuitemDisable">Logout</div>'
    <%End If%>
    linkset[2]+='<div class="menuitems"><a href="members_my_details.asp">My&nbsp;Details</a></div>'
    linkset[2]+='<div class="menuitems"><a href="members_my_roles.asp">My&nbsp;Roles</a></div>'

    linkset[3]=''
    linkset[3]+='<div class=menuitems><a href=reports.asp>Main Page</a></div>'
    linkset[3]+='<div class=menuitems><hr></div>'
    linkset[3]+='<div class=menuitems><a href=reports.asp?group=Advanced_Search>Advanced Search</a></div>'
    linkset[3]+='<div class=menuitems><a href=diff.asp>Bom Diff</a></div>'
    linkset[3]+='<div class=menuitems><a href=diffmerge.asp>Bom Merge Manager</a></div>'
    linkset[3]+='<div class=menuitems><a href=reports.asp?repnum=11&group=Escrow>Escrow Report</a></div>'
    linkset[3]+='<div class=menuitems><a href=rep_issues.asp>Bom Issues Report</a></div>'


</script>
<script language="JavaScript1.2" src="images/popup_menu.js?ver=<%=VixVerNum%>"></script>
<link rel="stylesheet" href="images/navigation.css?ver=<%=VixVerNum%>" type="text/css">
<!-- MENU LAYERS -------------------------------------->
<div id="popmenu" class="menuskin" onMouseover="clearhidemenu();highlightmenu(event,'on')" onMouseout="highlightmenu(event,'off');dynamichide(event)"> 
</div>
<table width="100%"  border="0" cellspacing="0" cellpadding="8">
  <tr>
    <td nowrap bgcolor="#FFFFFF" class="menu_crumbtxt">&nbsp;&nbsp;&nbsp;<%objCrumbs.PrintCrumbs%></td>
    <td align="right" nowrap bgcolor="#FFFFFF" class="body_txt">


        <%If objAccessControl.UserLogedIn Then%>
            <a class=mmItem href="members_index.asp" onMouseover="showmenu(event,linkset[2])" onMouseout="delayhidemenu()"><img src="images/i_user.gif" border="0" hspace="3"> <%=objAccessControl.FullName%></a>
        <%Else%>
            <a class=mmItem href="members_index.asp" onMouseover="showmenu(event,linkset[2])" onMouseout="delayhidemenu()">My Account</a>&nbsp;&nbsp;
        <%End If%>
        &nbsp;&nbsp;|&nbsp;&nbsp;
        <a class=mmItem href="" onMouseover="showmenu(event,linkset[0])" onMouseout="delayhidemenu()">Suite</a>&nbsp;&nbsp;|&nbsp;&nbsp;
        <a class=mmItem href="reports.asp" onMouseover="showmenu(event,linkset[3])" onMouseout="delayhidemenu()">Tools</a>&nbsp;&nbsp;|&nbsp;&nbsp;
                <%If Request("bom_id") <> "" Then%>
                        <a href="Downloads.asp?<%=objPMod.ComposeURLWith("bom_id")%>" class="menu_link" title="Download items from the BOM">Downloads</a>&nbsp;&nbsp;|&nbsp;&nbsp;
                <%End If%>
                <%If Request("bom_id") <> "" Then%>
                    <a href="Release.asp?<%=objPMod.ComposeURLWith("bom_id")%>" class="menu_link">Release</a>&nbsp;&nbsp;|&nbsp;&nbsp;
                <%End If%>
                <a href="AdminDefault.asp" class="menu_link" title="Project Configuration">Configuration</a>&nbsp;&nbsp;|&nbsp;&nbsp;
        <a class=mmItem href="" onMouseover="showmenu(event,linkset[1])" onMouseout="delayhidemenu()">Help</a>&nbsp;&nbsp;&nbsp;
                <%If Request("bom_id") <> 0 Then%>
                    |&nbsp;&nbsp;<a href="XMLBomGen.asp?bom_id=<%=dbPARbom_id%>" class="menu_link" title="Download BOM in XML format."><img src="icons/b_xml.gif" width="36" height="14" hspace="2" border="0" align="absmiddle"></a>&nbsp;&nbsp;&nbsp;
                <%End If%>
        </td>
  </tr>
</table>
<%
'------------ RUN AFTER CONTROL RENDER --------
'----------------------------------------------
%>