Subversion Repositories DevTools

Rev

Rev 185 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 185 Rev 4042
Line 99... Line 99...
99
pageIsEditable = Is_Page_Editable ( pkgInfoHash.Item ("dlocked") )
99
pageIsEditable = Is_Page_Editable ( pkgInfoHash.Item ("dlocked") )
100
sectionIsEditable = Is_Section_Editable ()
100
sectionIsEditable = Is_Section_Editable ()
101
criticalSectionIsEditable = Is_Critical_Section_Editable ( pkgInfoHash.Item ("dlocked") )
101
criticalSectionIsEditable = Is_Critical_Section_Editable ( pkgInfoHash.Item ("dlocked") )
102
'-------------------------------------------------
102
'-------------------------------------------------
103
 
103
 
-
 
104
 
-
 
105
If (Request("resetNotes") = "1") AND (parPv_id <> "") Then
-
 
106
   objEH.TryORA ( OraSession )
-
 
107
   On Error Resume Next
-
 
108
   OraDatabase.ExecuteSQL " UPDATE package_versions "&_
-
 
109
                          " SET release_notes_info = '"& enum_RELEASE_NOTES_NOT_FOUND_IN_ARCHIVE &"'"&_
-
 
110
                          " ,modified_stamp = systimestamp" &_
-
 
111
                          " ,modifier_id = " & objAccessControl.UserId &_
-
 
112
                          " WHERE pv_id = "& parPv_id
-
 
113
   objEH.CatchORA ( OraSession )
-
 
114
 
-
 
115
   ' Really need to log an action too
-
 
116
 
-
 
117
   ' Really I just want to get rid of the resetNotes bit.
-
 
118
   Response.Redirect ("fixed_issues.asp?pv_id="&parPv_id&"&rtag_id="&parRtag_id)
-
 
119
End If
-
 
120
 
104
%>
121
%>
105
<html>
122
<html>
106
<title><%=Title(Request("rtag_id"))%></title>
123
<title><%=Title(Request("rtag_id"))%></title>
107
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
124
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
108
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
125
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">