Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
125 ghuddy 5
'|                          INDEX                    |
119 ghuddy 6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
125 ghuddy 12
Response.Expires = 0   ' always load the page, dont store
119 ghuddy 13
%>
14
<!--#include file="common/conf.asp"-->
15
<!--#include file="common/globals.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<%
20
'------------ ACCESS CONTROL ------------------
21
%>
22
<!--#include file="_access_control_general.asp"-->
23
<%
24
'------------ Variable Definition -------------
25
Dim parMsg
26
Dim msgScript
27
Dim userId
28
Dim rsQry
29
Dim rsLastRelease
125 ghuddy 30
Dim AutomatedPackages, TotalPackages
119 ghuddy 31
Dim Query_String
125 ghuddy 32
Dim Auto
119 ghuddy 33
'------------ Constants Declaration -----------
34
'------------ Variable Init -------------------
125 ghuddy 35
parMsg = QStrPar("msg")         ' Messages
119 ghuddy 36
'----------------------------------------------
37
%>
38
<%
39
'-----------------------------------------------------------------------------------------------------------------------
40
Function Get_Messages
125 ghuddy 41
   Get_Messages = _
42
   " SELECT * FROM message_board WHERE expiry_date > "& ORA_SYSDATE &" OR due_date >= "& ORA_SYSDATE &"+2"
119 ghuddy 43
End Function
44
'-----------------------------------------------------------------------------------------------------------------------
45
Function Get_DashBoard (nProjId)
125 ghuddy 46
   Get_DashBoard = _
47
   " SELECT * FROM DASH_BOARD db, PROJECTS prj, RELEASE_TAGS rt where prj.proj_id = rt.proj_id and rt.rtag_id = db.rtag_id "&_
48
   " and db.proj_id = "&nProjId&" order by last_build_time desc"
119 ghuddy 49
End Function
50
'-----------------------------------------------------------------------------------------------------------------------
51
%>
52
<html>
125 ghuddy 53
   <head>
54
      <title>Release Manager</title>
55
      <meta http-equiv="Pragma" content="no-cache">
56
      <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
57
      <link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
58
      <link rel="stylesheet" href="images/navigation.css" type="text/css">
59
      <script language="JavaScript" src="images/common.js"></script>
60
      <script language="JavaScript" src="scripts/remote_scripting.js"></script>
61
      <!-- TIPS -->
62
      <script language="JavaScript" src="images/tipster.js"></script>
63
      <script language="JavaScript" src="images/_help_tips.js"></script>
119 ghuddy 64
 
125 ghuddy 65
      <script language="Javascript" type="text/javascript">
66
      <!--
119 ghuddy 67
 
125 ghuddy 68
      //This section creates the current date string
69
      if ((navigator.appName.indexOf('Microsoft Internet Explorer') != -1 ) && (navigator.appVersion.substring(0,1) >= 4)) var intro = 1;
70
      if ((navigator.appName.indexOf('Netscape') != -1 ) && (navigator.appVersion.substring(0,1) >= 4)) var intro = 0;
71
      var dateNumb = new Date();
72
      dateNumb = dateNumb.getDate();
73
      var d = new Date();
74
      d = d.getDay();
75
      var m = new Date();
76
      m = m.getMonth();
77
      var y = new Date();
78
      y = y.getFullYear();
119 ghuddy 79
 
125 ghuddy 80
      var month = new String();
81
      var dateTH = new String();
82
      var date = new String();
83
      var FullDate = new String();
119 ghuddy 84
 
125 ghuddy 85
      if (d == 0) var day = 'Sunday';
86
      else if (d == 1) var day = 'Monday';
87
      else if (d == 2) var day = 'Tuesday';
88
      else if (d == 3) var day = 'Wednesday';
89
      else if (d == 4) var day = 'Thursday';
90
      else if (d == 5) var day = 'Friday';
91
      else if (d == 6) var day = 'Saturday';
119 ghuddy 92
 
125 ghuddy 93
      if (m == 0) var month = 'January';
94
      else if (m == 1) var month = 'February';
