<% if (not IsEmpty(Eval("objAccessControl"))) Then If (objAccessControl.UserLogedIn) Then %> <% If IsEmpty(Eval("MenuHeaderDefined")) Then %> Logout from <%=objAccessControl.UserName%> disabled <% Else %> Logout from <%=objAccessControl.UserName%> <%End If%> <%End If%> <%End If%> Home Releases Packages Files
<%' Highlight Development Systems If ( NOT IsEmpty(Application("TestBannerStyle"))) Then Dim DevStyle, DevExtraText, DevTitle DevStyle = Application("TestBannerStyle") DevTitle = Application("TestBanner") DevExtraText = "" If ( NOT IsEmpty(Application("LiveSystem"))) Then DevExtraText = " Live Database" End If %>
<%=DevTitle%>:<%=request.servervariables("server_name")%> Database:<%=OraDatabase.DatabaseName%><%=DevExtraText%>
<%End If%> <% if not IsEmpty(Eval("MenuHeaderDefined")) Then If (Request("rtag_id") <> "") OR (Request("proj_id") <> "") OR (Request("pv_id") <> "") Then %> <% End If %> <% End If %>
<% if not IsEmpty(Eval("MenuHeaderDefined")) Then %> <%Call Print_TopRight_Menu_ROW1 ()%> <% End If %>
<% If (Request("rtag_id") <> "") OR (Request("proj_id") <> "") Then Call Print_TopLeft_Menu ElseIf Request("pv_id") <> "" Then Call Print_Package_TopLeft_Menu End If%> <% If (Request("rtag_id") <> "") OR (Request("proj_id") <> "") Then Call Print_TopRight_Menu_ROW2 End If %>