WebSVN – DevTools – Diff – /ManagerSuite/Release_Manager/trunk/web/_version_browser.asp

         End If
     Next
 End Function
 '-----------------------------------------------------------------------------------------------------------------------------------
-Function Set_Row_Style ( sLink, pvid )
+Function Set_Row_Style ( sClass, pvid )
-    Set_Row_Style = "onMouseOver='this.style.cursor=""pointer""' onClick='selectVersion("""& sLink &""",event)' "
+    Set_Row_Style = "class='pointer selectVersion "& sClass &"' data-pvid='" & pvid &"'"
 End Function
 '-----------------------------------------------------------------------------------------------------------------------------------
 %>
 <!--#include file="_jquery_includes.asp"-->
 <script language="JavaScript" type="text/JavaScript">
     });
     return false;
+}
-//  This function is invoked when the user clicks within a row
-//  The click will re-load and reposition the version history to the selected version
-//  The problem is that the 'Destroy Version' interacts with this.
-//  Also the mailto operation interacts with this
-//  Solution: The DestroyVersion is an image within a 'td'.
-//            If the 'td' has a class of nogo, then don't navigate
-function selectVersion(href,event)
-{
-    if (! ($(event.target).closest('td').hasClass('nogo') || $(event.target).closest('span').hasClass('mailto')) ) {
-        location.href = href;
-    }
-}
-//  Encode data into URL
-function encodeData(data) {
-    return Object.keys(data).map(function(key) {
-        return [key, data[key]].map(encodeURIComponent).join("=");
-    }).join("&");
-}
-// Destroy a package version
-function DestroyVersion(pvid, idx) {
-    var data = {
-        pv_id       : pvid,
-        bfile       : "<%=ScriptName%>",
-        rtag_id     : "<%=parRtag_id%>",
-        FLuser_name : "<%=parFLuser_name%>",
-        FLpkg_version : "<%=parFLpkg_version%>",
-        rfile       : "<%=parRfile%>",
-        pkg_id      : "<%=parPkg_id%>",
-        OLDpv_id    : "<%=parOLDpv_id%>",
-        index       : idx
-    };
-    MM_openVixIFrame('_destroy_package.asp?' + encodeData(data), 'Destroy Package Version')
-}
 //  Scroll to package
 //  Order of preference
 //      index   - location of last package deleted
 //      index-1 - Near last pakage deleted
 //      pvid    - PVID being viewed
         var h = screen.height;
         MM_findObj("LayerVersions").style.height = (h-300)/2 +"px";
         MM_findObj("LayerDetails").style.height = (h-300)/2 +"px";
     } catch(e) {
+    }
+}
-}
+//  Attach events
+$(document).ready(function() {
+    //  This function is invoked when the user clicks within a row
+    //  The click will re-load and reposition the version history to the selected version
+    //  The problem is that the 'Destroy Version' interacts with this.
+    //  Also the mailto operation interacts with this
+    //  Solution: The DestroyVersion is an image within a 'td'.
+    //            If the 'td' has a class of nogo, then don't navigate
+    $('.selectVersion').on('click', function () {
+        if ($(event.target).closest('td').hasClass('nogo') || $(event.target).closest('span').hasClass('mailto') ) {
+            return;
+        }
+        var tr = $(this).closest('tr');
+        var pvid = $(tr).data('pvid');
+        var isaPatch = $(tr).hasClass('isaPatch');
+        var URLstring = <%="'" & Persists_Query_String_Trim( "","index,pv_id" ) & "'" %>;
+        var script;
+        if ( isaPatch ) {
+            script = '_wform_versions_history_release_notes.asp';
+        } else {
+            script = <%= "'" & scriptName & "'" %>
+        }
+        URLstring = script + '?' + URLstring + 'pv_id=' + pvid;
+        location.href = URLstring;
+    });
+    //  This function will add a listener to allow a user to download the Release Notes
+    //  If the target does not exist, then it will redirect to a 404 error :(
+    $('.downloadNotes').on('click', function (){
+        var notes = $(this).data('rnote');
+        var tr = $(this).closest('tr');
+        var pvid = $(tr).data('pvid');
+        var URLstring = <%="'" & HTTP_PKG_ARCHIVE & "'" %> + notes;
+        //  Open in a new window
+        window.open(URLstring, '_blank');
+    });
+    //  Add a listener for destroyVersion events
+    $('.destroyVersion').on('click', function (){
+    var tr = $(this).closest('tr');
+    var pvid = $(tr).data('pvid');
+    var idx = $(tr).data('idx');
+    var data = {
+        pv_id       : pvid,
+        bfile       : "<%=ScriptName%>",
+        rtag_id     : "<%=parRtag_id%>",
+        FLuser_name : "<%=parFLuser_name%>",
+        FLpkg_version : "<%=parFLpkg_version%>",
+        rfile       : "<%=parRfile%>",
+        pkg_id      : "<%=parPkg_id%>",
+        OLDpv_id    : "<%=parOLDpv_id%>",
+        index       : idx };
+    var param = $.param(data);
+    MM_openVixIFrame('_destroy_package.asp?' + param, 'Destroy Package Version')
+    });
+});
 //# sourceURL=_version_browser_1.asp
 </script>
       <!--------------- ACTION BUTTONS -------------------------->
       <table width="100%" border="0" cellspacing="0" cellpadding="0">
         <tr>
           <td class='bg_dialog'>
             <div id="LayerVersions" style="height: 350px; width:100vw; overflow: auto;" name="LayerVersions">
               <table width="100%" border="0" cellspacing="1" cellpadding="2">
-                <tr>
+                <thead>
-                  <td width="1" nowrap background="images/bg_action_dark.gif"><img src="images/spacer.gif" width="15" height="10"></td>
+                  <th width="1" nowrap background="images/bg_action_dark.gif"><img src="images/spacer.gif" width="15" height="10"></th>
-                  <td width="1" nowrap background="images/bg_action_dark.gif">&nbsp;</td>
+                  <th width="1" nowrap background="images/bg_action_dark.gif">&nbsp;</th>
-                  <td width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Version&nbsp;&nbsp;<br><input name="FLpkg_version" type="text" class="form_ifilter" value="<%=parFLpkg_version%>" size="15"></td>
+                  <th width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Version&nbsp;&nbsp;<br><input name="FLpkg_version" type="text" class="form_ifilter" value="<%=parFLpkg_version%>" size="15"></th>
-                  <td width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Last Mod. Date&nbsp;&nbsp;</td>
+                  <th width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Last Mod. Date&nbsp;&nbsp;</th>
-                  <td width="100%" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Reason for this version</td>
+                  <th width="100%" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Reason for this version</th>
-                  <td width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Last Modified&nbsp;&nbsp;<br><input name="FLuser_name" type="text" class="form_ifilter" value="<%=parFLuser_name%>" size="15"></td>
+                  <th width="1" valign="top" nowrap background="images/bg_action_dark.gif" class="form_field">Last Modified&nbsp;&nbsp;<br><input name="FLuser_name" type="text" class="form_ifilter" value="<%=parFLuser_name%>" size="15"></th>
-                  <td width="1" nowrap background="images/bg_action_dark.gif"></td>
+                  <th width="1" nowrap background="images/bg_action_dark.gif"></th>
-                  <td width="1" nowrap background="images/bg_action_dark.gif"></td>
+                  <th width="1" nowrap background="images/bg_action_dark.gif"></th>
-                </tr>
+                </thead>
                 <%
                 Dim aVersions, lastRow, i, objSortHelper, idx
                 Set rsVB = OraDatabase.DbCreateDynaset( Get_All_Versions ( parPkg_id ), cint(0))
                     fieldReleased_By = emailField(enum_imgUser & aVersions( rsVB.FieldIndex("full_name"), i ), aVersions( rsVB.FieldIndex("user_email"), i ))
                     ' Full Release Notes availability
                     fieldDownloadFullReleaseNotes = ""
                     If NOT IsNull( aVersions( rsVB.FieldIndex("release_notes_info"), i ) ) OR ( InStr( aVersions( rsVB.FieldIndex("release_notes_info"), i ), "MGS:") < 1)  Then
-                        fieldDownloadFullReleaseNotes = "<a href='"& HTTP_PKG_ARCHIVE & aVersions( rsVB.FieldIndex("release_notes_info"), i ) &"' target='_blank'><img src='images/i_download_small.gif' alt='Download full release notes.' width='16' height='16' hspace='2' border='0'></a>"
+                        fieldDownloadFullReleaseNotes = "<img src='images/i_download_small.gif' title='Download full release notes.' width='16' height='16' hspace='2' border='0' class='pointer downloadNotes' data-rnote='"&aVersions( rsVB.FieldIndex("release_notes_info"), i )&"'>"
                     End If
                     pvidName = "PVID_"& aVersions( rsVB.FieldIndex("pv_id"), i )
                     idxName = "IDX_" & idx
                     If aVersions( rsVB.FieldIndex("is_patch"), i ) = "Y" Then
-                        URLstring = "_wform_versions_history_release_notes.asp?"& Persists_Query_String_Trim( "pv_id="& aVersions( rsVB.FieldIndex("pv_id"), i ), "index" )
+                        URLstring = "isaPatch"
                     Else
-                        URLstring = scriptName &"?"& Persists_Query_String_Trim( "pv_id="& aVersions( rsVB.FieldIndex("pv_id"), i ), "index" )
+                        URLstring = ""
                     End If
                     ' User can try to delete package iff
                     '   Have suffiecient access (unusual)
                     '   They created it or own it
                         End If
                     End If
                     ' Set destroy package action
                     If CanDestroyPackage Then
-                        DestroyPackage = "<span "&_
+                        DestroyPackage = "<span class='destroyVersion'"&_
-                                         " title='Destroy this version of the package.' "&_
+                                         " title='Destroy this version of the package.'> "&_
-                                         " onClick=DestroyVersion("& aVersions( rsVB.FieldIndex("pv_id"), i ) &"," & idx  &")>" &_
                                          " <img src='icons/i_destroy_package_sml.gif' width='15' height='15' border='0' ><span>"
                     Else
                         DestroyPackage = ""
                     End If
                 %>
-                <tr id="<%=idxName%>" <%=Set_Row_Style ( URLstring, CStr( aVersions( rsVB.FieldIndex("pv_id"), i ) ) )%>>
+                <tr id='<%=idxName%>' data-idx='<%=idx%>' <%=Set_Row_Style ( URLstring, CStr( aVersions( rsVB.FieldIndex("pv_id"), i ) ) )%>>
                   <td align="right" background="images/bg_action_dark.gif"><%=imgPointer%><span id="<%=pvidName%>"></span></td>
                   <td align="center" valign="top" <%=rowColor%>><%=imgLock%></td>
                   <td valign="top" nowrap <%=rowColor%>><a href="<%=URLstring%>" class="txt_linked"><%=aVersions( rsVB.FieldIndex("pkg_version"), i )%></a></td>
                   <td valign="top" nowrap <%=rowColor%> class="form_item"><%=fieldRelease_Date%></td>
                   <td valign="top" <%=rowColor%> class="form_item"><%=NewLine_To_BR ( To_HTML( aVersions( rsVB.FieldIndex("comments"), i ) ) )%></td>
                   <td valign="top" nowrap <%=rowColor%> class="form_item"><%=fieldReleased_By%></td>
-                  <td align="center" valign="top" <%=rowColor%>><%=fieldDownloadFullReleaseNotes%></td>
+                  <td align="center" valign="top" class="nogo" <%=rowColor%>><%=fieldDownloadFullReleaseNotes%></td>
                   <td align="center" valign="top" class="nogo" <%=rowColor%>><%=DestroyPackage%></td>
                 </tr>
                 <%
                 Next
                 End If

Subversion Repositories DevTools

(root)/ManagerSuite/Release_Manager/trunk/web/_version_browser.asp – Rev 6879 → 6977