Subversion Repositories DevTools

Rev

Rev 6594 | Rev 6626 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6594 Rev 6610
Line 773... Line 773...
773
        Dim sstate
773
        Dim sstate
774
        Dim bcan_unlock
774
        Dim bcan_unlock
775
        Dim stitle
775
        Dim stitle
776
        Dim bis_patch
776
        Dim bis_patch
777
        Dim spkgType
777
        Dim spkgType
-
 
778
        Dim shref
778
 
779
 
779
        bis_patch = not IsNull(pkgInfoHash.Item ("is_patch")) 
780
        bis_patch = not IsNull(pkgInfoHash.Item ("is_patch")) 
780
        If bis_patch Then
781
        If bis_patch Then
781
          ' the user can unlock a patch if they have permission
782
          ' the user can unlock a patch if they have permission
782
          ' packages can be unlocked by the btnUnlockRelease button
783
          ' packages can be unlocked by the btnUnlockRelease button
Line 874... Line 875...
874
         <td bgcolor=#f5f5f5 class="sublbox_txt">
875
         <td bgcolor=#f5f5f5 class="sublbox_txt">
875
            <%=getLicence()%>
876
            <%=getLicence()%>
876
         </td>
877
         </td>
877
      </tr>
878
      </tr>
878
      <%
879
      <%
879
        Dim shref
-
 
880
        Dim smail
-
 
881
 
-
 
882
        ' Owner:
880
        ' Owner:
883
        sonclick="MM_openVixIFrame('_wform_change_owner.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Owner')"
881
        sonclick="MM_openVixIFrame('_wform_change_owner.asp?pv_id="& parPv_id &"&rtag_id="& parRtag_id &"','Change Owner')"
884
        smail = pkgInfoHash.Item ("owner_email")
-
 
885
        shref = "mailto:"& smail
-
 
886
      %>
882
      %>
887
      
883
      
888
      <tr>
884
      <tr>
889
        <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">
885
        <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top">
890
          <%If objAccessControl.UserLogedIn() AND NOT pkgInfoHash.Item("is_sdkpkg") Then%>
886
          <%If objAccessControl.UserLogedIn() AND NOT pkgInfoHash.Item("is_sdkpkg") Then%>
Line 893... Line 889...
893
            </a>&nbsp;
889
            </a>&nbsp;
894
          <%Else%>
890
          <%Else%>
895
            <strong>Owner:</strong><img src='images/i_edit_disable.gif' width='12' height='12' border='0' alt='Change owner'>
891
            <strong>Owner:</strong><img src='images/i_edit_disable.gif' width='12' height='12' border='0' alt='Change owner'>
896
          <%End If%>
892
          <%End If%>
897
        </td>         
893
        </td>         
898
        <td bgcolor=#f5f5f5 class="sublbox_txt">
-
 
899
          <table width="100%" border="0" cellspacing="0" cellpadding="0" ID="Table1">
-
 
900
            <tr class="sublbox_txt">
-
 
901
              <td><%=pkgInfoHash.Item ("owner")%>
-
 
902
              </td>         
-
 
903
              <td align=right>
-
 
904
                <img src='images/email_address.png' width='13' height='13' hspace='3' border='0' title="Copy email address to clipboard" class="clipData" data-clip="<%=smail%>">
-
 
905
                <a href=<%=shref%> class='txt_linked'><img src='images/bt_send_email.gif' width='36' height='13' hspace='3' border='0' title='Send Email to Owner' alt=<%=smail%>></a>
894
        <td bgcolor=#f5f5f5 class="sublbox_txt"><%=emailField(pkgInfoHash.Item ("owner"),pkgInfoHash.Item ("owner_email"))%></td>         
906
              </td>
-
 
907
            </tr>  
-
 
908
          </table>
-
 
909
        </td>
-
 
910
      </tr>
895
      </tr>
911
      
896
      
912
      <%
897
      <%
913
        ' Created:
898
        ' Created:
914
        smail = pkgInfoHash.Item ("creator_email")
-
 
915
        shref = "mailto:"& smail
-
 
916
      %>
899
      %>
917
      <tr>
900
      <tr>
