Subversion Repositories DevTools

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
5357 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
Option explicit
4
Response.Expires = 0   ' always load the page, dont store
5
%>
6
<%
7
'=====================================================
8
'              Unit Test
9
'=====================================================
10
%>
11
<!--#include file="common/conf.asp"-->
12
<!--#include file="common/globals.asp"-->
13
<!--#include file="common/formating.asp"-->
14
<!--#include file="common/qstr.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<!--#include file="common/common_dbedit.asp"-->
17
<!--#include file="_tabs.asp"-->
18
<!--#include file="common/_popup_window_common.asp"-->
19
<%
20
' Set rfile parameter. This is a return page after Login
21
Call objPMod.StoreParameter ( "rfile", "fixed_issues.asp" )
22
'------------ ACCESS CONTROL ------------------
23
%>
24
<!--#include file="_access_control_login.asp"-->
25
<!--#include file="_access_control_general.asp"-->
26
<!--#include file="_access_control_project.asp"-->
27
<%
28
'------------ Variable Definition -------------
29
Dim parPv_id
30
Dim parTest_Type_id
31
Dim rsQry
32
Dim sPkgName
33
Dim sPkgVersion
34
Dim isDLocked
35
Dim criticalSectionIsEditable
36
'------------ Constants Declaration -----------
37
'------------ Variable Init -------------------
38
parPv_id = Request("pv_id")
39
parTest_Type_id = Request("test_type_id")
40
If parTest_Type_id = "" Then parTest_Type_id = enumTEST_TYPE_INTERACTIVE
41
'----------------------------------------------
42
%>
43
<%
44
Function SQL_GetTestTypes ( )
45
   SQL_GetTestTypes = _
46
   "   SELECT tt.TEST_TYPE_ID, tt.TEST_TYPE_NAME"&_
47
   "    FROM TEST_TYPES tt"&_
48
   "   WHERE NOT tt.DISPLAY_ORDER IS NULL "&_
49
   "   ORDER BY tt.DISPLAY_ORDER"
50
End Function
51
%>
52
<%
53
'------------ Action Requirements -------------------
54
Call Get_Pkg_Short_Info(  Request("pv_id"), NULL, sPkgName, sPkgVersion, NULL, NULL, isDLocked )
55
criticalSectionIsEditable = Is_Critical_Section_Editable ( isDLocked )
56
 
57
%>
58
<html>
59
<head>
60
<title>Release Manager</title>
61
<link rel="shortcut icon" href="<%=FavIcon%>"/>
62
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
63
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
64
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
65
<link rel="stylesheet" href="images/navigation.css" type="text/css">
66
<script language="JavaScript" src="images/common.js"></script>
67
<!--#include file="_menu_def.asp"-->
68
<script language="JavaScript" type="text/javascript">
69
<!--
70
function ShowField()
71
{
72
   if ( MM_findObj("test_type_id").value == 7 ) {
73
      MM_findObj("DIV_REG_TEST").style.display = "none";
74
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "block";
75
 
76
   } else {
77
 
78
      MM_findObj("DIV_REG_TEST").style.display = "block";
79
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "none";
80
 
81
      if ( MM_findObj("test_type_id").value == 5 ) {
82
         // Switch on URL attachment
83
         MM_findObj("spanResultsAttachment").style.display = "none";
84
         MM_findObj("spanResultsUrl").style.display = "block";
85
      } else {
86
         // Switch on File attachment
87
         MM_findObj("spanResultsAttachment").style.display = "block";
88
         MM_findObj("spanResultsUrl").style.display = "none";
89
 
90
      }
91
   }
92
}
93
 
94
//-->
95
</script>
96
<!-- TIPS -->
97
<script language="JavaScript" src="images/tipster.js"></script>
98
<script language="JavaScript" src="images/_help_tips.js"></script>
99
</head>
100
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();ShowField();">
101
<!-- TIPS LAYERS -------------------------------------->
102
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
103
<!----------------------------------------------------->
104
<form action="_new_unit_test.asp" method="post" enctype="multipart/form-data" name="unittest" onSubmit="MM_validateForm('completion_date','Completion Date','RisDate','test_summary','Test Summary','maxLength:4000');return document.MM_returnValue;">
105
   <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
106
      <tr>
107
         <td width="1%" background="images/lbox_bg_orange.gif"><img src="images/i_unit_test_off.gif" width="18" height="25" hspace="5" border="0"></td>
108
         <td width="1%" background="images/lbox_bg_blue.gif" nowrap class="wform_ttl">&nbsp;Unit  Test</td>
109
         <td width="100%" background="images/lbox_bg_blue.gif" align="right" nowrap class="wform_ttl"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Uploading... Please Wait!</SPAN>&nbsp;
110
            <input type="submit" name="btn" value="Submit" class="form_btn_comp">
111
            <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="self.close()">
112
         </td>
113
         <td background="images/lbox_bg_blue.gif" align="right" width="1%" nowrap><img src="images/h_trsp_dot.gif" width="5" height="22"></td>
114
      </tr>
115
      <tr>
116
         <td height="100%" width="1%">&nbsp;</td>
117
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
118
            <table width="100%"  border="0" cellspacing="0" cellpadding="0">
119
               <tr>
120
                  <td width="1%" nowrap class="sublbox_hitem"><img src="images/h_trsp_dot.gif" width="10" height="30">
121
                     <%If Request("save_stat") <> "" Then%>
122
                        Saving complete.
123
                     <%End If%>
124
                  </td>
