Subversion Repositories DevTools

Rev

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

Rev 6268 Rev 6550
Line 16... Line 16...
16
<!--#include file="common/formating.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<!--#include file="common/_form_window_common.asp"-->
19
<!--#include file="common/_form_window_common.asp"-->
20
<!--#include file="common/common_daemon.asp"-->
20
<!--#include file="common/common_daemon.asp"-->
21
<%
-
 
22
'------------ ACCESS CONTROL ------------------
21
<% '------------ ACCESS CONTROL ------------------ %>
23
%>
-
 
24
<!--#include file="_access_control_login_optional.asp"-->
22
<!--#include file="_access_control_login_optional.asp"-->
25
<!--#include file="_access_control_general.asp"-->
23
<!--#include file="_access_control_general.asp"-->
26
<%
24
<%
27
'------------ Variable Definition -------------
25
'------------ Variable Definition -------------
28
Dim rsQry
26
Dim rsQry
Line 705... Line 703...
705
   window.location.assign(url);
703
   window.location.assign(url);
706
}
704
}
707
 
705
 
708
//-->
706
//-->
709
</script>
707
</script>
-
 
708
<%
-
 
709
'------------------------------------------------------------------------------
-
 
710
Sub SidePanelContent
-
 
711
%>
-
 
712
<!-- Monitoring Options Selection Box ---->
-
 
713
 <fieldset style="padding:3px">
-
 
714
    <legend class="body_scol">Display Options</legend>
-
 
715
     <fieldset class="body_rowg">
-
 
716
        <legend class="body_scol">Auto Refresh</legend>
-
 
717
             <div class=nowrap>
-
 
718
             <input name="autoRefresh" id="autoRefresh" type="checkbox" <%If param_refreshEnabled Then%>checked<%End If%> value="1" onclick='toggle_refresh()'>
-
 
719
                 <input class="body_txt" style="width:3em" name="refreshPeriod" id="refreshPeriod" type="input" maxlength="3" value="<%=param_refreshPeriod%>" onchange='toggle_refresh()' > Seconds
-
 
720
             </div>
-
 
721
     </fieldset>
-
 
722
     <fieldset class="body_rowg">
-
 
723
        <legend class="body_scol">Filter</legend>
-
 
724
            <div>
-
 
725
                 <input name="activeBuilds" id="activeBuilds" type="checkbox" <%=Filter_Checked("activeBuilds")%> value="activeBuilds" onclick='update_Display_Filter()'>Active
-
 
726
            </div>
-
 
727
            <div>
-
 
728
                 <input name="idleBuilds" id="idleBuilds" type="checkbox" <%=Filter_Checked("idleBuilds")%> value="idleBuilds" onclick='update_Display_Filter()'>Idle
-
 
729
            </div>
-
 
730
            <div>
-
 
731
                 <input name="pausedBuilds" id="pausedBuilds" type="checkbox" <%=Filter_Checked("pausedBuilds")%> value="paused" onclick='update_Display_Filter()'>Paused
-
 
732
            </div>
-
 
733
            <div>
-
 
734
                 <input name="disabledDaemons"  id="disabledDaemons"  type="checkbox" <%=Filter_Checked("disabledDaemons")%>  value="disabledDaemons"  onclick='update_Display_Filter()'>Disabled
-
 
735
            </div>
-
 
736
            <div class=nowrap>
-
 
737
                 <input name="problemBuilds"  id="problemBuilds"  type="checkbox" <%=Filter_Checked("problemBuilds")%>  value="problemBuilds"  onclick='update_Display_Filter()'>Problem&nbsp;Daemon&nbsp;Sets
-
 
738
            </div>
-
 
739
     </fieldset>
-
 
740
     <fieldset class="body_rowg">
-
 
741
        <legend  class="body_scol">Inactivity</legend>
-
 
742
        <input class="body_txt" style="width:3em" name="inactivity" id="inactivity" type="input" maxlength="3" value="<%=param_inactivity%>" onchange='toggle_inactivity()' > Days
-
 
743
     </fieldset>
-
 
744
</fieldset>
-
 
745
<%
-
 
746
End Sub
-
 
747
'------------------------------------------------------------------------------
-
 
748
Sub DisplayProjectHeader(bProjectHeaderDone, eMachine, strProject_checked)
-
 
749
    If NOT bProjectHeaderDone Then%>
-
 
750
        <tr>
-
 
