Subversion Repositories DevTools

Rev

Rev 5957 | Rev 6070 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5950 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'   DanglingVersions.asp
5
'=====================================================
6
%>
7
<%
8
Option explicit
9
' Good idea to set when using redirect
10
Response.Expires = 0   ' always load the page, dont store
11
%>
12
<!--#include file="common/conf.asp"-->
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/formating.asp"-->
15
<!--#include file="common/qstr.asp"-->
16
<!--#include file="common/common_subs.asp"-->
17
<%
18
'------------ ACCESS CONTROL ------------------
19
%>
6048 dpurdie 20
<!--#include file="_access_control_login.asp"-->
5950 dpurdie 21
<!--#include file="_access_control_general.asp"-->
22
<%
23
'------------ Variable Definition -------------
24
Dim userId
25
Dim pkgCount
26
Dim rsQry
27
Dim Query_String
28
Dim divId
29
'------------ Constants Declaration -----------
30
'------------ Variable Init -------------------
31
'----------------------------------------------
32
%>
33
<html>
34
   <head>
35
      <title>Release Manager</title>
36
      <link rel="shortcut icon" href="<%=FavIcon%>"/>
37
      <meta http-equiv="Pragma" content="no-cache">
38
      <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
39
      <link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
40
      <link rel="stylesheet" href="images/navigation.css" type="text/css">
41
      <script language="JavaScript" src="images/common.js"></script>
42
      <script language="JavaScript" src="scripts/remote_scripting.js"></script>
43
      <!--#include file="_jquery_includes.asp"-->
44
      <!-- TIPS -->
45
      <script language="JavaScript" src="images/tipster.js"></script>
46
      <script language="JavaScript" src="images/_help_tips.js"></script>
47
      <!-- DROPDOWN MENUS -->
48
      <!--#include file="_menu_def.asp"-->
49
      <script language="JavaScript1.2" src="images/popup_menu.js"></script>
50
      <script language="JavaScript" type="text/javascript">
51
      <!--
52
        formTips.tips.h_dangling       = stdTip(300, 'Dangling Versions', 'Dangling package versions are versions of a package that have not been released and are not associated with any Release.' +
53
                                                                  '<p>These are commonly caused by "Removing" a WIP instead of "Destroying" it.' + 
54
                                                                  '<p>Please consider destroying these versions.' 
55
                                                                  );
56
        //
57
        //	Load/Hide/Show an Ajax expander
58
        //	BaseId - Base for two IDs.
59
        //			 IMG_BaseId - image to to toggle
60
        //			 BaseId - Div to load data into
61
        //	url - Url used to load subcontrol
62
        function ToggleUsedByControl(baseId, url)
63
        {
64
        	var img, dmode;
65
        	var imgel = MM_findObj("IMG_" + baseId);
66
        	var divel = MM_findObj(baseId);
67
        	var showing = divel.getAttribute("data-show");
68
        	if(showing == 1)
69
        	{
70
        		img = "images/bt_minus.gif";
71
        		dmode = 'block';
72
        		showing = 2
73
        	}
74
        	else if(showing == 2)
75
        	{
76
        		img = "images/bt_plus.gif";
77
        		dmode = 'none';
78
        		showing = 1;
79
        	}
80
        	else
81
        	{
82
        		img = "images/bt_minus.gif";
83
        		dmode = 'block';
84
        		showing = 2;
85
 
86
        		// Set div name for ajax loading
87
        		ajaxdivname = baseId;
88
 
89
        		//Create the xmlHttp object to use in the request
90
        		//stateChangeHandler will fire when the state has changed, i.e. data is received back
91
        		// This is non-blocking (asynchronous)
92
        		xmlHttp = GetXmlHttpObject(stateChangeHandler);
93
 
94
        		//Send the xmlHttp get to the specified url
95
        		xmlHttp_Get(xmlHttp, url);
96
        	}
97
        	// Update image and attributes
98
        	imgel.src = img;
99
        	divel.style.display = dmode;
100
        	divel.setAttribute("data-show", showing);
101
        }
102
      //-->
103
      </script>
104
      <style type="text/css">
105
      <!--
106
      .style1 {
107
         font-family: Arial, Helvetica, sans-serif;
108
         font-size: 12px;
109
      }
