Subversion Repositories DevTools

Rev

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

Rev 6613 Rev 6785
Line 5... Line 5...
5
'   Needs to be used via a wrapper
5
'   Needs to be used via a wrapper
6
'=====================================================
6
'=====================================================
7
%>
7
%>
8
<%
8
<%
9
'------------ Variable Definition -------------
9
'------------ Variable Definition -------------
10
Dim rsTemp, rsState
10
Dim rsTemp
11
Dim projId
11
Dim projId
12
Dim pkgId
12
Dim pkgId
13
Dim rsQry
13
Dim rsQry
14
Dim isDaemonEnabledRelease
14
Dim isDaemonEnabledRelease
15
'------------ Constants Declaration -----------
15
'------------ Constants Declaration -----------
Line 175... Line 175...
175
              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
175
              <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
176
           </tr>
176
           </tr>
177
        <%End If%>
177
        <%End If%>
178
        <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
178
        <%While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%>
179
           <tr>
179
           <tr>
180
              <% Set rsState = OraDatabase.DbCreateDynaset( "select deprecated_state from release_content where rtag_id="&parRtag_id&" and pv_id="&rsTemp("pv_id"), cint(0))%>
-
 
181
              <%If isDaemonEnabledRelease = FALSE Then%>
180
              <%If isDaemonEnabledRelease = FALSE Then%>
182
                 <%If rsTemp("dpv_id") <> parPv_id And IsNull(rsTemp("ignore_warn")) Then%>
181
                 <%If rsTemp("dpv_id") <> parPv_id And IsNull(rsTemp("ignore_warn")) Then%>
183
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>"></td>
182
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>"></td>
184
                 <%ElseIf rsTemp("dpv_id") = parPv_id And IsNull(rsTemp("ignore_warn")) OR NOT isNull(rsTemp("ignore_warn")) Then%>
183
                 <%ElseIf rsTemp("dpv_id") = parPv_id And IsNull(rsTemp("ignore_warn")) OR NOT isNull(rsTemp("ignore_warn")) Then%>
185
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" disabled></td>
184
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" disabled></td>
186
                 <%Else%>
185
                 <%Else%>
187
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" checked></td>
186
                    <td background="images/bg_form_lightgray.gif" nowrap><input type="checkbox" name="ignore_warnings" value="<%=rsTemp("pv_id")%>_<%=rsTemp("dpv_id")%>" checked></td>
188
                 <%End If%>
187
                 <%End If%>
189
              <%End If%>
188
              <%End If%>
190
 
189
 
191
              <%If rsState("deprecated_state") <> "" AND rsTemp("pkg_state") = 0 Then%>
190
              <%If rsTemp("deprecated_state") <> "" AND rsTemp("pkg_state") = 0 Then%>
192
                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsState("deprecated_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
191
                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("deprecated_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
193
              <%Else%>
192
              <%Else%>
194
                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
193
                 <td background="images/bg_form_lightgray.gif"><%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), NULL, NULL, pkgInfoHash.Item("build_type"), TRUE )%></td>
195
              <%End If%>
194
              <%End If%>
196
 
195
 
197
              <td background="images/bg_form_lightgray.gif" nowrap><a href="used_by.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=parRtag_id%>" class="txt_linked"><%=rsTemp("pkg_name")%></a></td>
196
              <td background="images/bg_form_lightgray.gif" nowrap><a href="used_by.asp?pv_id=<%=rsTemp("pv_id")%>&rtag_id=<%=parRtag_id%>" class="txt_linked"><%=rsTemp("pkg_name")%></a></td>
Line 201... Line 200...
201
              <td background="images/bg_form_lightgray.gif" <%If rsTemp("dpv_id") <> parPv_id Then%>class="err_alert"<%Else%>class="form_item"<%End If%>><%=pkgInfoHash.Item ("pkg_name") &" "& rsTemp("dpkg_version")%></td>
200
              <td background="images/bg_form_lightgray.gif" <%If rsTemp("dpv_id") <> parPv_id Then%>class="err_alert"<%Else%>class="form_item"<%End If%>><%=pkgInfoHash.Item ("pkg_name") &" "& rsTemp("dpkg_version")%></td>
202
              <td background="images/bg_form_lightgray.gif" class="form_item"><%=emailField(enum_imgUser & rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%></td>
201
              <td background="images/bg_form_lightgray.gif" class="form_item"><%=emailField(enum_imgUser & rsTemp("full_name"), rsTemp("user_email"))%>&nbsp;<%=DisplayDate ( rsTemp("modified_stamp") )%></td>
203
           </tr>
202
           </tr>
204
           <%rsTemp.MoveNext
203
           <%rsTemp.MoveNext
205
           rsTemp.Close()
204
           rsTemp.Close()
206
           rsState.Close()
-
 
207
 
-
 
208
           Set rsState = nothing
-
 
209
        WEnd
205
        WEnd
210
        Set rsTemp = nothing
206
        Set rsTemp = nothing
211
        %>
207
        %>
212
     </table>
208
     </table>
213
     <%If isDaemonEnabledRelease = FALSE Then%>
209
     <%If isDaemonEnabledRelease = FALSE Then%>