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
%>
46
<html>
125 ghuddy 47
   <head>
48
      <title>Release Manager</title>
49
      <meta http-equiv="Pragma" content="no-cache">
50
      <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
51
      <link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
52
      <link rel="stylesheet" href="images/navigation.css" type="text/css">
53
      <script language="JavaScript" src="images/common.js"></script>
54
      <script language="JavaScript" src="scripts/remote_scripting.js"></script>
55
      <!-- TIPS -->
56
      <script language="JavaScript" src="images/tipster.js"></script>
57
      <script language="JavaScript" src="images/_help_tips.js"></script>
58
      <!-- DROPDOWN MENUS -->
59
      <!--#include file="_menu_def.asp"-->
60
      <script language="JavaScript1.2" src="images/popup_menu.js"></script>
61
      <script language="JavaScript" type="text/javascript">
62
      <!--
119 ghuddy 63
 
125 ghuddy 64
      function RequestUserWip( paramString, rowId ){
65
         var requestURL = 'RequestUserWip.asp';
119 ghuddy 66
 
125 ghuddy 67
         // Show div
68
         ToggleDisplay( 'DIVWIP_'+ rowId, 'IMG_EXPAND_WIP_' + rowId, 'IMG_COLLAPSE_WIP_' + rowId );
119 ghuddy 69
 
125 ghuddy 70
         // Set ajax divname
71
         ajaxdivname = 'DIVWIP_'+ rowId;
119 ghuddy 72
 
125 ghuddy 73
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
74
         {
75
            //Append the name to search for to the requestURL
76
            var url = requestURL + paramString;
119 ghuddy 77
 
125 ghuddy 78
            //Create the xmlHttp object to use in the request
79
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
80
            // This is non-blocking (asynchronous)
81
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
119 ghuddy 82
 
125 ghuddy 83
            //Send the xmlHttp get to the specified url
84
            xmlHttp_Get(xmlHttp, url);
85
         }
86
      }
119 ghuddy 87
 
125 ghuddy 88
      function RequestProjectRelease( paramString, rowId ){
89
         var requestURL = 'RequestProjectRelease.asp';
119 ghuddy 90
 
125 ghuddy 91
         // Show div
92
         ToggleDisplay( 'DIVPROJ_'+ rowId, 'IMG_EXPAND_PROJ_' + rowId, 'IMG_COLLAPSE_PROJ_' + rowId );
119 ghuddy 93
 
125 ghuddy 94
         // Set ajax divname
95
         ajaxdivname = 'DIVPROJ_'+ rowId;
96
 
97
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
98
         {
99
            //Append the name to search for to the requestURL
100
            var url = requestURL + paramString;
101
 
102
            //Create the xmlHttp object to use in the request
103
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
104
            // This is non-blocking (asynchronous)
105
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
106
 
107
            //Send the xmlHttp get to the specified url
108
            xmlHttp_Get(xmlHttp, url);
109
         }
110
      }
111
 
112
      function RequestReleasePackages( paramString, rowId ){
113
         var requestURL = 'RequestReleasePackages.asp';
114
 
115
         // Show div
116
         ToggleDisplay( 'DIVRTAG_'+ rowId, 'IMG_EXPAND_RTAG_' + rowId, 'IMG_COLLAPSE_RTAG_' + rowId );
117
 
118
         // Set ajax divname
119
         ajaxdivname = 'DIVRTAG_'+ rowId;
120
 
121
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
122
         {
123
            //Append the name to search for to the requestURL
124
            var url = requestURL + paramString;
125
 
126
            //Create the xmlHttp object to use in the request
127
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
128
            // This is non-blocking (asynchronous)
129
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
130
 
131
            //Send the xmlHttp get to the specified url
132
            xmlHttp_Get(xmlHttp, url);
133
         }
134
      }
135
 
136
      function RequestTop10ChangesInLastWeek( paramString, rowId ){
137
         var requestURL = 'RequestTop10Changes.asp';
138
 
139
         // Show div
140
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_1_WEEK', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_1_WEEK', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_1_WEEK' );
141
 
142
         // Set ajax divname
143
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_1_WEEK';
144
 
145
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
146
         {
147
            //Append the name to search for to the requestURL
148
            var url = requestURL + paramString;
149
 
150
            //Create the xmlHttp object to use in the request
151
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
152
            // This is non-blocking (asynchronous)
153
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
154
 
155
            //Send the xmlHttp get to the specified url
156
            xmlHttp_Get(xmlHttp, url);
157
         }
158
      }