751
           <td colspan='8'><img src='images/spacer.gif' width='1' height='5'></td>
-
 
752
        </tr>
-
 
753
        <tr>
-
 
754
           <td colspan='8' background='images/bg_rep_line.gif'><img src='images/spacer.gif' width='1' height='5'></td>
-
 
755
        </tr>
-
 
756
        <tr>
-
 
757
            <td nowrap class="body_rowg">
-
 
758
                <input name='DIS_PRJ_<%=eMachine("PROJ_ID")%>' id='DIS_PRJ_<%=eMachine("PROJ_ID")%>' type='checkbox' value=1 <%=strProject_checked%> onclick=toggle_project(<%=eMachine("PROJ_ID")%>)>
-
 
759
                <a href='rtree.asp?proj_id=<%=eMachine("PROJ_ID")%>'><%=eMachine("PROJ_NAME")%>
-
 
760
            </td>
-
 
761
        <%
-
 
762
    End If
-
 
763
End Sub
-
 
764
'------------------------------------------------------------------------------
-
 
765
Sub ShowDaemonStatus
-
 
766
%>
-
 
767
<table width="10" class="embedded_table" style="margin-bottom:10px">
-
 
768
  <tr>
-
 
769
     <td width="100%">
-
 
770
        <table width="100%" class="embedded_table">
-
 
771
           <tr>
-
 
772
              <td nowrap class="form_ttl">BUILD DAEMON STATUS INFORMATION</td>
-
 
773
           </tr>
-
 
774
           <%If bIndefinitelyPaused Then%>
-
 
775
              <tr>
-
 
776
                 <td>
-
 
777
                    <span class='err_alert'>
-
 
778
                       <font size='2'><b>WARNING: Indefinite Pause, Build Daemons are all stopped - please contact an administrator</b></font>
-
 
779
                    </span>
-
 
780
                 </td>
-
 
781
              </tr>
-
 
782
           <%End If%>
-
 
783
        </table>
-
 
784
     </td>
-
 
785
  </tr>
-
 
786
  <tr>
-
 
787
    <td>
-
 
788
        <table class="rounded_box embedded_table" width="100%" >
-
 
789
          <tr>
-
 
790
             <td bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
-
 
791
             <td bgcolor="#FFFFFF" valign="top">
-
 
792
                <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
793
                <!--#include file="messages/_msg_inline.asp"-->
-
 
794
                <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
795
                <br>
-
 
796
                <table width="100%" border="0" cellspacing="0" cellpadding="0">
-
 
797
                   <tr>
-
 
798
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Project
-
 
799
                         <input name="NOPRJ" id="NOPRJ" type="Button" value="All" onclick="toggle_all_projects(1)">
-
 
800
                         <input name="NOPRJ" id="NOPRJ" type="Button" value="None" onclick="toggle_all_projects(0)">
-
 
801
                      </td>
-
 
802
                      <!-- Status Table Header -->
-
 
803
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Release</td>
-
 
804
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Release<br>Mode</td>
-
 
805
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>Mode</td>
-
 
806
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>Host</td>
-
 
807
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>State</td>
-
 
808
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Building<br>Package</td>
-
 
809
                      <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Last Change<br>Delta (secs)</td>
-
 
810
                   </tr>
-
 
811
 
-
 
812
                   <!-- Status Table Body -->
-
 
813
                   <%
-
 
814
                    Dim bProject_changed          ' Signals a row change due to a different project
-
 
815
                    Dim strProject_checked        ' Can be "" or "checked". Determines appearance of project enable checkbox
-
 
816
                    Dim bRelease_changed          ' signals a row change due to a different release
-
 
817
                    Dim bReleaseHeaderDone        ' indicates whether the release name has been rendered yet
-
 
818
                    Dim bProjectHeaderDone        ' Project Header done
-
 
819
                    Dim bShowAge                  ' Display age warning
-
 
820
                    Dim bToggleStyle              ' Data shown so toggle style
-
 
821
                    Dim bShowReleaseSep           ' Show Release Seperator
-
 
822
 
-
 
823
                    '   Iterate over all projects, releases and machines
-
 
824
                    '
-
 
825
                    Dim project,release,machine
-
 
826
                    Dim eProject,eRelease,eMachine
-
 
827
                    For Each project in buildStatus
-
 
828
                        ' Start of a new Project
-
 
829
                        Set eProject = buildStatus.Item(project)
-
 
830
                        bProjectHeaderDone = false
