Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5590
Line 61... Line 61...
61 
   OraDatabase.Parameters.Add "IS_OBSOLETE",       isPatchObsolete,              ORAPARM_INPUT, ORATYPE_CHAR
 61 
   OraDatabase.Parameters.Add "IS_OBSOLETE",       isPatchObsolete,              ORAPARM_INPUT, ORATYPE_CHAR
62 
   OraDatabase.Parameters.Add "OBSOLETE_COMMENTS", Request("obsolete_comments"), ORAPARM_INPUT, ORATYPE_VARCHAR2
 62 
   OraDatabase.Parameters.Add "OBSOLETE_COMMENTS", Request("obsolete_comments"), ORAPARM_INPUT, ORATYPE_VARCHAR2
63 
   OraDatabase.Parameters.Add "USER_ID",           objAccessControl.UserId,      ORAPARM_INPUT, ORATYPE_NUMBER
 63 
   OraDatabase.Parameters.Add "USER_ID",           objAccessControl.UserId,      ORAPARM_INPUT, ORATYPE_NUMBER
64 
 
 64 
 
65 
   On Error Resume Next
 65 
   On Error Resume Next
- 
 
 66 
   objEH.ErrorRedirect = FALSE
66 
   objEH.TryORA ( OraSession )
 67 
   objEH.TryORA ( OraSession )
67 
 
 68 
 
68 
   OraDatabase.ExecuteSQL _
 69 
   OraDatabase.ExecuteSQL _
69 
   " BEGIN  PK_PACKAGE.OBSOLETE_PATCHES ( :PATCH_ID_LIST, :IS_OBSOLETE, :OBSOLETE_COMMENTS, :USER_ID );   END;"
 70 
   " BEGIN  PK_PACKAGE.OBSOLETE_PATCHES ( :PATCH_ID_LIST, :IS_OBSOLETE, :OBSOLETE_COMMENTS, :USER_ID );   END;"
70 
 
 71 
 
Line 81... Line 82...
81 
'Process submission
 82 
'Process submission
82 
'------------ Action Requirements -------------------
 83 
'------------ Action Requirements -------------------
83 
If CBool(QStrPar("action"))   AND  objAccessControl.UserLogedIn  Then
 84 
If CBool(QStrPar("action"))   AND  objAccessControl.UserLogedIn  Then
84 
 
 85 
 
85 
   Call SubmitObsoleteComments ( Request("patch_id_list") )
 86 
   Call SubmitObsoleteComments ( Request("patch_id_list") )
- 
 
 87 
   If objEH.Finally Then
86 
   Call OpenInParentWindow ( "patches.asp?pv_id="& parPv_id &"&rtag_id="& Request("rtag_id") )
 88 
   Call OpenInParentWindow ( "patches.asp?pv_id="& parPv_id &"&rtag_id="& Request("rtag_id") )
87 
   Call CloseWindow
 89 
      Response.End
88 
 
 90 
   End If
89 
End If
 91 
End If
90 
%>
 92 
%>
91 
<html>
 93 
<html>
92 
<head>
 94 
<head>
93 
<title>Release Manager</title>
 95 
<title>Release Manager</title>
Line 100... Line 102...
100 
</head>
 102 
</head>
101 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.FormSearch.obsolete_comments.focus();">
 103 
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onload="self.focus();document.FormSearch.obsolete_comments.focus();">
102 
<%
 104 
<%
103 
'-- FROM START ---------------------------------------------------------------------------------------------------------------
 105 
'-- FROM START ---------------------------------------------------------------------------------------------------------------
104 
objFormComponent.FormName = "FormSearch"
 106 
objFormComponent.FormName = "FormSearch"
- 
 
 107 
objFormComponent.FormClass = "form_tight"
105 
objFormComponent.Action = scriptName
 108 
objFormComponent.Action = scriptName
106 
Call objFormComponent.FormStart()
 109 
Call objFormComponent.FormStart()
107 
%>
 110 
%>
108 
   <table width="100%" border="0" cellspacing="0" cellpadding="2" height="100%">
 111 
   <table width="100%" border="0" cellspacing="0" cellpadding="2">
109 
      <tr>
 - 
 
110 
         <td background="images/lbox_bg_orange.gif" width="1%" height="1%"><img src="images/i_new_pkg_off.gif" width="21" height="23" hspace="5" border="0"></td>
 - 
 
111 
         <td background="images/lbox_bg_blue.gif" nowrap width="50%" class="wform_ttl">&nbsp;Make Patches Obsolete</td>
 - 
 
112 
         <td background="images/lbox_bg_blue.gif" align="right" width="50%">
 - 
 
113 
            <input type="submit" name="btn" value="Submit" class="form_btn_comp">
 - 
 
114 
            <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="self.close()">
 - 
 
115 
         </td>
 - 
 
116 
         <td background="images/lbox_bg_blue.gif" align="right" width="1%%" nowrap><img src="images/h_trsp_dot.gif" width="5" height="22"></td>
 - 
 
117 
      </tr>
 - 
 
118 
      <tr>
 112 
      <tr>
119 
         <td height="100%" width="1%">&nbsp;</td>
 - 
 
120 
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
 113 
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/bg_form_lightgray.gif">
- 
 
 114 
               <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
- 
 
 115 
               <!--#include file="messages/_msg_inline.asp"-->
- 
 
 116 
               <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
121 
            <table width="100%" border="0" cellspacing="1" cellpadding="2">
 117 
            <table width="100%" border="0" cellspacing="1" cellpadding="2">
122 
               <tr>
 118 
               <tr>
123 
                  <td width="4%"><img src="images/h_trsp_dot.gif" width="10" height="30"></td>
 - 
 
124 
                  <td nowrap width="60%">&nbsp; </td>
 - 
 