918
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Created:</b></td>
901
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Created:</b></td>
919
         <td bgcolor=#f5f5f5 class="sublbox_txt">            
902
         <td bgcolor=#f5f5f5 class="sublbox_txt">
920
           <table width="100%" border="0" cellspacing="0" cellpadding="0" ID="Table3">
-
 
921
             <tr class="sublbox_txt">
-
 
922
               <td><%=DisplayDate(pkgInfoHash.Item ("created_stamp"))&" by "& pkgInfoHash.Item ("creator")%></td>         
903
            <%=DisplayDate(pkgInfoHash.Item ("created_stamp"))&" by "& emailField(pkgInfoHash.Item ("creator"),pkgInfoHash.Item ("creator_email"))%>
923
               <td><a href=<%=shref%> class='txt_linked'><img src='images/bt_send_email.gif' width='36' height='13' hspace='3' border='0' align=right alt=<%=smail%>></a></td>
-
 
924
             </tr>  
-
 
925
           </table>
-
 
926
         </td>
904
         </td>
927
      </tr>
905
      </tr>
928
 
906
 
929
      <%
907
      <%
930
        ' Last Modified:
908
        ' Last Modified:
931
        smail = pkgInfoHash.Item ("modifier_email")
-
 
932
        shref = "mailto:"& smail
-
 
933
      %>
909
      %>
934
      <tr>
910
      <tr>
935
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Last Modified:</b></td>
911
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Last Modified:</b></td>
936
         <td bgcolor=#f5f5f5 class="sublbox_txt">
912
         <td bgcolor=#f5f5f5 class="sublbox_txt">
937
           <table width="100%" border="0" cellspacing="0" cellpadding="0" ID="Table4">
-
 
938
             <tr class="sublbox_txt">
-
 
939
               <td><%=DisplayDateTimeSecs(pkgInfoHash.Item ("modified_stamp")) &" by "& pkgInfoHash.Item ("modifier")%></td>
913
            <%=DisplayDateTimeSecs(pkgInfoHash.Item ("modified_stamp"))&" by "& emailField(pkgInfoHash.Item ("modifier"),pkgInfoHash.Item ("modifier_email"))%>
940
               <td><a href=<%=shref%> class='txt_linked'><img src='images/bt_send_email.gif' width='36' height='13' hspace='3' border='0' align=right alt=<%=smail%>></a></td>
-
 
941
             </tr>  
-
 
942
           </table>
-
 
943
         </td>
914
         </td>
944
      </tr>
915
      </tr>
945
 
916
 
946
      <%
917
      <%
947
        ' Added to Release
918
        ' Added to Release
948
        smail = pkgInfoHash.Item ("insertor_email")
-
 
949
        shref = "mailto:"& smail
-
 
950
        If IsNull(pkgInfoHash.Item ("is_patch"))  AND  (Request("rtag_id") <> "") AND (pkgInfoHash.Item ("insertor") <> "") Then
919
        If IsNull(pkgInfoHash.Item ("is_patch"))  AND  (Request("rtag_id") <> "") AND (pkgInfoHash.Item ("insertor") <> "") Then
951
      %>
920
      %>
952
      <tr>
921
      <tr>
953
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Added to Release:</b></td>
922
         <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top"><b>Added to Release:</b></td>
954
         <td bgcolor=#f5f5f5 class="sublbox_txt">
923
         <td bgcolor=#f5f5f5 class="sublbox_txt">
955
           <table width="100%" border="0" cellspacing="0" cellpadding="0" ID="Table2">
-
 
956
             <tr class="sublbox_txt">
-
 
957
               <td><%=DisplayDate(pkgInfoHash.Item ("insert_stamp")) &" by "& pkgInfoHash.Item ("insertor")%></td>
924
            <%=DisplayDate(pkgInfoHash.Item ("insert_stamp")) &" by "& emailField(pkgInfoHash.Item ("insertor"),pkgInfoHash.Item ("insertor_email"))%>
958
               <td align=right>
-
 
959
                <img src='images/email_address.png' width='13' height='13' hspace='3' border='0' title="Copy email address to clipboard" class="clipData" data-clip="<%=smail%>">
