Subversion Repositories DevTools

Rev

Rev 189 | Blame | Compare with Previous | Last modification | View Log | RSS feed

<%@LANGUAGE="VBSCRIPT"%>
<%
Option explicit
Response.Expires = 0   ' always load the page, dont store
%>
<%
'=====================================================
'              Unit Test
'=====================================================
%>
<!--#include file="common/conf.asp"-->
<!--#include file="common/globals.asp"-->
<!--#include file="common/formating.asp"-->
<!--#include file="common/qstr.asp"-->
<!--#include file="common/common_subs.asp"-->
<!--#include file="common/common_dbedit.asp"-->
<!--#include file="_tabs.asp"-->
<!--#include file="common/_popup_window_common.asp"-->
<%
' Set rfile parameter. This is a return page after Login
Call objPMod.StoreParameter ( "rfile", "fixed_issues.asp" )
'------------ ACCESS CONTROL ------------------
%>
<!--#include file="_access_control_login.asp"-->
<!--#include file="_access_control_general.asp"-->
<!--#include file="_access_control_project.asp"-->
<%
'------------ Variable Definition -------------
Dim parPv_id
Dim parTest_Type_id
Dim rsQry
Dim sPkgName
Dim sPkgVersion
Dim isDLocked
Dim criticalSectionIsEditable
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
parPv_id = Request("pv_id")
parTest_Type_id = Request("test_type_id")
If parTest_Type_id = "" Then parTest_Type_id = enumTEST_TYPE_INTERACTIVE
'----------------------------------------------
%>
<%
Function SQL_GetTestTypes ( )
   SQL_GetTestTypes = _
   "   SELECT tt.TEST_TYPE_ID, tt.TEST_TYPE_NAME"&_
   "    FROM TEST_TYPES tt"&_
   "   WHERE NOT tt.DISPLAY_ORDER IS NULL "&_
   "   ORDER BY tt.DISPLAY_ORDER"
End Function
%>
<%
'------------ Action Requirements -------------------
Call Get_Pkg_Short_Info(  Request("pv_id"), NULL, sPkgName, sPkgVersion, NULL, NULL, isDLocked )
criticalSectionIsEditable = Is_Critical_Section_Editable ( isDLocked )

%>
<html>
<head>
<title>Release Manager</title>
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="images/release_manager_style.css" type="text/css">
<link rel="stylesheet" href="images/navigation.css" type="text/css">
<script language="JavaScript" src="images/common.js"></script>
<!--#include file="_menu_def.asp"-->
<script language="JavaScript" type="text/javascript">
<!--
function ShowField()
{
   if ( MM_findObj("test_type_id").value == 7 ) {
      MM_findObj("DIV_REG_TEST").style.display = "none";
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "block";

   } else {

      MM_findObj("DIV_REG_TEST").style.display = "block";
      MM_findObj("DIV_AUTOBUILD_TEST").style.display = "none";

      if ( MM_findObj("test_type_id").value == 5 ) {
         // Switch on URL attachment
         MM_findObj("spanResultsAttachment").style.display = "none";
         MM_findObj("spanResultsUrl").style.display = "block";
      } else {
         // Switch on File attachment
         MM_findObj("spanResultsAttachment").style.display = "block";
         MM_findObj("spanResultsUrl").style.display = "none";

      }
   }
}

