Subversion Repositories DevTools

Rev

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

Rev 6183 Rev 6267
Line 287... Line 287...
287
                     <%End If%>
287
                     <%End If%>
288
                     <td valign="top">
288
                     <td valign="top">
289
                  </tr>
289
                  </tr>
290
                  <%
290
                  <%
291
 
291
 
292
                  query_string = "select rcon_id, display_name, rc.bmcon_id, daemon_mode, gbe_value, gbe_buildfilter " &_
292
                  query_string = "select rcon_id, display_name, rc.bmcon_id, daemon_mode, gbe_value, gbe_buildfilter, active " &_
293
                                 " from release_manager.release_config rc," &_
293
                                 " from release_manager.release_config rc," &_
294
                                 "      release_manager.build_machine_config bm," &_
294
                                 "      release_manager.build_machine_config bm," &_
295
                                 "      release_manager.gbe_machtype gbe" &_
295
                                 "      release_manager.gbe_machtype gbe" &_
296
                                 " where rc.rtag_id=" & parRtagId &_
296
                                 " where rc.rtag_id=" & parRtagId &_
297
                                 "      and rc.bmcon_id=bm.bmcon_id(+)" &_
297
                                 "      and rc.bmcon_id=bm.bmcon_id(+)" &_
298
                                 "      and rc.gbe_id=gbe.gbe_id" &_
298
                                 "      and rc.gbe_id=gbe.gbe_id" &_
299
                                 " order by daemon_mode, bm.display_name"
299
                                 " order by daemon_mode, bm.display_name"
300
                  Set rsQry = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
300
                  Set rsQry = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
301
                  Dim daemon_mode, daemon, cbtype
301
                  Dim daemon_mode, daemon, cbtype, bActive, bInactiveMachine, dClass
-
 
302
                  bInactiveMachine = false
302
 
303
 
303
                  cbtype = "hidden"
304
                  cbtype = "hidden"
304
                  If canActionControlInProject("BuildConfiguration") Then
305
                  If canActionControlInProject("BuildConfiguration") Then
305
                     cbtype = "checkbox"
306
                     cbtype = "checkbox"
306
                  End If
307
                  End If
Line 316... Line 317...
316
                     If rsQry("daemon_mode") = "M" Then
317
                     If rsQry("daemon_mode") = "M" Then
317
                        daemon_mode = "MASTER"
318
                        daemon_mode = "MASTER"
318
                     Else
319
                     Else
319
                        daemon_mode = "SLAVE"
320
                        daemon_mode = "SLAVE"
320
                     End If
321
                     End If
-
 
322
 
-
 
323
                    dClass = ""
-
 
324
                    If IsNull(rsQry("active"))  Then
-
 
325
                      bActive = "U"
-
 
326
                    Else
-
 
327
                      bActive = rsQry("active")
-
 
328
                      If bActive = "N" Then
-
 
329
                          bInactiveMachine = true
-
 
330
                          dClass = " err_alert strike"
-
 
331
                      End If
-
 
332
                    End If
-
 
333
 
321
                     %>
334
                     %>
322
                     <tr>
335
                     <tr>
323
                        <td colspan="5" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
336
                        <td colspan="5" background="images/bg_rep_line.gif"><img src="images/spacer.gif" width="1" height="1"></td>
324
                     </tr>
337
                     </tr>
325
                     <tr>
338
                     <tr>
326
                        <td valign="top" align="center"><input type=<%=cbtype%> name="rcon_id_list" value="<%=rsQry("rcon_id")%>"></td>
339
                        <td valign="top" align="center"><input type=<%=cbtype%> name="rcon_id_list" value="<%=rsQry("rcon_id")%>"></td>
327
                        <td valign="top"    nowrap class="body_rowg"><%=daemon%></td>
340
                        <td valign="top"    nowrap class="body_rowg<%=dClass%>"><%=daemon%></td>
328
                        <td valign="top"    nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
341
                        <td valign="top"    nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
329
                        <td valign="top"    nowrap class="body_rowg"><%=daemon_mode%></td>
342
                        <td valign="top"    nowrap class="body_rowg"><%=daemon_mode%></td>
330
                        <td valign="top"      wrap class="body_rowg"><%=rsQry("gbe_buildfilter")%></td>
343
                        <td valign="top"      wrap class="body_rowg"><%=rsQry("gbe_buildfilter")%><%=bActive%></td>
331
                        <%If canActionControlInProject("BuildConfiguration") Then%>
344
                        <%If canActionControlInProject("BuildConfiguration") Then%>
332
                           <td valign="top" nowrap class="body_rowg"><%Call objBtnControl.Render  ( Array("btnEditDaemon", "btnRemoveDaemon", "btnDeleteDaemon"), objAccessControl )%></td>
345
                           <td valign="top" nowrap class="body_rowg"><%Call objBtnControl.Render  ( Array("btnEditDaemon", "btnRemoveDaemon", "btnDeleteDaemon"), objAccessControl )%></td>
333
                        <%End If%>
346
                        <%End If%>
334
                     </tr>
347
                     </tr>
335
                     <%
348
                     <%
Line 351... Line 364...
351
                 <tr>
364
                 <tr>
352
                    <td nowrap class="err_alert">Error
365
                    <td nowrap class="err_alert">Error
353
                    <td class="body_rowg"> The set of Build Machines must have exactly one Master.
366
                    <td class="body_rowg"> The set of Build Machines must have exactly one Master.
354
                 </tr>
367
                 </tr>
355
                <%End If%>
368
                <%End If%>
-
 
369
                <%If bInactiveMachine Then %>
-
 
370
                 <tr>
-
 
371
                    <td nowrap class="err_alert">Error
-
 
372
                    <td class="body_rowg">One or more of the build machine are no longer available for use.
-
 
373
                 </tr>
-
 
374
                <%End If%>
356
                <%If toolsetWarning Then %>
375
                <%If toolsetWarning Then %>
357
                 <tr>
376
                 <tr>
358
                    <td nowrap class="err_alert">Warning
377
                    <td nowrap class="err_alert">Warning
359
                    <td class="body_rowg">There should be one TOOLSET builder within each set of machines with the same GBE_MACHTYPE.
378
                    <td class="body_rowg">There should be one TOOLSET builder within each set of machines with the same GBE_MACHTYPE.
360
                 </tr>
379
                 </tr>