-
 
831
                        bProject_changed = true
-
 
832
                        bShowReleaseSep = False
-
 
833
 
-
 
834
                        For Each release in eProject.Item("data")
-
 
835
                            '   Start of a new Release
-
 
836
                            Set eRelease = eProject.Item("data").Item(release)
-
 
837
                            bReleaseHeaderDone = False
-
 
838
                            bRelease_changed = true
-
 
839
                            bShowAge = eRelease("bShowAge")
-
 
840
                            If  bToggleStyle Then Call ToggleStyleNow
-
 
841
                            bToggleStyle = false
-
 
842
 
-
 
843
                            For Each machine in eRelease.Item("data")
-
 
844
                                '   Start of a new Machine
-
 
845
                                Set eMachine = eRelease.Item("data").Item(machine)
-
 
846
                                strProject_checked = Is_Project_Checked(eMachine("PROJ_ID"))
-
 
847
 
-
 
848
                                ' Consider displaying the body of this machine entry
-
 
849
                                If strProject_checked = "checked" Then
-
 
850
                                    If eRelease.Exists("bDisplay_whole_set") OR eMachine.Exists("bRow_displayed") Then
-
 
851
                                        bToggleStyle = true
-
 
852
 
-
 
853
                                        ' Display Project and Release Header - Once, or a filler
-
 
854
                                        If NOT bReleaseHeaderDone Then
-
 
855
                                            bReleaseHeaderDone = True
-
 
856
 
-
 
857
                                            ' Display Project Header - ONCE. The <tr> is open
-
 
858
                                            Call DisplayProjectHeader(bProjectHeaderDone,eMachine, strProject_checked)
-
 
859
                                            bProjectHeaderDone = TRUE
-
 
860
 
710
 
861
 
-
 
862
                                            ' Display Release seperator, if this is not the first release in the project
-
 
863
                                            If bShowReleaseSep Then
-
 
864
                                                %>
-
 
865
                                                    <tr>
-
 
866
                                                        <td></td>
-
 
867
                                                        <td colspan='7' background='images/bg_rep_line.gif'><img src='images/spacer.gif' width='1' height='1'></td>
-
 
868
                                                    </tr>
-
 
869
                                                    <tr>
-
 
870
                                                        <td></td>
-
 
871
                                                <%
-
 
872
                                            End If
-
 
873
                                            ' Display the Release Header, with a marker to show aged releases
-
 
874
                                            %>
-
 
875
                                            <td nowrap <%=styleNow%>>
-
 
876
                                                <a href='build_status.asp?rtag_id=<%=eMachine("RTAG_ID")%>' title='Last Build:<%=eMachine("last_build")%>'><%=eMachine("RTAG_NAME")%></a>
-
 
877
                                            <%
-
 
878
                                            If bShowAge Then
-
 
879
                                            %>
-
 
880
                                                <img src='images/s_warning.gif' width='14' height='13' border='0' title='No Build in this release since <%=eMachine("last_build")%>. [<%=eMachine("last_build_days")%> Days]' style='vertical-align: bottom;'>
-
 
881
                                            <%
-
 
882
                                            End If
-
 
883
                                            %></td><%
-
 
884
                                        Else%>
-
 
885
                                            <td nowrap class="body_rowg"></td>
-
 
886
                                            <td nowrap <%=styleNow%>></td>
-
 
887
                                        <%
-
 
888
                                        End If
-
 
889
                                        bShowReleaseSep = true
-
 
890
                                        %>
-
 
891
                                        <td nowrap <%=styleNow%>><%=Get_Official(eMachine("OFFICIAL"))%></td>
-
 
892
                                        <td nowrap <%=styleNow%>><%=Get_Daemon_Mode(eMachine("DAEMON_MODE"))%></td>
-
 
893
                                        <td nowrap <%=styleNow%>><%=eMachine("DISPLAY_NAME")%></td>
-
 
894
                                        <td nowrap <%=styleNow%>><%=eMachine("dStateText")%></td>
-
 
895
                                        <td nowrap <%=styleNow%>><%=eMachine("PKG_NAME")%></td>
-
 
896
                                        <td nowrap <%=styleNow%>><%=PrettyDelta(eMachine("delta"),eMachine("PAUSE"),eMachine("PKG_NAME") )%></td>
-
 
897
                                        <%
-
 
898
                                    End If
-
 
899
                                    %></tr><%
-
 
