Subversion Repositories DevTools

Rev

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

Rev 6877 Rev 7063
Line 63... Line 63...
63
                <!--#include file="messages/_msg_inline.asp"-->
63
                <!--#include file="messages/_msg_inline.asp"-->
64
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
64
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
65
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
65
                <table width="100%" border="0" cellspacing="2" cellpadding="0">
66
                   <%
66
                   <%
67
                   Dim bInactiveMachine : bInactiveMachine = false
67
                   Dim bInactiveMachine : bInactiveMachine = false
68
                   Dim indefinitelyPaused : indefinitelyPaused = Indefinitely_Paused()
-
 
69
                   ' Insert a warning into the page if the build daemons are indefintely paused.
-
 
70
                   If indefinitelyPaused Then %>
-
 
71
                      <tr>
-
 
72
                         <span class='err_alert'>
-
 
73
                            <font size='2'><b>WARNING: Build Daemons are all stopped - please contact an administrator</b></font>
-
 
74
                         </span>
-
 
75
                      </tr>
-
 
76
                   <%End If
-
 
77
                   %>
68
                   %>
78
                   <td width="9%" valign="top"></td>
69
                   <td width="9%" valign="top"></td>
79
                   <thead>
70
                   <thead>
80
                      <th>Daemon Host</th>
71
                      <th>Daemon Host</th>
81
                      <th>Machine Type</th>
72
                      <th>Machine Type</th>
Line 150... Line 141...
150
                      %>
141
                      %>
151
                      <tr class=border>
142
                      <tr class=border>
152
                         <td><%=rsQry("display_name")%></td>
143
                         <td><%=rsQry("display_name")%></td>
153
                         <td><%=rsQry("gbe_value")%></td>
144
                         <td><%=rsQry("gbe_value")%></td>
154
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
145
                         <td><%=Get_Daemon_Mode(daemonMode)%></td>
155
                         <td><%=Get_Run_Level(currentRunLevel, indefinitelyPaused, daemonState, bActive)%></td>
146
                         <td><%=Get_Run_Level(currentRunLevel, IndefPause, daemonState, bActive)%></td>
156
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
147
                         <td><%=Get_Package_Name(pkgName,parRtagId,pkgPvid, daemonState, bActive)%></td>
157
                         <td><%=estDuration%></td>
148
                         <td><%=estDuration%></td>
158
                         <td><%=lastChange%></td>
149
                         <td><%=lastChange%></td>
159
                         <td>
150
                         <td>
160
                            <%
151
                            <%
161
                            If NOT indefinitelyPaused  Then
152
                            If NOT IndefPause  Then
162
                                If bActive = "U" Then
153
                                If bActive = "U" Then
163
                                ElseIf bActive = "N" Then
154
                                ElseIf bActive = "N" Then
164
                                    Call Action_Buttons ( "Daemon Unavailable" )
155
                                    Call Action_Buttons ( "Daemon Unavailable" )
165
                                ElseIf daemonState = 0 Then
156
                                ElseIf daemonState = 0 Then
166
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
157
                                    Call Action_Buttons_State ( "Daemon Pause", canControl )
Line 189... Line 180...
189
                        </a>
180
                        </a>
190
                     <%End If%>
181
                     <%End If%>
191
                     </td>
182
                     </td>
192
                     <td>
183
                     <td>
193
                     <%
184
                     <%
194
                       If (rsQry.RecordCount > 0) AND NOT indefinitelyPaused Then
185
                       If (rsQry.RecordCount > 0) AND NOT IndefPause Then
195
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
186
                           Call Action_Buttons_State ( "Daemon Control All", objAccessControl.UserLogedIn AND canControl )
196
                       Else
187
                       Else
197
                         %>&nbsp<%
188
                         %>&nbsp<%
198
                       End If
189
                       End If
199
                     %>
190
                     %>