125
                  <td width="100%" align="right" valign="bottom">
126
                     <!-- TABS ------------------------------------->
127
                     <%Call Generate_Tab_Menu ( TABarray6D, "Unit Test Details", "blue" )%>
128
                  </td>
129
               </tr>
130
               <tr>
131
                  <td background="images/lbox_bg_blue.gif"></td>
132
                  <td background="images/lbox_bg_blue.gif">&nbsp;</td>
133
               </tr>
134
            </table>
135
            <table width="100%" border="0" cellspacing="1" cellpadding="2">
136
               <tr>
137
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Test Type <%=Quick_Help ( "ut_test_type" )%></td>
138
               </tr>
139
               <tr>
140
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
141
                     <select name="test_type_id" class="form_item" onchange="ShowField();">
142
                        <%
143
                        Set rsQry = OraDatabase.CreateDynaset( SQL_GetTestTypes(), cint(0))
144
 
145
                        While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
146
                           If (isDLocked <> "Y") OR _
147
                              (rsQry("test_type_id") <> CStr(enumTEST_TYPE_AUTOBUILD_UTF)) OR _
148
                              ((rsQry("test_type_id") = CStr(enumTEST_TYPE_AUTOBUILD_UTF)) AND (isDLocked = "Y" AND criticalSectionIsEditable)) Then
149
                              %>
150
                              <option value="<%=rsQry("test_type_id")%>" <%If CInt(parTest_Type_id) = CInt(rsQry("test_type_id")) Then%>SELECTED<%End If%>><%=rsQry("test_type_name")%></option>
151
                              <%
152
                           End If
153
                           rsQry.MoveNext
154
                        WEnd
155
 
156
                        rsQry.Close
157
                        Set rsQry = Nothing
158
                        %>
159
                     </select>
160
                  </td>
161
               </tr>
162
            </table>
163
            <br>
164
 
165
            <DIV id="DIV_REG_TEST" style="display:block;">
166
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
167
                  <tr>
168
                     <td width="1%">&nbsp;</td>
169
                     <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
170
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
171
                        <SPAN name="spanResultsAttachment" id="spanResultsAttachment">
172
                           Results File Attachment <br><input name="results_file" type="file" class="form_item" size="65" class="form_txt">
173
                        </SPAN>
174
                        <SPAN name="spanResultsUrl" id="spanResultsUrl" style="display:none;">
175
                           Results URL <br><input name="results_url" type="text" class="form_item" id="results_url" size="80" maxlength="2000" class="form_txt" value="<%=dpkg_archiveURL & sPkgName &"/"& sPkgVersion &"/doc/"%>"><br>
176
                           <span class="rep_small">NOTE: Root dpkg_archive URL is <%=dpkg_archiveURL%></span>
177
                        </SPAN>
178
                     </td>
179
                  </tr>
180
                  <tr>
181
                     <td>&nbsp;</td>
182
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
183
                        Passed
184
                        <br>
185
                        # / Total <%=Quick_Help ( "ut_passed" )%>
186
                     </td>
187
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
188
                        <input name="numof_test" type="text" class="form_item" id="numof_test" size="20">
189
                     </td>
190
                  </tr>
191
                  <tr>
192
                     <td>&nbsp;</td>
193
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Completion Date </td>
194
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
195
                        <input name="completion_date" type="text" class="form_item" id="completion_date" value="<%=EuroDate (Date) %>" size="20" maxlength="10">
196
                     </td>
197
                  </tr>
198
                  <tr>
199
                     <td width="1%">&nbsp;</td>
200
                     <td nowrap width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Test Summary <%=Quick_Help ( "ut_summary" )%></td>
201
                     <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
202
                        <textarea cols="80" rows="20" name="test_summary" class="form_item" id="test_summary"></textarea>
203
                     </td>
204
                  </tr>
205
                  <tr>
206
                     <td width="1%">&nbsp;</td>
207
                     <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
208
                     <td nowrap width="100%"> <p>&nbsp;</p></td>
209
                  </tr>
210
               </table>
211
            </DIV>
212
 
213
            <DIV id="DIV_AUTOBUILD_TEST" style="display:none;">
214
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
215
                  <tr>
216
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
217
                        Refer to <a href="<%=BMS_QUALITY_URL%>" class="txt_linked" target="_blank">VIX Quality Management System</a>
218
                        <p>Navigate to <a href="<%=DocBrowseLink%>?pgid=2&pid=51&cid=1426" class="txt_linked" target="_blank">Technical Solution Process Area</a> and read documents related to Unit Testing. ie:<ul>
219
                        <li><a href="<%=DocRepositiryLink%>bms-00369" class="txt_linked" target="_blank">Unit Test Guidelines</a> [BMS-00369]
220
                        <li><a href="<%=DocRepositiryLink%>techgp-00054" class="txt_linked" target="_blank">Unit Testing at ERG</a>  [TECHGP-00054]
221
                        </ul>
222
                     </td>
223
                  </tr>
224
               </table>
225
            </DIV>
226
 
227
 
228
         </td>
229
      </tr>
230
      <tr>
231
         <td height="1%" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="5"></td>
232
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/lbox_bg_blue.gif"></td>
233
      </tr>
234
   </table>
235
   <input type="hidden" name="pv_id" value="<%=parPv_id%>">
236
   <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
237
</form>
238
</body>
239
</html>
240
 
241
 
242
<!-- DESTRUCTOR ------->
243
<!--#include file="common/destructor.asp"-->