900
                                End If
-
 
901
 
-
 
902
                                ' End of Display
-
 
903
                                bRelease_changed = false
-
 
904
                                bProject_changed = false
-
 
905
                            Next
-
 
906
                        Next
-
 
907
                        Call DisplayProjectHeader(bProjectHeaderDone,eMachine, strProject_checked)
-
 
908
                    Next
-
 
909
                   %>
-
 
910
                  <tr>
-
 
911
                    <td>
-
 
912
                        <input type="hidden" name="action" value="true">
-
 
913
                        <%=objPMod.ComposeHiddenTags()%>
-
 
914
                    </td>
-
 
915
                  </tr>
-
 
916
                </table>
-
 
917
             </td>
-
 
918
             <td background="images/lbox_bgside_white.gif">&nbsp;</td>
-
 
919
           </tr>
-
 
920
        </table>
-
 
921
      </td>
-
 
922
  </tr>
-
 
923
</table>
-
 
924
<%
-
 
925
End Sub
-
 
926
%>
711
<html>
927
<html>
712
   <head>
928
   <head>
713
      <title>Release Manager</title>
929
      <title>Release Manager</title>
714
      <link rel="shortcut icon" href="<%=FavIcon%>"/>
930
      <link rel="shortcut icon" href="<%=FavIcon%>"/>
715
      <meta http-equiv="Pragma" content="no-cache">
931
      <meta http-equiv="Pragma" content="no-cache">
Line 723... Line 939...
723
      <!--#include file="_jquery_includes.asp"-->
939
      <!--#include file="_jquery_includes.asp"-->
724
      <!-- DROPDOWN MENUS -->
940
      <!-- DROPDOWN MENUS -->
725
      <!--#include file="_menu_def.asp"-->
941
      <!--#include file="_menu_def.asp"-->
726
      <script language="JavaScript1.2" src="images/popup_menu.js"></script>
942
      <script language="JavaScript1.2" src="images/popup_menu.js"></script>
727
   </head>
943
   </head>
728
   <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
944
   <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
729
      <!-- HEADER -->
945
      <!-- HEADER -->
730
      <!--#include file="_header.asp"-->
946
      <!--#include file="_header.asp"-->
731
      <% getBuildStatus() %>
947
      <% getBuildStatus() %>
732
      <!-- BODY ---->
948
      <!-- BODY ---->
733
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
949
      <table class="full_table">
734
         <tr>
950
         <tr>
735
            <td width="1" background="images/bg_home_orange.gif" valign="top">
951
            <td width="146px" class="panel_bg" valign="top">
736
                <!-- Monitoring Options Selection Box ---->
-
 
737
                 <fieldset style="padding:3px">
-
 
738
                    <legend class="body_scol">Display Options</legend>
-
 
739
                     <fieldset class="body_rowg">
-
 
740
                        <legend class="body_scol">Auto Refresh</legend>
-
 
741
                             <div class=nowrap>
-
 
742
                             <input name="autoRefresh" id="autoRefresh" type="checkbox" <%If param_refreshEnabled Then%>checked<%End If%> value="1" onclick='toggle_refresh()'>
-
 
743
                                 <input class="body_txt" style="width:3em" name="refreshPeriod" id="refreshPeriod" type="input" maxlength="3" value="<%=param_refreshPeriod%>" onchange='toggle_refresh()' > Seconds
-
 
744
                             </div>
-
 
745
                     </fieldset>
-
 
746
                     <fieldset class="body_rowg">
-
 
747
                        <legend class="body_scol">Filter</legend>
-
 
748
                            <div>
-
 
749
                                 <input name="activeBuilds" id="activeBuilds" type="checkbox" <%=Filter_Checked("activeBuilds")%> value="activeBuilds" onclick='update_Display_Filter()'>Active
-
 
750
                            </div>
-
 
751
                            <div>
-
 
752
                                 <input name="idleBuilds" id="idleBuilds" type="checkbox" <%=Filter_Checked("idleBuilds")%> value="idleBuilds" onclick='update_Display_Filter()'>Idle
-
 
753
                            </div>
-
 
754
                            <div>
-
 
755
                                 <input name="pausedBuilds" id="pausedBuilds" type="checkbox" <%=Filter_Checked("pausedBuilds")%> value="paused" onclick='update_Display_Filter()'>Paused
-
 
756
                            </div>
-
 
757
                            <div>
-
 