159
 
160
      function RequestTop10ChangesInLastMonth( paramString, rowId ){
161
         var requestURL = 'RequestTop10Changes.asp';
162
 
163
         // Show div
164
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_1_MONTH', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_1_MONTH', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_1_MONTH' );
165
 
166
         // Set ajax divname
167
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_1_MONTH';
168
 
169
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
170
         {
171
            //Append the name to search for to the requestURL
172
            var url = requestURL + paramString;
173
 
174
            //Create the xmlHttp object to use in the request
175
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
176
            // This is non-blocking (asynchronous)
177
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
178
 
179
            //Send the xmlHttp get to the specified url
180
            xmlHttp_Get(xmlHttp, url);
181
         }
182
      }
183
 
184
      function RequestTop10ChangesInLast3Months( paramString, rowId ){
185
         var requestURL = 'RequestTop10Changes.asp';
186
 
187
         // Show div
188
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_TOP10_3_MONTHS', 'IMG_EXPAND_RTAG_' + rowId + '_TOP10_3_MONTHS', 'IMG_COLLAPSE_RTAG_' + rowId + '_TOP10_3_MONTHS' );
189
 
190
         // Set ajax divname
191
         ajaxdivname = 'DIVRTAG_'+ rowId + '_TOP10_3_MONTHS';
192
 
193
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
194
         {
195
            //Append the name to search for to the requestURL
196
            var url = requestURL + paramString;
197
 
198
            //Create the xmlHttp object to use in the request
199
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
200
            // This is non-blocking (asynchronous)
201
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
202
 
203
            //Send the xmlHttp get to the specified url
204
            xmlHttp_Get(xmlHttp, url);
205
         }
206
      }
207
 
208
      function RequestPreviousPackageVersions( paramString, rowId ){
209
         var requestURL = 'RequestPackageVersionHistoryMetrics.asp';
210
 
211
         // Show div
212
         ToggleDisplay( 'DIVRTAG_'+ rowId + '_PREV_PKG_VERS', 'IMG_EXPAND_RTAG_' + rowId + '_PREV_PKG_VERS', 'IMG_COLLAPSE_RTAG_' + rowId + '_PREV_PKG_VERS' );
213
 
214
         // Set ajax divname
215
         ajaxdivname = 'DIVRTAG_'+ rowId + '_PREV_PKG_VERS';
216
 
217
         if ( MM_findObj( ajaxdivname ).innerHTML == '<%=enumLOADING%>')
218
         {
219
            //Append the name to search for to the requestURL
220
            var url = requestURL + paramString;
221
 
222
            //Create the xmlHttp object to use in the request
223
            //stateChangeHandler will fire when the state has changed, i.e. data is received back
224
            // This is non-blocking (asynchronous)
225
            xmlHttp = GetXmlHttpObject(stateChangeHandler);
226
 
227
            //Send the xmlHttp get to the specified url
228
            xmlHttp_Get(xmlHttp, url);
229
         }
230
      }
231
 
232
      //-->
233
      </script>
234
      <style type="text/css">
235
      <!--
236
      .style1 {
237
         font-family: Arial, Helvetica, sans-serif;
238
         font-size: 12px;
239
      }
240
      .style3 {
241
         font-size: 11px;
242
         font-family: tahoma, sans-serif;
243
      }
244
      -->
245
      </style>
246
   </head>
247
   <!-- TIPS LAYERS -------------------------------------->
248
   <div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
249
 
157 ghuddy 250
   <body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onLoad="login.user_name.focus();">
125 ghuddy 251
      <!-- MENU LAYERS -------------------------------------->
252
      <div id="popmenu" class="menuskin" onmouseover="clearhidemenu();highlightmenu(event,'on')"
253
         onmouseout="highlightmenu(event,'off');dynamichide(event)">
254
      </div>
255
      <!-- HEADER -->
2365 dpurdie 256
      <!--#include file="_header.asp"-->
125 ghuddy 257
      <!-- BODY ---->
258
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
259
         <tr>
260
            <td width="1%" background="images/bg_home_orange.gif" valign="top">
5102 dpurdie 261
            <!--#include file="_front_explorer.asp"-->
125 ghuddy 262
            </td>