//-->
</script>
<!-- TIPS -->
<script language="JavaScript" src="images/tipster.js"></script>
<script language="JavaScript" src="images/_help_tips.js"></script>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();ShowField();">
<!-- TIPS LAYERS -------------------------------------->
<div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10">&nbsp;</div>
<!----------------------------------------------------->
<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;">
   <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
      <tr>
         <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>
         <td width="1%" background="images/lbox_bg_blue.gif" nowrap class="wform_ttl">&nbsp;Unit  Test</td>
         <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;
            <input type="submit" name="btn" value="Submit" class="form_btn_comp">
            <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="self.close()">
         </td>
         <td background="images/lbox_bg_blue.gif" align="right" width="1%" nowrap><img src="images/h_trsp_dot.gif" width="5" height="22"></td>
      </tr>
      <tr>
         <td height="100%" width="1%">&nbsp;</td>
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
            <table width="100%"  border="0" cellspacing="0" cellpadding="0">
               <tr>
                  <td width="1%" nowrap class="sublbox_hitem"><img src="images/h_trsp_dot.gif" width="10" height="30">
                     <%If Request("save_stat") <> "" Then%>
                        Saving complete.
                     <%End If%>
                  </td>
                  <td width="100%" align="right" valign="bottom">
                     <!-- TABS ------------------------------------->
                     <%Call Generate_Tab_Menu ( TABarray6D, "Unit Test Details", "blue" )%>
                  </td>
               </tr>
               <tr>
                  <td background="images/lbox_bg_blue.gif"></td>
                  <td background="images/lbox_bg_blue.gif">&nbsp;</td>
               </tr>
            </table>
            <table width="100%" border="0" cellspacing="1" cellpadding="2">
               <tr>
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Test Type <%=Quick_Help ( "ut_test_type" )%></td>
               </tr>
               <tr>
                  <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
                     <select name="test_type_id" class="form_item" onchange="ShowField();">
                        <%
                        Set rsQry = OraDatabase.CreateDynaset( SQL_GetTestTypes(), cint(0))

                        While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
                           If (isDLocked <> "Y") OR _
                              (rsQry("test_type_id") <> CStr(enumTEST_TYPE_AUTOBUILD_UTF)) OR _
                              ((rsQry("test_type_id") = CStr(enumTEST_TYPE_AUTOBUILD_UTF)) AND (isDLocked = "Y" AND criticalSectionIsEditable)) Then
                              %>
                              <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>
                              <%
                           End If
                           rsQry.MoveNext
                        WEnd

                        rsQry.Close
                        Set rsQry = Nothing
                        %>
                     </select>
                  </td>
               </tr>
            </table>
            <br>

            <DIV id="DIV_REG_TEST" style="display:block;">
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
                  <tr>
                     <td width="1%">&nbsp;</td>
                     <td width="1%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field"></td>
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
                        <SPAN name="spanResultsAttachment" id="spanResultsAttachment">
                           Results File Attachment <br><input name="results_file" type="file" class="form_item" size="65" class="form_txt">
                        </SPAN>
                        <SPAN name="spanResultsUrl" id="spanResultsUrl" style="display:none;">
                           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>
                           <span class="rep_small">NOTE: Root dpkg_archive URL is <%=dpkg_archiveURL%></span>
                        </SPAN>
                     </td>
                  </tr>
                  <tr>
                     <td>&nbsp;</td>
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">
                        Passed
                        <br>
                        # / Total <%=Quick_Help ( "ut_passed" )%>
                     </td>
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
                        <input name="numof_test" type="text" class="form_item" id="numof_test" size="20">
                     </td>
                  </tr>
                  <tr>
                     <td>&nbsp;</td>
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Completion Date </td>
                     <td nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
                        <input name="completion_date" type="text" class="form_item" id="completion_date" value="<%=EuroDate (Date) %>" size="20" maxlength="10">
                     </td>
                  </tr>
                  <tr>
                     <td width="1%">&nbsp;</td>
                     <td nowrap width="1%" valign="top" background="images/bg_form_lightbluedark.gif" class="form_field">Test Summary <%=Quick_Help ( "ut_summary" )%></td>
                     <td width="100%" valign="top" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
                        <textarea cols="80" rows="20" name="test_summary" class="form_item" id="test_summary"></textarea>
                     </td>
                  </tr>
                  <tr>
                     <td width="1%">&nbsp;</td>
                     <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="100" height="10"></td>
                     <td nowrap width="100%"> <p>&nbsp;</p></td>
                  </tr>
               </table>
            </DIV>

            <DIV id="DIV_AUTOBUILD_TEST" style="display:none;">
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
                  <tr>
                     <td width="100%" nowrap background="images/bg_form_lightbluedark.gif" class="form_txt">
                        Please read <a href="http://bms/mass/Wiki.jsp?page=UnitTestAutomationPaper" class="body_link" target="_blank">Unit Test Automation Paper</a>
                     </td>
                  </tr>
               </table>
            </DIV>


         </td>
      </tr>
      <tr>
         <td height="1%" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="5"></td>
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/lbox_bg_blue.gif"></td>
      </tr>
   </table>
   <input type="hidden" name="pv_id" value="<%=parPv_id%>">
   <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
</form>
</body>
</html>


<!-- DESTRUCTOR ------->
<!--#include file="common/destructor.asp"-->