758
                                 <input name="disabledDaemons"  id="disabledDaemons"  type="checkbox" <%=Filter_Checked("disabledDaemons")%>  value="disabledDaemons"  onclick='update_Display_Filter()'>Disabled
-
 
759
                            </div>
-
 
760
                            <div class=nowrap>
-
 
761
                                 <input name="problemBuilds"  id="problemBuilds"  type="checkbox" <%=Filter_Checked("problemBuilds")%>  value="problemBuilds"  onclick='update_Display_Filter()'>Problem&nbsp;Daemon&nbsp;Sets
-
 
762
                            </div>
-
 
763
                     </fieldset>
-
 
764
                     <fieldset class="body_rowg">
-
 
765
                        <legend  class="body_scol">Inactivity</legend>
-
 
766
                                 <input class="body_txt" style="width:3em" name="inactivity" id="inactivity" type="input" maxlength="3" value="<%=param_inactivity%>" onchange='toggle_inactivity()' > Days
-
 
767
                     </fieldset>
952
                <%Call SidePanelContent%>
768
                </fieldset>
-
 
769
            </td>
953
            </td>
770
            <td width="100%" rowspan="2" align="center" valign="top" bgcolor="#EEEFEF">
954
            <td width="100%" rowspan="2" align="center" valign="top" bgcolor="#EEEFEF">
771
 
-
 
772
               <table width="10" border="0" cellspacing="0" cellpadding="0">
-
 
773
                  <tr>
-
 
774
                     <td width="1%"></td>
-
 
775
                     <td width="100%">
-
 
776
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
-
 
777
                           <tr>
-
 
778
                              <td nowrap class="form_ttl">
-
 
779
                                 <p>BUILD DAEMON STATUS INFORMATION</p>
-
 
780
                              </td>
-
 
781
                              <td align="right" valign="bottom"></td>
-
 
782
                           </tr>
-
 
783
 
-
 
784
                           <%If bIndefinitelyPaused Then%>
-
 
785
                              <tr>
-
 
786
                                 <td>
-
 
787
                                    <span class='err_alert'>
-
 
788
                                       <font size='2'><b>WARNING: Indefinite Pause, Build Daemons are all stopped - please contact an administrator</b></font>
-
 
789
                                    </span>
-
 
790
                                 </td>
-
 
791
                              </tr>
-
 
792
                           <%End If%>
-
 
793
                        </table>
-
 
794
                     </td>
-
 
795
                     <td width="1%"></td>
-
 
796
                  </tr>
-
 
797
                  <tr>
-
 
798
                     <td align="left" valign="top" background="images/lbox_bg_blue.gif"><img src="images/lbox_tl_cnr_b.gif" width="13" height="13"></td>
-
 
799
                     <td background="images/lbox_bg_blue.gif" class="lbox_ttl_w"><img src="images/h_trsp_dot.gif" width="600" height="15"></td>
-
 
800
                     <td align="right" valign="top" background="images/lbox_bg_blue.gif"><img src="images/lbox_tr_cnr_b.gif" width="13" height="13"></td>
-
 
801
                  </tr>
-
 
802
                  <tr>
-
 
803
                     <td bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
-
 
804
                     <td bgcolor="#FFFFFF" valign="top">
-
 
805
                        <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
806
                        <!--#include file="messages/_msg_inline.asp"-->
-
 
807
                        <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
-
 
808
                        <br>
-
 
809
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
-
 
810
                           <td width="9%" valign="top"></td>
-
 
811
                           <tr>
-
 
812
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Project
-
 
813
                                 <input name="NOPRJ" id="NOPRJ" type="Button" value="All" onclick="toggle_all_projects(1)">
-
 
814
                                 <input name="NOPRJ" id="NOPRJ" type="Button" value="None" onclick="toggle_all_projects(0)">
-
 
815
                              </td>
-
 
816
                              <!-- Status Table Header -->
-
 
817
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Release</td>
-
 
818
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Release<br>Mode</td>
-
 
819
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>Mode</td>
-
 
820
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>Host</td>
-
 
821
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Daemon<br>State</td>
-
 
822
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Building<br>Package</td>
-
 
823
                              <td valign="middle" nowrap background="images/bg_table_col.gif" class="body_col">Last Change<br>Delta (secs)</td>
-
 
824
                           </tr>
-
 
825
 
-
 
826
                           <!-- Status Table Body -->
-
 
827
                           <%
-
 