110
      .style3 {
111
         font-size: 11px;
112
         font-family: tahoma, sans-serif;
113
      }
114
      -->
115
      </style>
116
   </head>
117
   <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
118
      <!-- MENU LAYERS -------------------------------------->
119
      <div id="popmenu" class="menuskin" onmouseover="clearhidemenu();highlightmenu(event,'on')"
120
         onmouseout="highlightmenu(event,'off');dynamichide(event)">
121
      </div>
122
      <!-- HEADER -->
123
      <!--#include file="_header.asp"-->
124
      <!-- BODY ---->
125
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
126
         <tr>
127
            <td width="1%" background="images/bg_home_orange.gif" valign="top">
128
            <!--#include file="_front_explorer.asp"-->
129
            </td>
130
            <td rowspan="2" width="1%" valign="top">
131
               <table width="100%" border="0" cellspacing="0" cellpadding="0">
132
                  <tr>
133
                     <td width="1%">
134
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
135
                           <tr>
136
                              <td colspan="3">
137
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
138
                                    <tr>
139
                                       <td background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_left.jpg" width="436" height="88"></td>
140
                                       <td align="right" background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_right.jpg" width="70" height="88"></td>
141
                                    </tr>
142
                                 </table>
143
                              </td>
144
                              <td background="images/bg_action_norm.gif"></td>
145
                           </tr>
146
                           <tr>
147
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="518"></td>
148
                              <td width="100%" valign="top" class="body_txt">
149
                                 <br>
150
                                 <!-- DANGLING PACKAGES ---------------------------------------------->
151
                                <%
152
                                pkgCount = 0
153
                                Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("WorkNotInProgressSummary.sql"), cint(0))
154
                                %>
155
                                 <table width="100%" border="0" cellspacing="1" cellpadding="1">
156
                                    <tr>
157
                                       <td colspan="4" class="body_sect">Dangling Package Versions by User
158
                                       <%=Quick_Help("h_dangling")%>
159
                                       </td>
160
                                    </tr>
161
                                    <tr>
162
                                       <td width="40%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;User</td>
163
                                       <td width="50%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;Package Count</td>
164
                                       <td width="1%" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="17"></td>
165
                                    </tr>
166
 
167
                                    <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
168
                                    userId = rsTemp("user_id")
169
                                    divId = "userId_" & userId
170
                                   pkgCount = rsTemp("counter")
171
                                    %>
172
                                    <tr>
173
                                       <td nowrap class="form_item">
174
                                          <a href="javascript:;" class="txt_linked" onClick="ToggleUsedByControl('<%=divId%>','RequestUserDangle.asp?user_id=<%=userId%>');">
175
                                                <img id=IMG_<%=divId%> src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_user.gif" border="0" align="absmiddle" hspace="3"><%=rsTemp("full_name")%>
176
                                          </a>
177
                                       </td>
178
                                       <td nowrap class="body_txt"><%=pkgCount%></td>
179
                                       <td nowrap class="body_txt"><a href="mailto:<%=rsTemp("user_email")%>"><img src="images/bt_send_email.gif" width="36" height="13" border="0" alt="<%=rsTemp("user_email")%>"></a>
180
                                    </tr>
181
                                    <tr>
182
                                        <td nowrap class="body_txt" colspan="3">
183
                                             <div id=<%=divId%> style="display:none;"><%=enumLOADING%></div>
184
                                         </td>
185
                                    </tr>
186
                                    <%rsTemp.MoveNext
187
                                 WEnd
188
                                 rsTemp.Close
189
                                 Set rsTemp = nothing%>
190
                                 </table>
191
                                 <!-- DANGLING PACKAGES END ------------------------------------------>
192
                              </td>
193
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="10"></td>
194
                           </tr>
195
                        </table>
196
                     </td>
197
                  </tr>
198
               </table>
199
            </td>
200
            <td width="100%">&nbsp;</td>
201
         </tr>
202
         <tr>
203
            <td valign="bottom" align="center" background="images/bg_home_orange.gif"><img src="images/img_gear.gif" width="107" height="107" vspace="20" hspace="30"></td>
204
            <td>&nbsp;</td>
205
         </tr>
206
      </table>
207
      <!-- FOOTER -->
5957 dpurdie 208
      <!--#include file="_footer.asp"-->
5950 dpurdie 209
   </body>
210
</html>