-
 
960
                <a href=<%=shref%> class='txt_linked'><img src='images/bt_send_email.gif' width='36' height='13' hspace='3' border='0' alt=<%=smail%>></a>
-
 
961
                </td>         
-
 
962
             </tr>  
-
 
963
           </table>
-
 
964
         </td>
925
         </td>
965
      </tr>
926
      </tr>
966
      <%End If%>
927
      <%End If%>
967
      
928
      
968
      <%If (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CLEARCASE_TAG) OR (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CVS_TAG) Then%>
929
      <%If (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CLEARCASE_TAG) OR (vcsInfoCollector.Item("vcs_tag") = enum_VCS_CVS_TAG) Then%>
Line 1725... Line 1686...
1725
   <%End If%>
1686
   <%End If%>
1726
 
1687
 
1727
<!-- REASON FOR RELEASE ----------------------------------------------------------------------------------------------------------------->
1688
<!-- REASON FOR RELEASE ----------------------------------------------------------------------------------------------------------------->
1728
   <fieldset class="fset">
1689
   <fieldset class="fset">
1729
      <legend class="body_colb"><img src='images/s_notes.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Reason for this version</legend>
1690
      <legend class="body_colb"><img src='images/s_notes.gif' width='21' height='24' hspace='4' border='0' align='absmiddle'>Reason for this version</legend>
1730
      <div style="display: block;float: right;margin-top: -20px;background-color: #FFF;padding: 0 5px;">
1691
      <div style="display: block;float: right;margin-top: -25px;background-color: #FFF;padding: 0 5px;">
-
 
1692
          <span class="clipElement txt_linked" title="Copy to Clipboard" data-target="releaseReason">Copy<%=enum_imgClipBoard12%></span>
1731
       <%If pageIsEditable Then%>
1693
       <%If pageIsEditable Then%>
1732
             <a href='javascript:;' onClick="MM_openVixIFrame('_wform_reason_for_version.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Reason For Release')" class="txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle"></a>
1694
             <a href='javascript:;' onClick="MM_openVixIFrame('_wform_reason_for_version.asp?pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>','Reason For Release')" class="txt_linked">Edit<img src="images/i_edit.gif" width="12" height="12" hspace="2" border="0" align="absmiddle"></a>
1733
       <%End If%>
1695
       <%End If%>
1734
      </div>
1696
      </div>
1735
      <a name="REASON_FOR_THIS_RELEASE"></a>
1697
      <a name="REASON_FOR_THIS_RELEASE"></a>
Line 1747... Line 1709...
1747
         <tr>
1709
         <tr>
1748
            <td bgcolor=#f5f5f5>
1710
            <td bgcolor=#f5f5f5>
1749
            <%If pkgInfoHash.Item ("comments") <> "" Then%>
1711
            <%If pkgInfoHash.Item ("comments") <> "" Then%>
1750
               <table border='0' cellspacing='0' cellpadding='0'>
1712
               <table border='0' cellspacing='0' cellpadding='0'>
1751
                  <tr>
1713
                  <tr>
1752
                     <td class='sublbox_txt'> <%Response.Write( NewLine_To_BR(pkgInfoHash.Item("comments")) )%><br></td>
1714
                     <td id=releaseReason class='sublbox_txt '> <%Response.Write( NewLine_To_BR(pkgInfoHash.Item("comments")) )%><br></td>
1753
                  </tr>
1715
                  </tr>
1754
               </table>
1716
               </table>
1755
            <%ElseIf FixedIssues ( parPv_id ) Then%>
1717
            <%ElseIf FixedIssues ( parPv_id ) Then%>
1756
               <span class='sublbox_txt'>Not specified.</span><br>
1718
               <span class='sublbox_txt'>Not specified.</span><br>
1757
            <%Else%>
1719
            <%Else%>
Line 2384... Line 2346...
2384
                     <%End If%>
2346
                     <%End If%>
2385
                  <%Else%>
2347
                  <%Else%>
