Subversion Repositories DevTools

Rev

Rev 181 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 181 Rev 183
Line 430... Line 430...
430
                           ' Get the number of release configurations for this RTAG_ID, and iterate through them
430
                           ' Get the number of release configurations for this RTAG_ID, and iterate through them
431
                           query_string = " select * from release_config rc, gbe_machtype gm, build_machine_config bm"&_
431
                           query_string = " select * from release_config rc, gbe_machtype gm, build_machine_config bm"&_
432
                                          "  where rc.rtag_id = "& parRtagId &_
432
                                          "  where rc.rtag_id = "& parRtagId &_
433
                                          "    and gm.gbe_id = rc.gbe_id"&_
433
                                          "    and gm.gbe_id = rc.gbe_id"&_
434
                                          "    and rc.daemon_hostname = bm.machine_hostname(+)" &_
434
                                          "    and rc.daemon_hostname = bm.machine_hostname(+)" &_
435
                                          "  order by rc.daemon_hostname"
435
                                          "  order by rc.daemon_hostname,rc.rcon_id"
436
 
436
 
437
                           Set rsQry = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
437
                           Set rsQry = OraDatabase.DbCreateDynaset( query_string, ORADYN_DEFAULT )
438
 
438
 
439
                           Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
439
                           Do While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
440
                              rcon_id = rsQry("rcon_id")
440
                              rcon_id = rsQry("rcon_id")
Line 496... Line 496...
496
                                 <td nowrap class="body_rowg"><%=rsQry("display_name")%></td>
496
                                 <td nowrap class="body_rowg"><%=rsQry("display_name")%></td>
497
                                 <td nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
497
                                 <td nowrap class="body_rowg"><%=rsQry("gbe_value")%></td>
498
                                 <td nowrap class="body_rowg"><%=Get_Daemon_Mode(rsQry("daemon_mode"))%></td>
498
                                 <td nowrap class="body_rowg"><%=Get_Daemon_Mode(rsQry("daemon_mode"))%></td>
499
                                 <td nowrap class="body_rowg"><%=Get_Run_Level(currentRunLevel, indefinitelyPaused,daemonState)%></td>
499
                                 <td nowrap class="body_rowg"><%=Get_Run_Level(currentRunLevel, indefinitelyPaused,daemonState)%></td>
500
                                 <td nowrap class="body_rowg"><%=Get_Package_Name(pkgName)%></td>
500
                                 <td nowrap class="body_rowg"><%=Get_Package_Name(pkgName)%></td>
-
 
501
                                 <%If (delta > 600) AND IsNull(pkgName) Then%>
-
 
502
                                   <td nowrap class="body_rowg" style=color:Red><%=delta%></td>
-
 
503
                                 <%else%>
501
                                 <td nowrap class="body_rowg"><%=delta%></td>
504
                                   <td nowrap class="body_rowg"><%=delta%></td>
-
 
505
                                 <%end if%>
-
 
506
 
502
                                 <td nowrap class="body_rowg">
507
                                 <td nowrap class="body_rowg">
503
                                    <%
508
                                    <%
504
                                    If (rsQry2.RecordCount > 0) AND NOT indefinitelyPaused  Then
509
                                    If (rsQry2.RecordCount > 0) AND NOT indefinitelyPaused  Then
505
                                       If objAccessControl.UserLogedIn Then
510
                                       If objAccessControl.UserLogedIn Then
506
                                          If IsNull(daemonState) Then
511
                                          If IsNull(daemonState) Then