263
            <td rowspan="2" width="1%" valign="top">
264
               <table width="100%" border="0" cellspacing="0" cellpadding="0">
265
                  <tr>
266
                     <td width="1%">
267
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
268
                           <tr>
269
                              <td colspan="3">
270
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
271
                                    <tr>
272
                                       <td background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_left.jpg" width="436" height="88"></td>
273
                                       <td align="right" background="images/bg_comp_gear.gif"><img src="images/img_comp_gear_right.jpg" width="70" height="88"></td>
274
                                    </tr>
275
                                 </table>
276
                              </td>
277
                              <td background="images/bg_action_norm.gif"></td>
278
                              <td background="images/bg_action_norm.gif" valign="top" align="center"><img src="images/h_trsp_dot.gif" width="150" height="10"></td>
279
                           </tr>
280
                           <tr>
281
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="518"></td>
282
                              <td width="100%" valign="top" class="body_txt">
283
                                 <br>
284
                                 <!-- MESSAGE BOARD ---------------------------------------------->
285
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
286
                                    <tr>
287
                                       <td colspan="2" class="body_sect">Message Board</td>
288
                                    </tr>
289
                                    <tr>
290
                                       <td align="center" width="1%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">Due Date</td>
291
                                       <td width="100%" background="images/bg_form_lightbluedark.gif" align="right">
292
                                          <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>
293
                                       </td>
294
                                    </tr>
295
                                    <%
296
                                    Set rsTemp = OraDatabase.DbCreateDynaset( Get_Messages, cint(0))
297
                                    If rsTemp.RecordCount < 1 Then Response.write "<tr><td colspan='2' class='msgb_item'>&nbsp;No messages at this time.</td></tr>"
298
                                    While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
299
                                       If rsTemp.Fields("due_date") <> "" Then
300
                                          msgScript = "schedule"
301
                                       Else
302
                                          msgScript = "memo"
303
                                       End If
304
                                       %>
305
                                       <tr>
306
                                          <td align="center" valign="top" nowrap>
307
                                             <%If rsTemp.Fields("due_date") <> "" Then%>
308
                                             <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">
309
                                             <%=EuroDate(rsTemp.Fields("due_date"))%>
310
                                             <br>
311
                                             <img src="images/i_clock.gif" width="14" height="14" border="0">
312
                                             </a>
313
                                             <%Else%>
314
                                             <img src="images/h_trsp_dot.gif" width="1" height="25">
315
                                             <%End If%>
316
                                          </td>
317
                                          <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>
318
                                          </td>
319
                                       </tr>
320
                                       <tr>
321
                                          <td colspan="2" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
322
                                       </tr>
323
                                       <%
324
                                       rsTemp.MoveNext
325
                                      WEnd
326
                                    rsTemp.Close
327
                                    Set rsTemp = nothing
328
                                    %>
329
                                    <tr>
330
                                       <td><img src="images/h_trsp_dot.gif" width="80" height="1"></td>
331
                                       <td align="right"></td>
332
                                    </tr>
333
                                 </table>
334
                                 <!-- MESSAGE BOARD END ---------------------------------------------->
335
                                 <br>
336
                                 <br>
337
                                 <!-- WORK IN PROGRESS ---------------------------------------------->
338
                                 <table width="100%" border="0" cellspacing="1" cellpadding="1">
339
                                    <tr>
340
                                       <td colspan="4" class="body_sect">Work In Progress</td>
341
                                    </tr>
342
                                    <tr>
343
                                       <td width="40%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;User</td>
344
                                       <td width="50%" nowrap class="body_txt" background="images/bg_form_lightbluedark.gif">&nbsp;Package Count</td>
345
                                       <td width="1%" background="images/bg_form_lightbluedark.gif"><img src="images/h_trsp_dot.gif" width="1" height="17"></td>
346
                                    </tr>
347
                                    <!-- PERSONAL WORK IN PROGRESS  -->
348
                                    <%
349
                                    If objAccessControl.UserLogedIn Then
350
 
351
                                       OraDatabase.Parameters.Add "USER_ID", objAccessControl.UserId, ORAPARM_INPUT, ORATYPE_NUMBER
352
 
353
                                       Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("WorkInProgressByUser.sql"), cint(0))
354
 
355
                                       OraDatabase.Parameters.Remove "USER_ID"
356
 
357
                                       userId = rsTemp("user_id")