95
      else if (m == 2) var month = 'March';
96
      else if (m == 3) var month = 'April';
97
      else if (m == 4) var month = 'May';
98
      else if (m == 5) var month = 'June';
99
      else if (m == 6) var month = 'July';
100
      else if (m == 7) var month = 'August';
101
      else if (m == 8) var month = 'September';
102
      else if (m == 9) var month = 'October';
103
      else if (m == 10) var month = 'November';
104
      else if (m == 11) var month = 'December';
119 ghuddy 105
 
125 ghuddy 106
      if ((dateNumb == 1) || (dateNumb == 21) || (dateNumb == 31)) dateTh = 'st'; //.sup();
107
      else if ((dateNumb == 2) || (dateNumb == 22)) dateTH = 'nd'; //.sup();
108
      else if ((dateNumb == 3) || (dateNumb == 23)) dateTH = 'rd'; //.sup();
109
      else dateTH = 'th'; //.sup();
110
      date = dateNumb + dateTH;
111
      FullDate = day + ', ' + month + ' ' + date + ', ' + y;
119 ghuddy 112
 
157 ghuddy 113
 
125 ghuddy 114
      //-->
115
      </script>
116
      <script language="JavaScript" src="images/common.js"></script>
117
      <script language="JavaScript" src="scripts/remote_scripting.js"></script>
118
      <!-- DROPDOWN MENUS -->
119
      <!--#include file="_menu_def.asp"-->
120
      <script language="JavaScript1.2" src="images/popup_menu.js"></script>
121
      <script language="JavaScript" type="text/javascript">
122
      <!--
119 ghuddy 123
 
125 ghuddy 124
      function RequestUserWip( paramString, rowId ){
125
         var requestURL = 'RequestUserWip.asp';
119 ghuddy 126
 
125 ghuddy 127
         // Show div
128
         ToggleDisplay( 'DIVWIP_'+ rowId, 'IMG_EXPAND_WIP_' + rowId, 'IMG_COLLAPSE_WIP_' + rowId );
119 ghuddy 129
 
125 ghuddy 130
         // Set ajax divname
131
         ajaxdivname = 'DIVWIP_'+ rowId;
119 ghuddy 132
 
125 ghuddy 133
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
134
         {
135
            //Append the name to search for to the requestURL
136
            var url = requestURL + paramString;
119 ghuddy 137
 
125 ghuddy 138
            //Create the xmlHttp object to use in the request
139
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
140
            // This is non-blocking (asynchronous)
141
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
119 ghuddy 142
 
125 ghuddy 143
            //Send the xmlHttp get to the specified url
144
            xmlHttp_Get(xmlHttp, url);
145
         }
146
      }
119 ghuddy 147
 
125 ghuddy 148
      function RequestProjectRelease( paramString, rowId ){
149
         var requestURL = 'RequestProjectRelease.asp';
119 ghuddy 150
 
125 ghuddy 151
         // Show div
152
         ToggleDisplay( 'DIVPROJ_'+ rowId, 'IMG_EXPAND_PROJ_' + rowId, 'IMG_COLLAPSE_PROJ_' + rowId );
119 ghuddy 153
 
125 ghuddy 154
         // Set ajax divname
155
         ajaxdivname = 'DIVPROJ_'+ rowId;
156
 
157
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
158
         {
159
            //Append the name to search for to the requestURL
160
            var url = requestURL + paramString;
161
 
162
            //Create the xmlHttp object to use in the request
163
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
164
            // This is non-blocking (asynchronous)
165
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
166
 
167
            //Send the xmlHttp get to the specified url
168
            xmlHttp_Get(xmlHttp, url);
169
         }
170
      }
171
 
172
 