828
                            Dim bProject_changed          ' Signals a row change due to a different project
-
 
829
                            Dim strProject_checked        ' Can be "" or "checked". Determines appearance of project enable checkbox
-
 
830
                            Dim bRelease_changed          ' signals a row change due to a different release
-
 
831
                            Dim bReleaseHeaderDone        ' indicates whether the release name has been rendered yet
-
 
832
                            Dim bProjectHeaderDone        ' Project Header done
-
 
833
                            Dim bShowAge                  ' Display age warning
-
 
834
                            Dim bToggleStyle              ' Data shown so toggle style
-
 
835
                            Dim bShowReleaseSep           ' Show Release Seperator
-
 
836
 
-
 
837
                            '   Iterate over all projects, releases and machines
-
 
838
                            '
-
 
839
                            Dim project,release,machine
-
 
840
                            Dim eProject,eRelease,eMachine
-
 
841
                            For Each project in buildStatus
-
 
842
                                ' Start of a new Project
-
 
843
                                Set eProject = buildStatus.Item(project)
-
 
844
                                bProjectHeaderDone = false
-
 
845
                                bProject_changed = true
-
 
846
                                bShowReleaseSep = False
-
 
847
 
-
 
848
                                For Each release in eProject.Item("data")
-
 
849
                                    '   Start of a new Release
-
 
850
                                    Set eRelease = eProject.Item("data").Item(release)
-
 
851
                                    bReleaseHeaderDone = False
-
 
852
                                    bRelease_changed = true
-
 
853
                                    bShowAge = eRelease("bShowAge")
-
 
854
                                    If  bToggleStyle Then Call ToggleStyleNow
-
 
855
                                    bToggleStyle = false
-
 
856
 
-
 
857
                                    For Each machine in eRelease.Item("data")
-
 
858
                                        '   Start of a new Machine
-
 
859
                                        Set eMachine = eRelease.Item("data").Item(machine)
-
 
860
                                        strProject_checked = Is_Project_Checked(eMachine("PROJ_ID"))
-
 
861
 
-
 
862
                                        ' Display Project Header - ONCE
-
 
863
                                        If NOT bProjectHeaderDone Then%>
-
 
864
                                            <tr>
-
 
865
                                               <td colspan='8'><img src='images/spacer.gif' width='1' height='5'></td>
-
 
866
                                            </tr>
-
 
867
                                            <tr>
-
 
868
                                               <td colspan='8' background='images/bg_rep_line.gif'><img src='images/spacer.gif' width='1' height='5'></td>
-
 
869
                                            </tr>
-
 
870
                                            <tr>
-
 
871
                                                <td nowrap class="body_rowg">
-
 
872
                                                    <input name='DIS_PRJ_<%=eMachine("PROJ_ID")%>' id='DIS_PRJ_<%=eMachine("PROJ_ID")%>' type='checkbox' value=1 <%=strProject_checked%> onclick=toggle_project(<%=eMachine("PROJ_ID")%>)>
-
 
873
                                                    <a href='rtree.asp?proj_id=<%=eMachine("PROJ_ID")%>'><%=eMachine("PROJ_NAME")%>
-
 
874
                                                </td>
-
 
875
                                            <%
-
 
876
                                        End If
-
 
877
 
-
 
878
                                        ' Consider displaying the body of this machine entry
-
 
879
                                        If strProject_checked = "checked" Then
-
 
880
                                            If eRelease.Exists("bDisplay_whole_set") OR eMachine.Exists("bRow_displayed") Then
-
 
881
                                                bToggleStyle = true
-
 
882
 
-
 
883
                                                '   Empty cell, if the project header has been displayed
-
 
884
                                                If bProjectHeaderDone Then
-
 
885
                                                    %><td nowrap class="body_rowg"></td><%
-
 
886
                                                End If
-
 
887
 
-
 
888
                                                ' Display Release Header - Once, or a filler
-
 
889
                                                If NOT bReleaseHeaderDone Then
-
 
890
                                                    bReleaseHeaderDone = True
-
 
891
 
-
 
892
                                                    ' Display Release seperator, if this is not the first release in the project
-
 
893
                                                    If bShowReleaseSep Then
-
 
894
                                                        %>
-
 
895
                                                            <tr>
-
 
896
                                                                <td></td>
-
 
897
                                                                <td colspan='7' background='images/bg_rep_line.gif'><img src='images/spacer.gif' width='1' height='1'></td>
