| Line 186... |
Line 186... |
| 186 |
<!-- TIPS -->
|
186 |
<!-- TIPS -->
|
| 187 |
<script type="text/javascript" src="scripts/json2.js"></script>
|
187 |
<script type="text/javascript" src="scripts/json2.js"></script>
|
| 188 |
<script language="JavaScript" src="images/tipster.js"></script>
|
188 |
<script language="JavaScript" src="images/tipster.js"></script>
|
| 189 |
<script language="JavaScript" src="images/_help_tips.js"></script>
|
189 |
<script language="JavaScript" src="images/_help_tips.js"></script>
|
| 190 |
<script language="JavaScript" type="text/JavaScript">
|
190 |
<script language="JavaScript" type="text/JavaScript">
|
| - |
|
191 |
formTips.tips.h_buildtime = stdTip(300, 'Est. Build Duration', 'Estimated build duration in seconds. Based simply on the last build duration for this package');
|
| - |
|
192 |
|
| 191 |
formTips.tips.h_lastchange = stdTip(300, 'Last Change', 'This is an indication of the time since the daemon interogated the database.' +
|
193 |
formTips.tips.h_lastchange = stdTip(300, 'Last Change', 'This is an indication of the time since the daemon interogated the database.' +
|
| 192 |
'<p>Short times will be shown as seconds. Longer times will be shown as a time within ' +
|
194 |
'<p>Short times will be shown as seconds. Longer times will be shown as a time within ' +
|
| 193 |
'the last 24 hours. Longer times will be shown as a date.'
|
195 |
'the last 24 hours. Longer times will be shown as a date.'
|
| 194 |
);
|
196 |
);
|
| 195 |
</script>
|
197 |
</script>
|
| Line 457... |
Line 459... |
| 457 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Daemon Host</td>
|
459 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Daemon Host</td>
|
| 458 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Machine Type</td>
|
460 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Machine Type</td>
|
| 459 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Mode</td>
|
461 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Mode</td>
|
| 460 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Run Level</td>
|
462 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Run Level</td>
|
| 461 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Current Package</td>
|
463 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Current Package</td>
|
| - |
|
464 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Est Duration<%=Quick_Help("h_buildtime")%></td>
|
| 462 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Last Change<%=Quick_Help("h_lastchange")%></td>
|
465 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Last Change<%=Quick_Help("h_lastchange")%></td>
|
| 463 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Control State</td>
|
466 |
<td valign="top" nowrap background="images/bg_table_col.gif" class="body_col">Control State</td>
|
| 464 |
</tr>
|
467 |
</tr>
|
| 465 |
<%
|
468 |
<%
|
| 466 |
' Get the number of release configurations for this RTAG_ID, and iterate through them
|
469 |
' Get the number of release configurations for this RTAG_ID, and iterate through them
|
| Line 476... |
Line 479... |
| 476 |
Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
|
479 |
Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
|
| 477 |
rcon_id = rsQry("rcon_id")
|
480 |
rcon_id = rsQry("rcon_id")
|
| 478 |
|
481 |
|
| 479 |
Dim pkgName
|
482 |
Dim pkgName
|
| 480 |
Dim pkgPvid
|
483 |
Dim pkgPvid
|
| - |
|
484 |
Dim pkgBuildTime
|
| 481 |
Dim currentRunLevel
|
485 |
Dim currentRunLevel
|
| 482 |
Dim daemonState
|
486 |
Dim daemonState
|
| 483 |
Dim delta
|
487 |
Dim delta
|
| 484 |
Dim pkgId
|
488 |
Dim pkgId
|
| 485 |
Dim bActive : bActive = rsQry("active")
|
489 |
Dim bActive : bActive = rsQry("active")
|
| Line 496... |
Line 500... |
| 496 |
|
500 |
|
| 497 |
currentRunLevel = -1
|
501 |
currentRunLevel = -1
|
| 498 |
pkgId = Null
|
502 |
pkgId = Null
|
| 499 |
pkgName = NULL
|
503 |
pkgName = NULL
|
| 500 |
pkgPvid = NULL
|
504 |
pkgPvid = NULL
|
| - |
|
505 |
pkgBuildTime = NULL
|
| 501 |
daemonState = 0
|
506 |
daemonState = 0
|
| 502 |
delta = NULL
|
507 |
delta = NULL
|
| 503 |
|
508 |
|
| 504 |
If (rsQry2.RecordCount > 0) Then
|
509 |
If (rsQry2.RecordCount > 0) Then
|
| 505 |
' Get the run level from the run_level table
|
510 |
' Get the run level from the run_level table
|
| Line 516... |
Line 521... |
| 516 |
|
521 |
|
| 517 |
' If we got an entry from the run_level table, try and use the pkg_id it contains, to obtain a
|
522 |
' If we got an entry from the run_level table, try and use the pkg_id it contains, to obtain a
|
| 518 |
' package name from the packages table
|
523 |
' package name from the packages table
|
| 519 |
Dim rsQry3
|
524 |
Dim rsQry3
|
| 520 |
If NOT IsNull(pkgId) Then
|
525 |
If NOT IsNull(pkgId) Then
|
| 521 |
query_string = " select pkg_name,rl.current_pv_id from run_level rl, packages pk"&_
|
526 |
query_string = " select pkg_name,rl.current_pv_id, pv.build_time from run_level rl, packages pk, package_versions pv"&_
|
| 522 |
" where rl.rcon_id = "& rcon_id &_
|
527 |
" where rl.rcon_id = "& rcon_id &_
|
| 523 |
" and rl.current_pkg_id_being_built = pk.pkg_id"
|
528 |
" and rl.current_pkg_id_being_built = pk.pkg_id" &_
|
| - |
|
529 |
" and rl.current_pv_id = pv.pv_id"
|
| 524 |
|
530 |
|
| 525 |
Set rsQry3 = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
|
531 |
Set rsQry3 = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
|
| 526 |
If (rsQry3.RecordCount > 0) Then
|
532 |
If (rsQry3.RecordCount > 0) Then
|
| 527 |
pkgName = rsQry3("pkg_name")
|
533 |
pkgName = rsQry3("pkg_name")
|
| 528 |
pkgPvid = rsQry3("current_pv_id")
|
534 |
pkgPvid = rsQry3("current_pv_id")
|
| - |
|
535 |
pkgBuildTime = rsQry3("build_time")
|
| 529 |
End If
|
536 |
End If
|
| 530 |
rsQry3.Close()
|
537 |
rsQry3.Close()
|
| 531 |
Set rsQry3 = nothing
|
538 |
Set rsQry3 = nothing
|
| 532 |
End If
|
539 |
End If
|
| 533 |
|
540 |
|
| 534 |
' --- Now render HTML for this release configuration ---
|
541 |
' --- Now render HTML for this release configuration ---
|
| 535 |
%>
|
542 |
%>
|
| 536 |
<tr>
|
543 |
<tr>
|
| 537 |
<td colspan="7" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
|
544 |
<td colspan="8" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
|
| 538 |
</tr>
|
545 |
</tr>
|
| 539 |
<tr>
|
546 |
<tr>
|
| 540 |
<td nowrap class="body_rowg"><%=rsQry("display_name")%></td>
|
547 |
<td nowrap class="body_rowg"><%=rsQry("display_name")%></td>
|
| 541 |
<td nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
|
548 |
<td nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
|
| 542 |
<td nowrap class="body_rowg"><%=Get_Daemon_Mode(rsQry("daemon_mode"))%></td>
|
549 |
<td nowrap class="body_rowg"><%=Get_Daemon_Mode(rsQry("daemon_mode"))%></td>
|
| 543 |
<td nowrap class="body_rowg"><%=Get_Run_Level(currentRunLevel, indefinitelyPaused, daemonState, bActive)%></td>
|
550 |
<td nowrap class="body_rowg"><%=Get_Run_Level(currentRunLevel, indefinitelyPaused, daemonState, bActive)%></td>
|
| 544 |
<td nowrap class="body_rowg"><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, bActive)%></td>
|
551 |
<td nowrap class="body_rowg"><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, bActive)%></td>
|
| - |
|
552 |
<td nowrap class="body_rowg"><%=IIF(rsQry("daemon_mode") = "M", pkgBuildTime, "")%></td>
|
| 545 |
<td nowrap class="body_rowg"><%=PrettyDelta(delta, daemonState,pkgName )%></td>
|
553 |
<td nowrap class="body_rowg"><%=PrettyDelta(delta, daemonState,pkgName )%></td>
|
| 546 |
<td nowrap class="body_rowg">
|
554 |
<td nowrap class="body_rowg">
|
| 547 |
<%
|
555 |
<%
|
| 548 |
If (rsQry2.RecordCount > 0) AND NOT indefinitelyPaused Then
|
556 |
If (rsQry2.RecordCount > 0) AND NOT indefinitelyPaused Then
|
| 549 |
If canActionControlInProject("BuildControl") Then
|
557 |
If canActionControlInProject("BuildControl") Then
|
| Line 584... |
Line 592... |
| 584 |
Set rsQry2 = nothing
|
592 |
Set rsQry2 = nothing
|
| 585 |
rsQry.MoveNext
|
593 |
rsQry.MoveNext
|
| 586 |
Loop
|
594 |
Loop
|
| 587 |
%>
|
595 |
%>
|
| 588 |
<tr>
|
596 |
<tr>
|
| 589 |
<td nowrap background="images/bg_table_col.gif" class="body_col" colspan=6>
|
597 |
<td nowrap background="images/bg_table_col.gif" class="body_col" colspan=7>
|
| 590 |
<%If CheckConfigErrors(parRtagId) OR bInactiveMachine Then%><span class="err_alert"> Daemon configuration errors detected</span>
|
598 |
<%If CheckConfigErrors(parRtagId) OR bInactiveMachine Then%><span class="err_alert"> Daemon configuration errors detected</span>
|
| 591 |
<a class="txt_linked" href="release_config.asp?rtag_id=<%=parRtagId%>">
|
599 |
<a class="txt_linked" href="release_config.asp?rtag_id=<%=parRtagId%>">
|
| 592 |
<img src="images/i_link.gif" hspace="2" border="0" align="absmiddle" title="Goto Configuration">
|
600 |
<img src="images/i_link.gif" hspace="2" border="0" align="absmiddle" title="Goto Configuration">
|
| 593 |
</a>
|
601 |
</a>
|
| 594 |
<%End If%>
|
602 |
<%End If%>
|
| 595 |
</td>
|
603 |
</td>
|
| 596 |
<td valign="bottom" nowrap background="images/bg_table_col.gif" class="body_col">
|
604 |
<td valign="bottom" nowrap background="images/bg_table_col.gif" class="body_col">
|
| 597 |
<%
|
605 |
<%
|
| 598 |
If (rsQry.RecordCount > 0) AND NOT indefinitelyPaused Then
|
606 |
If (rsQry.RecordCount > 0) AND NOT indefinitelyPaused Then
|
| 599 |
If objAccessControl.UserLogedIn AND canActionControlInProject("BuildControl") Then
|
607 |
If objAccessControl.UserLogedIn AND canActionControlInProject("BuildControl") Then
|
| 600 |
Call Action_Buttons ( "Daemon Control All" )
|
608 |
Call Action_Buttons ( "Daemon Control All" )
|
| 601 |
Else
|
609 |
Else
|
| 602 |
Call Action_Buttons ( "Daemon Control All Disabled" )
|
610 |
Call Action_Buttons ( "Daemon Control All Disabled" )
|
| 603 |
End If
|
611 |
End If
|