173
      function RequestReleasePackages( paramString, rowId ){
174
         var requestURL = 'RequestReleasePackages.asp';
175
 
176
         // Show div
177
         ToggleDisplay( 'DIVRTAG_'+ rowId, 'IMG_EXPAND_RTAG_' + rowId, 'IMG_COLLAPSE_RTAG_' + rowId );
178
 
179
         // Set ajax divname
180
         ajaxdivname = 'DIVRTAG_'+ rowId;
181
 
182
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
183
         {
184
            //Append the name to search for to the requestURL
185
            var url = requestURL + paramString;
186
 
187
            //Create the xmlHttp object to use in the request
188
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
189
            // This is non-blocking (asynchronous)
190
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
191
 
192
            //Send the xmlHttp get to the specified url
193
            xmlHttp_Get(xmlHttp, url);
194
         }
195
      }
196
 
197
      function RequestTop10ChangesInLastWeek( paramString, rowId ){
198
         var requestURL = 'RequestTop10Changes.asp';
199
 
200
         // Show div
201
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_1_WEEK', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_1_WEEK', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_1_WEEK' );
202
 
203
         // Set ajax divname
204
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_1_WEEK';
205
 
206
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
207
         {
208
            //Append the name to search for to the requestURL
209
            var url = requestURL + paramString;
210
 
211
            //Create the xmlHttp object to use in the request
212
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
213
            // This is non-blocking (asynchronous)
214
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
215
 
216
            //Send the xmlHttp get to the specified url
217
            xmlHttp_Get(xmlHttp, url);
218
         }
219
      }
220
 
221
      function RequestTop10ChangesInLastMonth( paramString, rowId ){
222
         var requestURL = 'RequestTop10Changes.asp';
223
 
224
         // Show div
225
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_1_MONTH', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_1_MONTH', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_1_MONTH' );
226
 
227
         // Set ajax divname
228
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_1_MONTH';
229
 
230
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
231
         {
232
            //Append the name to search for to the requestURL
233
            var url = requestURL + paramString;
234
 
235
            //Create the xmlHttp object to use in the request
236
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
237
            // This is non-blocking (asynchronous)
238
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
239
 
240
            //Send the xmlHttp get to the specified url
241
            xmlHttp_Get(xmlHttp, url);
242
         }
243
      }
244
 
245
      function RequestTop10ChangesInLast3Months( paramString, rowId ){
246
         var requestURL = 'RequestTop10Changes.asp';
247
 
248
         // Show div
249
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_3_MONTHS', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_3_MONTHS', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_3_MONTHS' );
250
 
251
         // Set ajax divname
252
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_3_MONTHS';
253
 
254
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
255
         {
256
            //Append the name to search for to the requestURL
257
            var url = requestURL + paramString;
258
 
259
            //Create the xmlHttp object to use in the request
260
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
261
            // This is non-blocking (asynchronous)
262
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
263
 
264
            //Send the xmlHttp get to the specified url
265
            xmlHttp_Get(xmlHttp, url);
266
         }
267
      }
268
 
269
 
270
      function RequestPreviousPackageVersions( paramString, rowId ){
271
         var requestURL = 'RequestPackageVersionHistoryMetrics.asp';
272
 
273
         // Show div
274
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_PREV_PKG_VERS', 'IMG_EXPAND_RTAG_' + rowId + '_PREV_PKG_VERS', 'IMG_COLLAPSE_RTAG_' + rowId + '_PREV_PKG_VERS' );
275
 
276
         // Set ajax divname
277
         ajaxdivname = 'DIVRTAG_'+ rowId + '_PREV_PKG_VERS';
278
 
279
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
280
         {
281
            //Append the name to search for to the requestURL
282
            var url = requestURL + paramString;
283
 
284
            //Create the xmlHttp object to use in the request
285
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
286
            // This is non-blocking (asynchronous)
287
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
288
 
289
            //Send the xmlHttp get to the specified url
290
            xmlHttp_Get(xmlHttp, url);
291
         }
292
      }
293
 
294
      //-->
295
      </script>
296
      <style type="text/css">
297
      <!--
298
      .style1 {
299
         font-family: Arial, Helvetica, sans-serif;
300
         font-size: 12px;
301
      }
302
      .style3 {
303
         font-size: 11px;
304
         font-family: tahoma, sans-serif;
305
      }
306
      -->
307
      </style>
308
   </head>