358
                                       %>
359
                                       <tr>
360
                                          <td nowrap>
361
                                             <span id="IMG_EXPAND_WIP_<%=userId%>" style="display:block;">
362
                                                <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>
363
                                             </span>
364
                                             <span id="IMG_COLLAPSE_WIP_<%=userId%>" style="display:none;">
365
                                                <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>
366
                                             </span>
367
                                          </td>
368
                                          <td nowrap class="body_txt"><%=rsTemp("counter")%></td>
369
                                          <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>
370
                                          </td>
371
                                       </tr>
372
                                       <tr>
373
                                          <td nowrap class="body_txt" colspan="3">
374
                                             <div id="DIVWIP_<%=userId%>" style="display:none;"><%=enumLOADING%></div>
375
                                          </td>
376
                                       </tr>
377
                                       <tr>
378
                                          <td colspan="3" background="images/bg_form_lightbluedark_line.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
379
                                       </tr>
380
                                       <%
381
                                       rsTemp.Close
382
                                       Set rsTemp = nothing
383
                                    End If%>
384
                                 </table>
385
                                 <!--  WORK IN PROGRESS END ------------------------------------------>
386
                                 <br>
387
                                 <br>
388
                                 <!-- RELEASE METRICS -------------------------------------------------------->
389
                                 <table width="100%" border="0" cellspacing="0" cellpadding="0">
390
                                    <tr>
391
                                       <td colspan="4" class="body_sect">Release Metrics</td>
392
                                    </tr>
393
                                    <tr>
394
                                       <td colspan="2">
395
                                          <table width="100%" border="0" cellspacing="1" cellpadding="1">
396
                                             <tr>
397
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Project</td>
398
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Autobuilt<br>Release</td>
399
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Last Autobuild<br>Completed</td>
400
                                                <td nowrap class="body_txt" valign="top" background="images/bg_form_lightbluedark.gif">Autobuilt Packages</td>
401
                                             </tr>
402
                                             <%
403
                                             Set rsQry = OraDatabase.DbCreateDynaset( GetQuery("ProjectsWithMetrics.sql"), cint(0))
404
 
405
                                             While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
406
                                                OraDatabase.Parameters.Add "PROJ_ID", rsQry("proj_id"), ORAPARM_INPUT, ORATYPE_NUMBER
407
 
408
                                                Set rsTemp = OraDatabase.DbCreateDynaset( GetQuery("ReleaseMetrics.sql"), cint(0))
409
 
410
                                                If rsTemp.RecordCount > 0 Then
411
                                                   Auto=FormatPercent(rsTemp("autobuilt")/rsTemp("total_packages"), 2)
412
                                                End If
413
                                                %>
414
                                                <tr>
415
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt">
416
                                                      <span id="IMG_EXPAND_PROJ_<%=rsQry("proj_id")%>" style="display:block;">
417
                                                         <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>
418
                                                      </span>
419
                                                      <span id="IMG_COLLAPSE_PROJ_<%=rsQry("proj_id")%>" style="display:none;">
420
                                                         <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>
421
                                                      </span>
422
                                                   </td>
423
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("rtag_name")%></td>
424
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("last_build_time")%></td>
425
                                                   <%If rsTemp.RecordCount > 0 Then%>
426
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"><%=rsTemp("autobuilt")%>/<%=rsTemp("total_packages")%>
427
                                                      (<%=Auto%>)</td>
428
                                                   <%Else%>
429
                                                   <td background="images/bg_form_lightgray.gif" nowrap class="body_txt"></td>
430
                                                   <%End If%>
431
                                                </tr>
432
                                                <tr>
433
                                                   <td nowrap class="body_txt" colspan="4">
434
                                                      <div id="DIVPROJ_<%=rsQry("proj_id")%>" style="display:none;"><%=enumLOADING%></div>
435
                                                   </td>
436
                                                </tr>
437
                                                <tr>
438
                                                   <td colspan="5" background="images/bg_form_lightbluedark_line.gif"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
439
                                                </tr>
440
                                                <%
441
                                                OraDatabase.Parameters.Remove "PROJ_ID"
442
                                                rsTemp.Close()
443
                                                Set rsTemp = Nothing
444
                                                rsQry.MoveNext
445
                                             Wend
446
 
447
                                             rsQry.Close()
448
                                             Set rsQry = Nothing
449
                                             %>
