Subversion Repositories DevTools

Rev

Rev 7395 | Rev 7493 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7395 Rev 7468
Line 304... Line 304...
304 
linkset[2]+='<div class="menuitems"><a href="form_edit_release_licencing.asp?rtag_id=<%=parRtag_id%>">Edit Licencing</a></div>'
 304 
linkset[2]+='<div class="menuitems"><a href="form_edit_release_licencing.asp?rtag_id=<%=parRtag_id%>">Edit Licencing</a></div>'
305 
<%Else%>
 305 
<%Else%>
306 
linkset[2]+='<div class="menuitemDisable">Edit Licencing</div>'
 306 
linkset[2]+='<div class="menuitemDisable">Edit Licencing</div>'
307 
<%End If%>
 307 
<%End If%>
308 
linkset[2]+='<div class="menuitems"><a href="form_view_deployable_state.asp?rtag_id=<%=parRtag_id%>">View Deployable Flags</a></div>'
 308 
linkset[2]+='<div class="menuitems"><a href="form_view_deployable_state.asp?rtag_id=<%=parRtag_id%>">View Deployable Flags</a></div>'
309 
linkset[2]+='<div class="menuitems"><a href="form_view_s3Sync_state.asp?rtag_id=<%=parRtag_id%>">View S3Sync Flags</a></div>'
 309 
linkset[2]+='<div class="menuitems"><a href="form_view_s3Manifest_state.asp?rtag_id=<%=parRtag_id%>">View S3 Manifest</a></div>'
310 
linkset[2]+='<div class="menuitems"><a href="form_view_package_owners.asp?rtag_id=<%=parRtag_id%>">View Package Owners</a></div>'
 310 
linkset[2]+='<div class="menuitems"><a href="form_view_package_owners.asp?rtag_id=<%=parRtag_id%>">View Package Owners</a></div>'
311 
<%If releaseIsWritable(ReleaseMode) Then %>
 311 
<%If releaseIsWritable(ReleaseMode) Then %>
312 
linkset[2]+='<div class="menuitems menufake"><span onClick="MM_openVixIFrame(\'wAddDaemonInstruction.asp?ToRtag_id=<%=parRtag_id%>&<%=objPMod.ComposeURL()%>\',\'Add Daemon Instruction\')">Add&nbsp;Daemon&nbsp;Instruction</span></div>'
 312 
linkset[2]+='<div class="menuitems menufake"><span onClick="MM_openVixIFrame(\'wAddDaemonInstruction.asp?ToRtag_id=<%=parRtag_id%>&<%=objPMod.ComposeURL()%>\',\'Add Daemon Instruction\')">Add&nbsp;Daemon&nbsp;Instruction</span></div>'
313 
<%Else%>
 313 
<%Else%>
314 
linkset[2]+='<div class="menuitemDisable">Add Daemon Instruction</div>'
 314 
linkset[2]+='<div class="menuitemDisable">Add Daemon Instruction</div>'
Line 390... Line 390...
390 
<%End If%>
 390 
<%End If%>
391 
linkset[9]+='<div class="menuitems"><a href="help/index.asp" target="_blank">Internal&nbsp;Help(old)</a></div>'
 391 
linkset[9]+='<div class="menuitems"><a href="help/index.asp" target="_blank">Internal&nbsp;Help(old)</a></div>'
392 
linkset[9]+='<div class="menuitems"><a href="_about.asp" target="_blank">About</a></div>'
 392 
linkset[9]+='<div class="menuitems"><a href="_about.asp" target="_blank">About</a></div>'
393 
 
 393 
 
394 
linkset[10]=''
 394 
linkset[10]=''
395 
linkset[10]+='<div class="menuitems"><a href="form_view_s3Sync_state.asp?rtag_id=<%=parRtag_id%>">View S3Sync Flags</a></div>'
 395 
linkset[10]+='<div class="menuitems"><a href="form_view_s3Manifest_state.asp?rtag_id=<%=parRtag_id%>">View S3 Manifest</a></div>'
396 
 
 396 
 
397 
 
 397 
 
398 
</script>
 398 
</script>
399 
<%
 399 
<%
400 
Sub Print_TopRight_Menu_ROW1
 400 
Sub Print_TopRight_Menu_ROW1
Line 431... Line 431...
431 
 
 431 
 
432 
Sub Print_TopRight_Menu_ROW2
 432 
Sub Print_TopRight_Menu_ROW2
433 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
 433 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
434 
   Response.write "  <tr> "
 434 
   Response.write "  <tr> "
435 
   If QStrPar("rtag_id") <> "" Then
 435 
   If QStrPar("rtag_id") <> "" Then
436 
      Dim s3Content : s3Content = RenderS3SyncStateString(releaseInfoHash("rtag_id"),releaseInfoHash("s3Sync"), releaseInfoHash("official")," S3 Sync")
 436 
      Dim s3Content : s3Content = RenderS3ManifestStateString(releaseInfoHash("rtag_id"),releaseInfoHash("S3MANIFEST"), releaseInfoHash("official")," S3 Manifest")
437 
      Dim lxrContent : lxrContent = RenderLxrStateString(releaseInfoHash("rtag_id"),releaseInfoHash("lxr"),releaseInfoHash("lxrServer"), releaseInfoHash("official")," LXR")
 437 
      Dim lxrContent : lxrContent = RenderLxrStateString(releaseInfoHash("rtag_id"),releaseInfoHash("lxr"),releaseInfoHash("lxrServer"), releaseInfoHash("official")," LXR")
438 
      If s3Content <> "" Then
 438 
      If s3Content <> "" Then
439 
        Response.write "   <td class='mmEntry'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[10])"" onMouseout=""delayhidemenu()"">"& s3Content &"</a></td>"
 439 
        Response.write "   <td class='mmEntry'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[10])"" onMouseout=""delayhidemenu()"">"& s3Content &"</a></td>"
440 
        Response.write "   <td align=middle>|</td>"
 440 
        Response.write "   <td align=middle>|</td>"
441 
      End If
 441 
      End If
Line 478... Line 478...
478 
   '-- Append Mode indication
 478 
   '-- Append Mode indication
479 
   ModeSTR = ""
 479 
   ModeSTR = ""
480 
   If ReleaseMode = enumDB_RELEASE_IN_RESTRICTIVE_MODE Then
 480 
   If ReleaseMode = enumDB_RELEASE_IN_RESTRICTIVE_MODE Then
481 
      ModeSTR = "&nbsp;[Restrictive Mode]"
 481 
      ModeSTR = "&nbsp;[Restrictive Mode]"
482 
 
 482 
 
- 
 
 483 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_SNAPSHOT_MODE Then
- 
 
 484 
      ModeSTR = "<img src='images/snapshot.png'height='10' border='0' hspace='2' >&nbsp;[SnapShot]"
- 
 
 485 
 
483 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CCB_MODE Then
 486 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CCB_MODE Then
484 
      ModeSTR = "&nbsp;[CCB Mode!]"
 487 
      ModeSTR = "&nbsp;[CCB Mode!]"
485 
 
 488 
 
486 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE Then
 489 
   ElseIf ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE Then
487 
      ModeSTR = "<img src='images/i_locked.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Closed Mode]"
 490 
      ModeSTR = "<img src='images/i_locked.gif' width='7' height='10' border='0' hspace='2' >&nbsp;[Closed Mode]"