309
   <!-- TIPS LAYERS -------------------------------------->
310
   <div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
311
 
157 ghuddy 312
   <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onLoad="login.user_name.focus();">
125 ghuddy 313
      <!-- MENU LAYERS -------------------------------------->
314
      <div id="popmenu" class="menuskin" onmouseover="clearhidemenu();highlightmenu(event,'on')"
315
         onmouseout="highlightmenu(event,'off');dynamichide(event)">
316
      </div>
317
      <!-- HEADER -->
318
      <%If objAccessControl.UserLogedIn Then%>
319
         <div id="Layer1" style="position:absolute; left:2; top:2; width:1px; height:1px; z-index:1">
320
            <a href="_Logout.asp">
321
               <img src="images/i_logout.gif" width="14" height="14" border="0" alt="Logout from <%=objAccessControl.UserName%>" title="Logout from <%=objAccessControl.UserName%>">
322
            </a>
323
         </div>
324
      <%End If%>
325
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
326
         <tr>
327
            <td><a href="index.asp"><img src="images/b_release_manager.jpg" width="467" height="50" border="0"></a></td>
328
            <td valign="bottom" align="right"><%Call Print_TopRight_Menu_ROW1 ()%></td>
329
         </tr>
330
         <tr>
331
            <td align="left" nowrap valign="center" width="150" background="images/h_dot.gif" height="1"></td>
332
            <td background="images/h_dot.gif" height="1"></td>
333
         </tr>
334
      </table>
335
      <!-- BODY ---->
336
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
337
         <tr>
338
            <td width="1%" background="images/bg_home_orange.gif" valign="top">
339
               <!--#include file="_front_explorer.asp"-->
340
            </td>
341
            <td rowspan="2" width="1%" valign="top">
342
               <table width="100%" border="0" cellspacing="0" cellpadding="0">
343
                  <tr>
344
                     <td width="1%">
345
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
346
                           <tr>
347
                              <td colspan="3">
348
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
349
                                    <tr>
350
                                       <td background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_left.jpg" width="436" height="88"></td>
351
                                       <td align="right" background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_right.jpg" width="70" height="88"></td>
352
                                    </tr>
353
                                 </table>
354
                              </td>
355
                              <td background="images/bg_action_norm.gif"></td>
356
                              <td background="images/bg_action_norm.gif" valign="top" align="center"><img src="images/h_trsp_dot.gif" width="150" height="10"></td>
357
                           </tr>
358
                           <tr>
359
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="518"></td>
360
                              <td width="100%" valign="top" class="body_txt">
361
                                 <br>
362
                                 <!-- MESSAGE BOARD ---------------------------------------------->
363
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
364
                                    <tr>
365
                                       <td colspan="2" class="body_sect">Message Board</td>
366
                                    </tr>
367
                                    <tr>
368
                                       <td align="center" width="1%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">Due Date</td>
369
                                       <td width="100%" background="images/bg_form_lightbluedark.gif" align="right">
370
                                          <a href="javascript:;" onclick="MM_openBrWindow('_wform_schedule_add.asp','ReleaseManager','resizable=yes,width=400,height=300')"><img src="images/i_schedule.gif" width="16" height="15" border="0" hspace="4" vspace="2" alt="Schedule a Task" title="Schedule a Task"></a><a href="javascript:;" onclick="MM_openBrWindow('_wform_memo_add.asp','ReleaseManager','resizable=yes,width=400,height=300')"><img src="images/i_memo.gif" width="12" height="15" border="0" hspace="4" vspace="2" alt="Memo" title="Memo"></a>
371
                                       </td>
372
                                    </tr>
373
                                    <%
374
                                    Set rsTemp = OraDatabase.DbCreateDynaset( Get_Messages, cint(0))
375
                                    If rsTemp.RecordCount < 1 Then Response.write "<tr><td colspan='2' class='msgb_item'>&nbsp;No messages at this time.</td></tr>"
376
                                    While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
377
                                       If rsTemp.Fields("due_date") <> "" Then
378
                                          msgScript = "schedule"
379
                                       Else