2386
                     <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onClick="MM_openVixIFrame('<%If Not IsNull(rsQry("test_id")) Then%>_wform_update_unit_test.asp<%Else%>_wform_unit_test.asp<%End If%>?test_id=<%=rsQry("test_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&test_type_id=<%=rsQry("test_type_id")%>','Update Unit Test')" class="txt_linked"><img src="images/i_test.gif" width="16" height="16" hspace="3" align="absmiddle" border="0"><%=rsQry("test_type_name")%></a></td>
2348
                     <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><a href="javascript:;" onClick="MM_openVixIFrame('<%If Not IsNull(rsQry("test_id")) Then%>_wform_update_unit_test.asp<%Else%>_wform_unit_test.asp<%End If%>?test_id=<%=rsQry("test_id")%>&pv_id=<%=parPv_id%>&rtag_id=<%=parRtag_id%>&test_type_id=<%=rsQry("test_type_id")%>','Update Unit Test')" class="txt_linked"><img src="images/i_test.gif" width="16" height="16" hspace="3" align="absmiddle" border="0"><%=rsQry("test_type_name")%></a></td>
2387
                  <%End If%>
2349
                  <%End If%>
2388
                  <td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("test_summary") ))%></td>
2350
                  <td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("test_summary") ))%></td>
2389
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If ( NOT IsNull(rsQry("tester")) ) Then%><%=DisplayDate ( rsQry("completion_date") )%><br>by <a href="mailto:<%=rsQry("tester_email")%>" class="txt_linked"><%=rsQry("tester")%></a><%End If%></td>
2351
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If ( NOT IsNull(rsQry("tester")) ) Then%><%=DisplayDate ( rsQry("completion_date") )%><br>by <%=emailField(rsQry("tester"),rsQry("tester_email"))%><%End If%></td>
2390
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top" align="center"><%=rsQry("numof_test")%></td>
2352
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top" align="center"><%=rsQry("numof_test")%></td>
2391
 
2353
 
2392
                  <%If CInt(rsQry("test_type_id")) = enumTEST_TYPE_AUTOMATIC Then%>
2354
                  <%If CInt(rsQry("test_type_id")) = enumTEST_TYPE_AUTOMATIC Then%>
2393
                     <td bgcolor=#f5f5f5 class="form_item" align="center" valign="top">
2355
                     <td bgcolor=#f5f5f5 class="form_item" align="center" valign="top">
2394
                        <%If NOT IsNull( rsQry("results_url") ) Then%>
2356
                        <%If NOT IsNull( rsQry("results_url") ) Then%>
Line 2406... Line 2368...
2406
                        <%End If%>
2368
                        <%End If%>
2407
                     </td>
2369
                     </td>
2408
                  <%End If%>
2370
                  <%End If%>
2409
 
2371
 
2410
                  <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top" align="center"><%=FormatAccepted( rsQry("test_accepted"), rsQry("test_id") )%></td>
2372
                  <td nowrap bgcolor=#e4e9ec class="sublbox_txt" valign="top" align="center"><%=FormatAccepted( rsQry("test_accepted"), rsQry("test_id") )%></td>
2411
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If NOT IsNull(rsQry("reviewee")) Then%><%=DisplayDate ( rsQry("acceptance_date") )%><br>by <a href="mailto:<%=rsQry("reviewee_email")%>" class="txt_linked"><%=rsQry("reviewee")%></a><%End If%></td>
2373
                  <td nowrap bgcolor=#f5f5f5 class="form_item" valign="top"><%If NOT IsNull(rsQry("reviewee")) Then%><%=DisplayDate ( rsQry("acceptance_date") )%><br>by <%=emailField(rsQry("reviewee"),rsQry("reviewee_email"))%><%End If%></td>
2412
                  <td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("review_comments") ))%></td>
2374
                  <td bgcolor=#f5f5f5 class="form_item" valign="top"><%=NewLine_To_BR( To_HTML( rsQry("review_comments") ))%></td>
2413
 
2375
 
2414
                  <%
2376
                  <%
2415
                  If (  (    pageIsEditable _
2377
                  If (  (    pageIsEditable _
2416
                         AND (scriptName = "fixed_issues.asp") _
2378
                         AND (scriptName = "fixed_issues.asp") _