450
                                          </table>
451
                                       </td>
452
                                    </tr>
453
                                 </table>
454
                                 <!-- DASH BOARD END ---------------------------------------------------->
455
                              </td>
456
                              <td width="1%"><img src="images/h_trsp_dot.gif" width="15" height="10"></td>
457
                              <td background="images/bg_action_norm.gif" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="10"></td>
458
                              <td background="images/bg_bage.gif" width="1%" valign="top" align="center">
459
                                 <br>
460
                                 <%If NOT objAccessControl.UserLogedIn Then%>
461
                                    <table width="100" border="0" cellspacing="0" cellpadding="0">
462
                                       <form name="login" method="post" action="Login.asp">
463
                                          <tr>
464
                                             <td class="form_field_lg">Members</td>
465
                                          </tr>
466
                                          <tr>
467
                                             <td class="form_item">Username</td>
468
                                          </tr>
469
                                          <tr>
3959 dpurdie 470
                                             <td><input type="text" name="user_name" class="form_item" size="20"></td>
125 ghuddy 471
                                          </tr>
472
                                          <tr>
473
                                             <td class="form_item">Password</td>
474
                                          </tr>
475
                                          <tr>
476
                                             <td>
3959 dpurdie 477
                                                <input type="password" name="user_password" class="form_item" size="20" <%If objAccessControl.isDevSystem Then Response.write"disabled"%>>
478
                                                <input type="hidden" name="rfile" value="index.asp">
125 ghuddy 479
                                                <input type="hidden" name="action" value="true">
480
                                             </td>
481
                                          </tr>
482
                                          <tr>
483
                                             <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
484
                                          </tr>
485
                                          <tr>
3959 dpurdie 486
                                             <td align="center">
487
                                                <input type="submit" name="Submit" value="Login" class="form_btn" onclick="MM_validateForm('user_name','Username','R'<%If NOT objAccessControl.isDevSystem Then Response.write",'user_password','Password','R'"%>);return document.MM_returnValue">
125 ghuddy 488
                                                <br>
489
                                                <br>
490
                                             </td>
491
                                          </tr>
492
                                          <tr>
493
                                             <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
494
                                          </tr>
495
                                          <tr>
496
                                             <td class="form_field_lg"><br>New Members</td>
497
                                          </tr>
498
                                          <tr>
499
                                             <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>
500
                                                <br>
501
                                             </td>
502
                                          </tr>
503
                                          <tr>
504
                                             <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
505
                                          </tr>
506
                                       </form>
507
                                    </table>
508
                                    <span class="style3">
509
                                        Forgot your <a href="mailto:<%=ADMIN_EMAIL%>?subject=Request for Password Reset" class="body_link"> password</a>?<br><br>
510
                                    </span>
511
                                 <%Else%>
512
                                    <table width="120" border="0" cellspacing="0" cellpadding="0">
513
                                       <tr>
514
                                          <td class="form_txt" nowrap>G'day <b><%=Format_Full_Name( objAccessControl.FullName )%></b>!</td>
515
                                       </tr>
516
                                       <tr>
517
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
518
                                       </tr>
519
                                       <tr>
520
                                          <td class="form_field_lg" bgcolor="#CAC5B8"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
521
                                       </tr>
522
                                       <tr>
523
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
524
                                       </tr>
525
                                       <tr>
526
                                          <td class="form_txt">Options below are shortcuts to your account.</td>
527
                                       </tr>
528
                                       <tr>
529
                                          <td><img src="images/h_trsp_dot.gif" width="10" height="10"></td>
530
                                       </tr>
531
                                    </table>
532
                                    <br>
533
                                    <!--#include file="members_menu_def.asp"-->
534
                                    <%Call Member_Menu( empty )%>
535
                                 <%End If%>
536
                                 <img src="images/h_trsp_dot.gif" width="140" height="10">
537
                              </td>
538
                           </tr>
539
                        </table>
540
                     </td>
541
                  </tr>
542
               </table>
543
            </td>
544
            <td width="100%">&nbsp;</td>
545
         </tr>
546
         <tr>
547
            <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>
548
            <td>&nbsp;</td>
549
         </tr>
550
      </table>
551
      <!-- FOOTER -->
552
      <div align="left">
553
         <!--#include file="_footer.asp"-->
554
      </div>
555
   </body>
119 ghuddy 556
</html>