380
                                          msgScript = "memo"
381
                                       End If
382
                                       %>
383
                                       <tr>
384
                                          <td align="center" valign="top" nowrap>
385
                                             <%If rsTemp.Fields("due_date") <> "" Then%>
386
                                             <a href="javascript:;" onClick="MM_openBrWindow('_wform_<%=msgScript%>_edit.asp?FRmsg_id=<%=rsTemp.Fields("msg_id")%>','ReleaseManager','resizable=yes,width=400,height=300')" class="msgb_item">
387
                                             <%=EuroDate(rsTemp.Fields("due_date"))%>
388
                                             <br>
389
                                             <img src="images/i_clock.gif" width="14" height="14" border="0">
390
                                             </a>
391
                                             <%Else%>
392
                                             <img src="images/h_trsp_dot.gif" width="1" height="25">
393
                                             <%End If%>
394
                                          </td>
395
                                          <td valign="top"><a href="javascript:;" onClick="MM_openBrWindow('_wform_<%=msgScript%>_edit.asp?FRmsg_id=<%=rsTemp.Fields("msg_id")%>','ReleaseManager','resizable=yes,width=400,height=300')" class="msgb_item"><%=Replace(rsTemp.Fields("msg_details"), VBNewLine, "<br>")%></a>
396
                                          </td>
397
                                       </tr>
398
                                       <tr>
399
                                          <td colspan="2" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
400
                                       </tr>
401
                                       <%
402
                                       rsTemp.MoveNext
403
                                      WEnd
404
                                    rsTemp.Close
405
                                    Set rsTemp = nothing
406
                                    %>
407
                                    <tr>
408
                                       <td><img src="images/h_trsp_dot.gif" width="80" height="1"></td>
409
                                       <td align="right"></td>
410
                                    </tr>
411
                                 </table>
412
                                 <!-- MESSAGE BOARD END ---------------------------------------------->
413
                                 <br>
414
                                 <br>
415
                                 <!-- WORK IN PROGRESS ---------------------------------------------->
416
                                 <table width="100%" border="0" cellspacing="1" cellpadding="1">
417
                                    <tr>
418
                                       <td colspan="4" class="body_sect">Work In Progress</td>
419
                                    </tr>
420
                                    <tr>
421
                                       <td width="40%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;User</td>
422
                                       <td width="50%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;Package Count</td>
423
                                       <td width="1%" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="17"></td>
424
                                    </tr>
425
                                    <!-- PERSONAL WORK IN PROGRESS  -->
426
                                    <%
427
                                    If objAccessControl.UserLogedIn Then
428
 
429
                                       OraDatabase.Parameters.Add "USER_ID", objAccessControl.UserId, ORAPARM_INPUT, ORATYPE_NUMBER
430
 
431
                                       Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("WorkInProgressByUser.sql"), cint(0))
432
 
433
                                       OraDatabase.Parameters.Remove "USER_ID"
434
 
435
                                       userId = rsTemp("user_id")
436
                                       %>
437
                                       <tr>
438
                                          <td nowrap>
439
                                             <span id="IMG_EXPAND_WIP_<%=userId%>" style="display:block;">
440
                                                <a href="javascript:;" class="txt_linked" onClick="RequestUserWip('?user_id=<%=userId%>', '<%=userId%>');"><img 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")%></a>
441
                                             </span>
442
                                             <span id="IMG_COLLAPSE_WIP_<%=userId%>" style="display:none;">
443
                                                <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVWIP_<%=userId%>', 'IMG_EXPAND_WIP_<%=userId%>', 'IMG_COLLAPSE_WIP_<%=userId%>');"><img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_user.gif" border="0" align="absmiddle" hspace="3"><%=rsTemp("full_name")%></a>
444
                                             </span>
445
                                          </td>
446
                                          <td nowrap class="body_txt"><%=rsTemp("counter")%></td>
447
                                          <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>
448
                                          </td>
449
                                       </tr>
450
                                       <tr>
451
                                          <td nowrap class="body_txt" colspan="3">