125 
               </tr>
 - 
 
126 
               <tr>
 - 
 
127 
                  <td width="4%">&nbsp;</td>
 - 
 
128 
                  <td nowrap width="60%" background="images/bg_form_lightbluedark.gif" class="form_txt">
 119 
                  <td nowrap width="60%" background="images/bg_form_lightbluedark.gif" class="form_txt">
129 
                     <textarea name="obsolete_comments" class="form_item" cols="60" rows="10"></textarea>
 120 
                     <textarea name="obsolete_comments" class="form_item" cols="60" rows="10"></textarea>
130 
 
 - 
 
131 
                     <input type="hidden" name="pv_id" value="<%=parPv_id%>">
 121 
                     <input type="hidden" name="pv_id" value="<%=parPv_id%>">
132 
                     <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
 122 
                     <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
133 
                     <input type="hidden" name="rfile" value="<%=Request("rfile")%>">
 123 
                     <input type="hidden" name="rfile" value="<%=Request("rfile")%>">
134 
                     <input type="hidden" name="action" value="true">
 124 
                     <input type="hidden" name="action" value="true">
135 
                  </td>
 125 
                  </td>
136 
               </tr>
 126 
               </tr>
137 
               <tr>
 - 
 
138 
                  <td width="4%">&nbsp;</td>
 - 
 
139 
                  <td nowrap width="60%">
 - 
 
140 
                  <p>&nbsp;</p>
 - 
 
141 
                  </td>
 - 
 
142 
               </tr>
 - 
 
143 
               <!-- INCLUDE PATCHES +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++  -->
 127 
               <!-- INCLUDE PATCHES +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++  -->
144 
               <%
 128 
               <%
145 
               OraDatabase.Parameters.Add "PV_ID",    parPv_id, ORAPARM_INPUT, ORATYPE_NUMBER
 129 
               OraDatabase.Parameters.Add "PV_ID",    parPv_id, ORAPARM_INPUT, ORATYPE_NUMBER
146 
               OraDatabase.Parameters.Add "HIDE_OBSOLETE",    "Y", ORAPARM_INPUT, ORATYPE_CHAR
 130 
               OraDatabase.Parameters.Add "HIDE_OBSOLETE",    "Y", ORAPARM_INPUT, ORATYPE_CHAR
147 
 
 131 
 
Line 153... Line 137...
153 
               patchRecCount = rsTemp.RecordCount
 137 
               patchRecCount = rsTemp.RecordCount
154 
 
 138 
 
155 
               %>
 139 
               %>
156 
               <tr>
 140 
               <tr>
157 
                  <td width="33%" colspan="3" nowrap class="body_colb">Available Patches For Obsolete<br>
 141 
                  <td width="33%" colspan="3" nowrap class="body_colb">Available Patches For Obsolete<br>
- 
 
 142 
                     <div style="min-height:300px;max-height:400px;overflow:auto;">
158 
                     <table width="265" border="0">
 143 
                     <table width="265" border="0">
159 
                        <tr>
 144 
                        <tr>
160 
                           <td width="20" background="images/bg_form_lightbluedark.gif">&nbsp;</td>
 145 
                           <td width="20" background="images/bg_form_lightbluedark.gif">&nbsp;</td>
161 
                           <td width="90" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Package</td>
 146 
                           <td width="90" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Package</td>
162 
                           <td width="119" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Patch Version</td>
 147 
                           <td width="119" nowrap background="images/bg_form_lightbluedark.gif" class="form_field">Patch Version</td>
Line 171... Line 156...
171 
                              <td nowrap class="form_txt"><%=rsTemp("pkg_name")%></td>
 156 
                              <td nowrap class="form_txt"><%=rsTemp("pkg_name")%></td>
172 
                              <td width="18" nowrap class="form_txt"><%=rsTemp("pkg_version")%></td>
 157 
                              <td width="18" nowrap class="form_txt"><%=rsTemp("pkg_version")%></td>
173 
                           </tr>
 158 
                           </tr>
174 
                           <%rsTemp.MoveNext
 159 
                           <%rsTemp.MoveNext
175 
                        WEnd
 160 
                        WEnd
176 
 
 - 
 
177 
                        rsTemp.Close
 161 
                        rsTemp.Close
178 
                        Set rsTemp = nothing
 162 
                        Set rsTemp = nothing
179 
                        %>
 163 
                        %>
180 
                     </table>
 164 
                     </table>
181 
                     <br>
 165 
                     </div>
182 
                  </td>
 166 
                  </td>
183 
               </tr>
 167 
               </tr>
184 
            </table>
 168 
            </table>
185 
         </td>
 169 
         </td>
186 
      </tr>
 170 
      </tr>
187 
      <tr>
 171 
      <tr>
- 
 
 172 
         <td align="right">
188 
         <td height="1%" width="1%"><img src="images/h_trsp_dot.gif" width="5" height="5"></td>
 173 
            <input type="submit" name="btn" value="Submit" class="form_btn_comp">
189 
         <td valign="top" nowrap colspan="3" class="wform_ttl" background="images/lbox_bg_blue.gif"></td>
 174 
            <input type="reset" name="btn" value="Cancel" class="form_btn_comp" onclick="parent.closeIFrame()">
- 
 
 175 
         </td>
190 
      </tr>
 176 
      </tr>
191 
   </table>
 177 
   </table>
192 
 
 - 
 
193 
 
 - 
 
194 
<%
 178 
<%
195 
Call objFormComponent.FormEnd()
 179 
Call objFormComponent.FormEnd()
196 
'-- FROM END ----------------------------------------------------------------------------------------------------------------
 180 
'-- FROM END ----------------------------------------------------------------------------------------------------------------
197 
%>
 181 
%>
198 
</body>
 182 
</body>