-
 
898
                                                            </tr>
-
 
899
                                                            <tr>
-
 
900
                                                                <td></td>
-
 
901
                                                        <%
-
 
902
                                                    End If
-
 
903
                                                    ' Display the Release Header, with a marker to show aged releases
-
 
904
                                                    %>
-
 
905
                                                    <td nowrap <%=styleNow%>>
-
 
906
                                                        <a href='build_status.asp?rtag_id=<%=eMachine("RTAG_ID")%>' title='Last Build:<%=eMachine("last_build")%>'><%=eMachine("RTAG_NAME")%></a>
-
 
907
                                                    <%
-
 
908
                                                    If bShowAge Then
-
 
909
                                                    %>
-
 
910
                                                        <img src='images/s_warning.gif' width='14' height='13' border='0' title='No Build in this release since <%=eMachine("last_build")%>. [<%=eMachine("last_build_days")%> Days]' style='vertical-align: bottom;'>
955
                <%Call ShowDaemonStatus%>
911
                                                    <%
-
 
912
                                                    End If
-
 
913
                                                    %></td><%
-
 
914
                                                Else
-
 
915
                                                    %><td nowrap <%=styleNow%>></td><%
-
 
916
                                                End If
-
 
917
                                                bShowReleaseSep = true
-
 
918
                                                %>
-
 
919
                                                <td nowrap <%=styleNow%>><%=Get_Official(eMachine("OFFICIAL"))%></td>
-
 
920
                                                <td nowrap <%=styleNow%>><%=Get_Daemon_Mode(eMachine("DAEMON_MODE"))%></td>
-
 
921
                                                <td nowrap <%=styleNow%>><%=eMachine("DISPLAY_NAME")%></td>
-
 
922
                                                <td nowrap <%=styleNow%>><%=eMachine("dStateText")%></td>
-
 
923
                                                <td nowrap <%=styleNow%>><%=eMachine("PKG_NAME")%></td>
-
 
924
                                                <td nowrap <%=styleNow%>><%=PrettyDelta(eMachine("delta"),eMachine("PAUSE"),eMachine("PKG_NAME") )%></td>
-
 
925
                                                <%
-
 
926
                                            End If
-
 
927
                                            %></tr><%
-
 
928
                                        End If
-
 
929
 
-
 
930
                                        ' End of Display
-
 
931
                                        bRelease_changed = false
-
 
932
                                        bProject_changed = false
-
 
933
                                        bProjectHeaderDone = true
-
 
934
                                    Next
-
 
935
                                Next
-
 
936
                            Next
-
 
937
                           %>
-
 
938
                        </table>
-
 
939
                     <!-- Status Table Footer -->
-
 
940
                     </td>
-
 
941
                     <td background="images/lbox_bgside_white.gif">&nbsp;</td>
-
 
942
                  </tr>
-
 
943
                  <tr>
-
 
944
                     <input type="hidden" name="action" value="true">
-
 
945
                     <%=objPMod.ComposeHiddenTags()%>
-
 
946
                     <td background="images/lbox_bg_blue.gif" valign="bottom"><img src="images/lbox_bl_cnr_b.gif" width="13" height="13"></td>
-
 
947
                     <td background="images/lbox_bg_blue.gif"></td>
-
 
948
                     <td background="images/lbox_bg_blue.gif" valign="bottom" align="right"><img src="images/lbox_br_cnr_b.gif" width="13" height="13"></td>
-
 
949
                  </tr>
-
 
950
               </table>
-
 
951
            </td>
956
            </td>
952
            <td width="1" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
-
 
953
         </tr>
957
         </tr>
954
         <tr>
958
         <tr>
955
            <td valign="bottom" align="center" background="images/bg_home_orange.gif"><img src="images/img_gear.gif" width="86" height="99" vspace="20" hspace="30"></td>
959
            <td class="panel_bg" valign="bottom" align="center" height="350">
956
            <td background="images/bg_lght_gray.gif" valign="top"><img src="images/h_trsp_dot.gif" width="1" height="350"></td>
960
                <img src="images/img_gears.png" vspace="20" hspace="30"></td>
957
         </tr>
961
         </tr>
958
      </table>
962
      </table>
959
      <!-- FOOTER -->
963
      <!-- FOOTER -->
960
      <!--#include file="_footer.asp"-->
964
      <!--#include file="_footer.asp"-->
961
   </body>
965
   </body>