452
                                             <div id="DIVWIP_<%=userId%>" style="display:none;"><%=enumLOADING%></div>
453
                                          </td>
454
                                       </tr>
455
                                       <tr>
456
                                          <td colspan="3" background="images/bg_form_lightbluedark_line.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
457
                                       </tr>
458
                                       <%
459
                                       rsTemp.Close
460
                                       Set rsTemp = nothing
461
                                    End If%>
462
                                 </table>
463
                                 <!--  WORK IN PROGRESS END ------------------------------------------>
464
                                 <br>
465
                                 <br>
466
                                 <!-- RELEASE METRICS -------------------------------------------------------->
467
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
468
                                    <tr>
469
                                       <td colspan="4" class="body_sect">Release Metrics</td>
470
                                    </tr>
471
                                    <tr>
472
                                       <td colspan="2">
473
                                          <table width="100%" border="0" cellspacing="1" cellpadding="1">
474
                                             <tr>
475
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Project</td>
476
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Autobuilt<br>Release</td>
477
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Autobuild<br>Completed</td>
478
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Autobuilt Packages</td>
479
                                             </tr>
480
                                             <%
481
                                             Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("ProjectsWithMetrics.sql"), cint(0))
482
 
483
                                             While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
484
                                                OraDatabase.Parameters.Add "PROJ_ID", rsQry("proj_id"), ORAPARM_INPUT, ORATYPE_NUMBER
485
 
486
                                                Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("ReleaseMetrics.sql"), cint(0))
487
 
488
                                                If rsTemp.RecordCount > 0 Then
489
                                                   Auto=FormatPercent(rsTemp("autobuilt")/rsTemp("total_packages"), 2)
490
                                                End If
491
                                                %>
492
                                                <tr>
493
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
494
                                                      <span id="IMG_EXPAND_PROJ_<%=rsQry("proj_id")%>" style="display:block;">
495
                                                         <a href="javascript:;" class="txt_linked" onClick="RequestProjectRelease('?proj_id=<%=rsQry("proj_id")%>', '<%=rsQry("proj_id")%>');"><img src="images/bt_plus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3"><%=rsQry("proj_name")%></a>
496
                                                      </span>
497
                                                      <span id="IMG_COLLAPSE_PROJ_<%=rsQry("proj_id")%>" style="display:none;">
498
                                                         <a href="javascript:;" class="txt_linked" onClick="ToggleDisplay( 'DIVPROJ_<%=rsQry("proj_id")%>', 'IMG_EXPAND_PROJ_<%=rsQry("proj_id")%>', 'IMG_COLLAPSE_PROJ_<%=rsQry("proj_id")%>');"><img src="images/bt_minus.gif" border="0" align="absmiddle" hspace="3"><img src="images/i_world.gif" border="0" align="absmiddle" hspace="3"><%=rsQry("proj_name")%></a>
499
                                                      </span>
500
                                                   </td>
501
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("rtag_name")%></td>
502
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("last_build_time")%></td>
503
                                                   <%If rsTemp.RecordCount > 0 Then%>
504
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("autobuilt")%>/<%=rsTemp("total_packages")%>
505
                                                      (<%=Auto%>)</td>
506
                                                   <%Else%>
507
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"></td>
508
                                                   <%End If%>
509
                                                </tr>
510
                                                <tr>
511
                                                   <td nowrap class="body_txt" colspan="4">
512
                                                      <div id="DIVPROJ_<%=rsQry("proj_id")%>" style="display:none;"><%=enumLOADING%></div>
513
                                                   </td>
514
                                                </tr>
515
                                                <tr>
516
                                                   <td colspan="5" background="images/bg_form_lightbluedark_line.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
517
                                                </tr>
518
                                                <%
519
                                                OraDatabase.Parameters.Remove "PROJ_ID"
520
                                                rsTemp.Close()
521
                                                Set rsTemp = Nothing
522
                                                rsQry.MoveNext
523
                                             Wend
524
 
525
                                             rsQry.Close()
526
                                             Set rsQry = Nothing
527
                                             %>
528
                                          </table>
