Subversion Repositories DevTools

Rev

Rev 5590 | Rev 6371 | Go to most recent revision | Details | Compare with Previous | 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>
5590 dpurdie 67
<script language="JavaScript" src="images/common.js"></script>
5357 dpurdie 68
<!--#include file="_menu_def.asp"-->
69
<script language="JavaScript" type="text/javascript">
70
<!--
71
function ShowField()
72
{
73
   if ( MM_findObj("test_type_id").value == 7 ) {
74
      MM_findObj("DIV_REG_TEST").style.display = "none";
75
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "block";
76
 
77
   } else {
78
 
79
      MM_findObj("DIV_REG_TEST").style.display = "block";
80
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "none";
81
 
82
      if ( MM_findObj("test_type_id").value == 5 ) {
83
         // Switch on URL attachment
84
         MM_findObj("spanResultsAttachment").style.display = "none";
85
         MM_findObj("spanResultsUrl").style.display = "block";
86
      } else {
87
         // Switch on File attachment
88
         MM_findObj("spanResultsAttachment").style.display = "block";
89
         MM_findObj("spanResultsUrl").style.display = "none";
90
 
91
      }
92
   }
5590 dpurdie 93
 
94
   // Update iframe size
95
   parent.resizeIframe();
5357 dpurdie 96
}
97
 
98
//-->
99
</script>
100
<!-- TIPS -->
101
<script language="JavaScript" src="images/tipster.js"></script>
102
<script language="JavaScript" src="images/_help_tips.js"></script>
103
</head>
104
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();ShowField();">
105
<!-- TIPS LAYERS -------------------------------------->
106
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
107
<!----------------------------------------------------->
5590 dpurdie 108
<form class="form_tight" 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;">
109
   <table border="0" cellspacing="0" cellpadding="2">
5357 dpurdie 110
      <tr>
111
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
112
            <table width="100%"  border="0" cellspacing="0" cellpadding="0">
113
               <tr>
114
                  <td width="1%" nowrap class="sublbox_hitem"><img src="images/h_trsp_dot.gif" width="10" height="30">
115
                     <%If Request("save_stat") <> "" Then%>
116
                        Saving complete.
117
                     <%End If%>
118
                  </td>
119
                  <td width="100%" align="right" valign="bottom">
120
                     <!-- TABS ------------------------------------->
121
                     <%Call Generate_Tab_Menu ( TABarray6D, "Unit Test Details", "blue" )%>
122
                  </td>
123
               </tr>
124
               <tr>
125
                  <td background="images/lbox_bg_blue.gif"></td>
126
                  <td background="images/lbox_bg_blue.gif">&nbsp;</td>
127
               </tr>
128
            </table>
129
            <table width="100%" border="0" cellspacing="1" cellpadding="2">
130
               <tr>
131
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Test Type <%=Quick_Help ( "ut_test_type" )%></td>
132
               </tr>
133
               <tr>
134
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
135
                     <select name="test_type_id" class="form_item" onchange="ShowField();">
136
                        <%
137
                        Set rsQry = OraDatabase.CreateDynaset( SQL_GetTestTypes(), cint(0))
138
 
139
                        While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
140
                           If (isDLocked <> "Y") OR _
141
                              (rsQry("test_type_id") <> CStr(enumTEST_TYPE_AUTOBUILD_UTF)) OR _
142
                              ((rsQry("test_type_id") = CStr(enumTEST_TYPE_AUTOBUILD_UTF)) AND (isDLocked = "Y" AND criticalSectionIsEditable)) Then
143
                              %>
144
                              <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>
145
                              <%
146
                           End If
147
                           rsQry.MoveNext
148
                        WEnd
149
 
150
                        rsQry.Close
151
                        Set rsQry = Nothing
152
                        %>
153
                     </select>
154
                  </td>
155
               </tr>
156
            </table>
157
            <br>
158
 
159
            <DIV id="DIV_REG_TEST" style="display:block;">
160
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
161
                  <tr>
162
                     <td width="1%">&nbsp;</td>
163
                     <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
164
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
165
                        <SPAN name="spanResultsAttachment" id="spanResultsAttachment">
166
                           Results File Attachment <br><input name="results_file" type="file" class="form_item" size="65" class="form_txt">
167
                        </SPAN>
168
                        <SPAN name="spanResultsUrl" id="spanResultsUrl" style="display:none;">
169
                           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>
170
                           <span class="rep_small">NOTE: Root dpkg_archive URL is <%=dpkg_archiveURL%></span>
171
                        </SPAN>
172
                     </td>
173
                  </tr>
174
                  <tr>
175
                     <td>&nbsp;</td>
176
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
177
                        Passed
178
                        <br>
179
                        # / Total <%=Quick_Help ( "ut_passed" )%>
180
                     </td>
181
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
182
                        <input name="numof_test" type="text" class="form_item" id="numof_test" size="20">
183
                     </td>
184
                  </tr>
185
                  <tr>
186
                     <td>&nbsp;</td>
187
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Completion Date </td>
188
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
189
                        <input name="completion_date" type="text" class="form_item" id="completion_date" value="<%=EuroDate (Date) %>" size="20" maxlength="10">
190
                     </td>
191
                  </tr>
192
                  <tr>
193
                     <td width="1%">&nbsp;</td>
194
                     <td nowrap width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Test Summary <%=Quick_Help ( "ut_summary" )%></td>
195
                     <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
196
                        <textarea cols="80" rows="20" name="test_summary" class="form_item" id="test_summary"></textarea>
197
                     </td>
198
                  </tr>
199
               </table>
200
            </DIV>
201
 
202
            <DIV id="DIV_AUTOBUILD_TEST" style="display:none;">
203
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
204
                  <tr>
205
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
206
                        Refer to <a href="<%=BMS_QUALITY_URL%>" class="txt_linked" target="_blank">VIX Quality Management System</a>
207
                        <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>
208
                        <li><a href="<%=DocRepositiryLink%>bms-00369" class="txt_linked" target="_blank">Unit Test Guidelines</a> [BMS-00369]
209
                        <li><a href="<%=DocRepositiryLink%>techgp-00054" class="txt_linked" target="_blank">Unit Testing at ERG</a>  [TECHGP-00054]
210
                        </ul>
211
                     </td>
212
                  </tr>
213
               </table>
214
            </DIV>
215
         </td>
216
      </tr>
217
      <tr>
5590 dpurdie 218
         <td width="100%" align="right" nowrap class="wform_ttl">
219
            <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;
220
            <input type="submit" name="btn" value="Submit" class="form_btn_comp">
221
            <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="parent.closeIFrame();">
222
         </td>
5357 dpurdie 223
      </tr>
224
   </table>
225
   <input type="hidden" name="pv_id" value="<%=parPv_id%>">
226
   <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
227
</form>
228
</body>
229
</html>
230
<!-- DESTRUCTOR ------->
231
<!--#include file="common/destructor.asp"-->