Subversion Repositories DevTools

Rev

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

Rev 6879 Rev 7063
Line 270... Line 270...
270 
                <!--#include file="messages/_msg_inline.asp"-->
 270 
                <!--#include file="messages/_msg_inline.asp"-->
271 
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 271 
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
272 
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
 272 
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
273 
                   <%
 273 
                   <%
274 
                   Dim bInactiveMachine : bInactiveMachine = false
 274 
                   Dim bInactiveMachine : bInactiveMachine = false
275 
                   Dim indefinitelyPaused : indefinitelyPaused = Indefinitely_Paused()
 - 
 
276 
                   ' Insert a warning into the page if the build daemons are indefintely paused.
 - 
 
277 
                   If indefinitelyPaused Then %>
 - 
 
278 
                      <tr>
 - 
 
279 
                         <span class='err_alert'>
 - 
 
280 
                            <font size='2'><b>WARNING: Build Daemons are all stopped - please contact an administrator</b></font>
 - 
 
281 
                         </span>
 - 
 
282 
                      </tr>
 - 
 
283 
                   <%End If
 - 
 
284 
                   %>
 275 
                   %>
285 
                   <td width="9%" valign="top"></td>
 276 
                   <td width="9%" valign="top"></td>
286 
                   <thead>
 277 
                   <thead>
287 
                      <th>Daemon Host</th>
 278 
                      <th>Daemon Host</th>
288 
                      <th>Machine Type</th>
 279 
                      <th>Machine Type</th>
Line 356... Line 347...
356 
                      %>
 347 
                      %>
357 
                      <tr class=border>
 348 
                      <tr class=border>
358 
                         <td><%=rsQry("display_name")%></td>
 349 
                         <td><%=rsQry("display_name")%></td>
359 
                         <td><%=rsQry("gbe_value")%></td>
 350 
                         <td><%=rsQry("gbe_value")%></td>
360 
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
 351 
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
361 
                         <td><%=Get_Run_Level(currentRunLevel, indefinitelyPaused, daemonState, bActive)%></td>
 352 
                         <td><%=Get_Run_Level(currentRunLevel, IndefPause, daemonState, bActive)%></td>
362 
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
 353 
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
363 
                         <td><%=estDuration%></td>
 354 
                         <td><%=estDuration%></td>
364 
                         <td><%=lastChange%></td>
 355 
                         <td><%=lastChange%></td>
365 
                         <td>
 356 
                         <td>
366 
                            <%
 357 
                            <%
367 
                            If NOT indefinitelyPaused  Then
 358 
                            If NOT IndefPause  Then
368 
                                If bActive = "U" Then
 359 
                                If bActive = "U" Then
369 
                                ElseIf bActive = "N" Then
 360 
                                ElseIf bActive = "N" Then
370 
                                    Call Action_Buttons ( "Daemon Unavailable" )
 361 
                                    Call Action_Buttons ( "Daemon Unavailable" )
371 
                                ElseIf daemonState = 0 Then
 362 
                                ElseIf daemonState = 0 Then
372 
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
 363 
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
Line 395... Line 386...
395 
                        </a>
 386 
                        </a>
396 
                     <%End If%>
 387 
                     <%End If%>
397 
                     </td>
 388 
                     </td>
398 
                     <td>
 389 
                     <td>
399 
                     <%
 390 
                     <%
400 
                       If (rsQry.RecordCount > 0) AND NOT indefinitelyPaused Then
 391 
                       If (rsQry.RecordCount > 0) AND NOT IndefPause Then
401 
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
 392 
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
402 
                       Else
 393 
                       Else
403 
                         %>&nbsp<%
 394 
                         %>&nbsp<%
404 
                       End If
 395 
                       End If
405 
                     %>
 396 
                     %>