529
                                       </td>
530
                                    </tr>
531
                                 </table>
532
                                 <!-- DASH BOARD END ---------------------------------------------------->
533
                              </td>
534
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="10"></td>
535
                              <td background="images/bg_action_norm.gif" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="10"></td>
536
                              <td background="images/bg_bage.gif" width="1%" valign="top" align="center">
537
                                 <br>
538
                                 <%If NOT objAccessControl.UserLogedIn Then%>
539
                                    <table width="100" border="0" cellspacing="0" cellpadding="0">
540
                                       <form name="login" method="post" action="Login.asp">
541
                                          <tr>
542
                                             <td class="form_field_lg">Members</td>
543
                                          </tr>
544
                                          <tr>
545
                                             <td class="form_item">Username</td>
546
                                          </tr>
547
                                          <tr>
548
                                             <td><input type="text" name="user_name" class="form_item" size="19"></td>
549
                                          </tr>
550
                                          <tr>
551
                                             <td class="form_item">Password</td>
552
                                          </tr>
553
                                          <tr>
554
                                             <td>
555
                                                <input type="password" name="user_password" class="form_item" size="19"> <input type="hidden" name="rfile" value="index.asp">
556
                                                <input type="hidden" name="action" value="true">
557
                                             </td>
558
                                          </tr>
559
                                          <tr>
560
                                             <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
561
                                          </tr>
562
                                          <tr>
563
                                             <td align="center"><input type="submit" name="Submit" value="Login" class="form_btn" onclick="MM_validateForm('user_name','Username','R','user_password','Password','R');return document.MM_returnValue">
564
                                                <br>
565
                                                <br>
566
                                             </td>
567
                                          </tr>
568
                                          <tr>
569
                                             <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
570
                                          </tr>
571
                                          <tr>
572
                                             <td class="form_field_lg"><br>New Members</td>
573
                                          </tr>
574
                                          <tr>
575
                                             <td class="form_txt" align="center"><a href="mailto:<%=ADMIN_EMAIL%>?subject=Request for Release Manager Account" class="txt_linked"><img src="images/img_signup_here.gif" width="92" height="43" border="0" alt="New Members SignUp Here."></a><br>
576
                                                <br>
577
                                             </td>
578
                                          </tr>
579
                                          <tr>
580
                                             <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
581
                                          </tr>
582
                                       </form>
583
                                    </table>
584
                                    <span class="style3">
585
                                        Forgot your <a href="mailto:<%=ADMIN_EMAIL%>?subject=Request for Password Reset" class="body_link"> password</a>?<br><br>
586
                                    </span>
587
                                 <%Else%>
588
                                    <table width="120" border="0" cellspacing="0" cellpadding="0">
589
                                       <tr>
590
                                          <td class="form_txt" nowrap>G'day <b><%=Format_Full_Name( objAccessControl.FullName )%></b>!</td>
591
                                       </tr>
592
                                       <tr>
593
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
594
                                       </tr>
595
                                       <tr>
596
                                          <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
597
                                       </tr>
598
                                       <tr>
599
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
600
                                       </tr>
601
                                       <tr>
602
                                          <td class="form_txt">Options below are shortcuts to your account.</td>
603
                                       </tr>
604
                                       <tr>
605
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
606
                                       </tr>
607
                                    </table>
608
                                    <br>
609
                                    <!--#include file="members_menu_def.asp"-->
610
                                    <%Call Member_Menu( empty )%>
611
                                 <%End If%>
612
                                 <img src="images/h_trsp_dot.gif" width="140" height="10">
613
                              </td>
614
                           </tr>
615
                        </table>
616
                     </td>
617
                  </tr>
618
               </table>
619
            </td>
620
            <td width="100%">&nbsp;</td>
621
         </tr>
622
         <tr>
623
            <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>
624
            <td>&nbsp;</td>
625
         </tr>
626
      </table>
627
      <!-- FOOTER -->
628
      <div align="left">
629
         <!--#include file="_footer.asp"-->
630
      </div>
631
   </body>
119 ghuddy 632
</html>