Subversion Repositories DevTools

Rev

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

Rev 119 Rev 145
Line 1... Line 1...
1 
<%
 1 
<%
2 
'=====================================================
 2 
'=====================================================
3 
'					Package Pages
 3 
'               Package Pages
4 
'=====================================================
 4 
'=====================================================
5 
%>
 5 
%>
6 
<!--#include file="_tabs.asp"-->
 6 
<!--#include file="_tabs.asp"-->
7 
<!--#include file="_action_buttons.asp"-->
 7 
<!--#include file="_action_buttons.asp"-->
8 
<%
 8 
<%
Line 25... Line 25...
25 
'----------------------------------------------
 25 
'----------------------------------------------
26 
%>
 26 
%>
27 
<%
 27 
<%
28 
'-----------------------------------------------------------------------------------------------------------------
 28 
'-----------------------------------------------------------------------------------------------------------------
29 
Sub Print_Pkg_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
 29 
Sub Print_Pkg_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
30 
	Dim rsTemp, Query_String, noDependencies
 30 
   Dim rsTemp, Query_String, noDependencies
31 
	noDependencies = FALSE
 31 
   noDependencies = FALSE
32
32 
 
33 
	Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
 33 
 
34
34 
   Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
35 
	OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
 35 
 
36 
	OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
 36 
   OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
37
37 
   OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
38 
	OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
 38 
 
39 
	OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
 39 
   OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
40
40 
   OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
41 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )
 41 
 
42
42 
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )
43 
	CanIgnoreWarnings = FALSE
 43 
 
44 
	If Request("rtag_id") <> ""  Then
 44 
   CanIgnoreWarnings = FALSE
45 
		If pkgInfoHash.Item("build_type") = "M" OR _
 45 
   If NNrtag_id <> "" AND is_daemon_enabled_release(NNrtag_id, TRUE) = FALSE Then
46 
		   ( pkgInfoHash.Item("build_type") = "A" AND pkgInfoHash.Item("dlocked") = "Y" ) OR _
 46 
      If pkgInfoHash.Item("build_type") = "M" OR _
47 
		   ( pkgInfoHash.Item("build_type") = "Y" AND pkgInfoHash.Item("dlocked") = "Y" ) Then
 47 
         ( pkgInfoHash.Item("build_type") = "A" AND pkgInfoHash.Item("dlocked") = "Y" ) OR _
48 
			CanIgnoreWarnings = TRUE
 48 
         ( pkgInfoHash.Item("build_type") = "Y" AND pkgInfoHash.Item("dlocked") = "Y" ) Then
49 
		End If
 49 
         CanIgnoreWarnings = TRUE
50 
	End If
 50 
      End If
51 
	%>
 51 
   End If
52 
	<table width="100%" border="0" cellspacing="1" cellpadding="3">
 52 
   %>
53 
	  <form name="ignore_warnings" method="get" action="_ignore_warnings.asp" onSubmit="ProgressBar.style.visibility='visible';">
 53 
   <table width="100%" border="0" cellspacing="1" cellpadding="3">
54 
	  <tr>
54 
      <form name="ignore_warnings" method="get" action="_ignore_warnings.asp" onSubmit="ProgressBar.style.visibility='visible';">
55 
	    <%If CanIgnoreWarnings Then%><td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Ignore<br>warnings</td><%End If%>
 55 
         <tr>
56 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
 56 
            <%If CanIgnoreWarnings Then%><td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Ignore<br>warnings</td><%End If%>
57 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Name<br><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
 57 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
58 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
 58 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Name<br><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
59 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Released</td>
 59 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
60 
		<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
 60 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Released</td>
61 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
 61 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
62 
	  </tr>
 62 
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
63 
	<%' Display "no dependencies" if needed%>
 63 
         </tr>
64 
	<%If rsTemp.RecordCount = 0 Then%>
 64 
         <%' Display "no dependencies" if needed%>
65 
	  <tr>
65 
         <%If rsTemp.RecordCount = 0 Then%>
66 
	    <%If CanIgnoreWarnings Then%><td align="center" nowrap background="images/bg_form_lightgray.gif"></td><%End If%>
 66 
            <tr>
67 
	    <td align="center" background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 67 
               <%If CanIgnoreWarnings Then%><td align="center" nowrap background="images/bg_form_lightgray.gif"></td><%End If%>
68 
	    <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 68 
               <td align="center" background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
69 
	    <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 69 
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
70 
		<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 70 
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
71 
		<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 71 
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
72 
	    <td background="images/bg_form_lightgray.gif" class="form_item"></td>
 72 
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
73 
	  </tr>
 73 
               <td background="images/bg_form_lightgray.gif" class="form_item"></td>
74 
	<%
 74 
            </tr>
75 
	noDependencies = TRUE
 75 
            <%
76 
	End If
 76 
            noDependencies = TRUE
77 
	%>
 77 
         End If
78 
	<%
 78 
         %>
79 
	Dim objTempSession, pkgURL, workInProgress
 79 
         <%
80
80 
         Dim objTempSession, pkgURL, workInProgress
81 
	Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
 81 
 
82 
		pkgURL = "#"
 82 
         Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
83 
		If NOT IsNull(rsTemp.Fields("dpv_link")) Then pkgURL = scriptName &"?pv_id="& rsTemp("dpv_link") &"&rtag_id="& parRtag_id
 83 
            pkgURL = "#"
84
84 
            If NOT IsNull(rsTemp.Fields("dpv_link")) Then pkgURL = scriptName &"?pv_id="& rsTemp("dpv_link") &"&rtag_id="& NNrtag_id
85 
		If rsTemp("latest_dlocked") = "N" Then
 85 
 
86 
			workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
 86 
            If rsTemp("latest_dlocked") = "N" Then
87 
		Else
 87 
               workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
88 
			workInProgress = ""
 88 
            Else
89 
		End If
 89 
               workInProgress = ""
90
90 
            End If
91 
	%>
 91 
 
92 
	  <tr>
92 
            %>
93 
	    <%If CanIgnoreWarnings Then%><td align="center" nowrap background="images/bg_form_lightbluedark.gif"><input type="checkbox" name="forced" value="<%=rsTemp("ignore_dpv")%>" <%=Define_Ignore_State ( rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), rsTemp("pkg_state"), rsTemp("latest_pkg_version"), rsTemp("dlocked") )%>></td><%End If%>
 93 
            <tr>
94 
	    <td align="center" background="images/bg_form_lightgray.gif" class="form_item">
 94 
               <%If CanIgnoreWarnings Then%><td align="center" nowrap background="images/bg_form_lightbluedark.gif"><input type="checkbox" name="forced" value="<%=rsTemp("ignore_dpv")%>" <%=Define_Ignore_State ( rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), rsTemp("pkg_state"), rsTemp("latest_pkg_version"), rsTemp("dlocked") )%>></td><%End If%>
95 
		<%If rsTemp("pkg_state") = 0 AND rsTemp("deprecated_state") <> "" Then%>
95 
               <td align="center" background="images/bg_form_lightgray.gif" class="form_item">
96 
			<%=DefineStateIcon ( rsTemp("deprecated_state"), rsTemp("dlocked"), rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), FALSE )%>
 96 
                  <%If rsTemp("pkg_state") = 0 AND rsTemp("deprecated_state") <> "" Then%>
97 
		<%Else%>
 97 
                     <%=DefineStateIcon ( rsTemp("deprecated_state"), rsTemp("dlocked"), rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), FALSE )%>
98 
			<%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), FALSE )%>
 98 
                  <%Else%>
99 
		<%End If%>
99 
                     <%=DefineStateIcon ( rsTemp("pkg_state"), rsTemp("dlocked"), rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), FALSE )%>
100 
		</td>
 100 
                  <%End If%>
101 
	    <td background="images/bg_form_lightgray.gif" class="envPkg" nowrap><%If NOT IsNull(rsTemp.Fields("dpv_link")) Then%><a href="<%=pkgURL%>" class="txt_linked"><%=rsTemp.Fields("dpkg_name")%></a><%Else%><%=rsTemp.Fields("dpkg_name")%><%End If%></td>
 101 
               </td>
102 
	    <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("dpkg_version")%></td>
 102 
               <td background="images/bg_form_lightgray.gif" class="envPkg" nowrap><%If NOT IsNull(rsTemp.Fields("dpv_link")) Then%><a href="<%=pkgURL%>" class="txt_linked"><%=rsTemp.Fields("dpkg_name")%></a><%Else%><%=rsTemp.Fields("dpkg_name")%><%End If%></td>
103 
	    <td background="images/bg_form_lightgray.gif" <%If IsNull(rsTemp("ignore_warn")) Then%>class="sublbox_hitem"<%Else%>class="body_scol_thin"<%End If%>><%If rsTemp("latest_dlocked") = "Y" AND ( NOT IsNull(rsTemp("latest_pkg_version")) ) Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("latest_pkg_version")%></td>
 103 
               <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("dpkg_version")%></td>
104 
		<td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If NOT IsNull(rsTemp.Fields("modifier_name")) Then%><a href="mailto:<%=rsTemp.Fields("modifier_email")%>" class="txt_linked"><%=workInProgress%><%=rsTemp.Fields("modifier_name")%></a> on <%=EuroDateTime ( rsTemp("modified_stamp")  )%><%End If%></td>
 104 
               <td background="images/bg_form_lightgray.gif" <%If IsNull(rsTemp("ignore_warn")) Then%>class="sublbox_hitem"<%Else%>class="body_scol_thin"<%End If%>><%If rsTemp("latest_dlocked") = "Y" AND ( NOT IsNull(rsTemp("latest_pkg_version")) ) Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("latest_pkg_version")%></td>
105 
	    <td background="images/bg_form_lightgray.gif" class="form_item"><%If pkgInfoHash.Item ("dlocked") = "N" Then%><a href="_remove_build_dependency.asp?pv_id=<%=parPv_id%>&dpv_id=<%=rsTemp("orig_pv_id")%>&rtag_id=<%=parRtag_id%>" onClick="return confirmDelete('this Build Dependency');"><img src="images/i_delete.gif" alt="Remove from list." width="13" height="12" hspace="3" border="0"></a><%Else%><img src="images/i_delete_disable.gif" width="13" height="12" hspace="3" border="0"><%End If%></td>
 105 
               <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If NOT IsNull(rsTemp.Fields("modifier_name")) Then%><a href="mailto:<%=rsTemp.Fields("modifier_email")%>" class="txt_linked"><%=workInProgress%><%=rsTemp.Fields("modifier_name")%></a> on <%=EuroDateTime ( rsTemp("modified_stamp")  )%><%End If%></td>
106 
	  </tr>
 106 
               <td background="images/bg_form_lightgray.gif" class="form_item"><%If pkgInfoHash.Item ("dlocked") = "N" Then%><a href="_remove_build_dependency.asp?pv_id=<%=NNpv_id%>&dpv_id=<%=rsTemp("orig_pv_id")%>&rtag_id=<%=NNrtag_id%>" onClick="return confirmDelete('this Build Dependency');"><img src="images/i_delete.gif" alt="Remove from list." width="13" height="12" hspace="3" border="0"></a><%Else%><img src="images/i_delete_disable.gif" width="13" height="12" hspace="3" border="0"><%End If%></td>
107 
<%
 107 
            </tr>
108 
		rsTemp.MoveNext
 108 
            <%
109 
	Loop
 109 
            rsTemp.MoveNext
110 
%>	    <tr>
110 
         Loop
111 
		<%If noDependencies OR (ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE) Then%>
 111 
         %>
112 
		 <td></td>
 112 
        <tr>
113 
		<%Else%>
 113 
            <%If noDependencies OR (ReleaseMode = enumDB_RELEASE_IN_CLOSED_MODE) Then%>
114 
	     <%If CanIgnoreWarnings Then%><td nowrap background="images/bg_form_lightbluedark.gif" align="center"><input name="Submit" type="submit" class="form_btn" id="Submit" value="Apply" ></td><%End If%>
 114 
               <td></td>
115 
		<%End If%>
 115 
            <%Else%>
116 
	    <td colspan="2" class="body_scol"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
 116 
               <%If CanIgnoreWarnings Then%><td nowrap background="images/bg_form_lightbluedark.gif" align="center"><input name="Submit" type="submit" class="form_btn" id="Submit" value="Apply" ></td><%End If%>
117 
	    <td><img src="images/h_spacer.gif" width="150" height="1"></td>
 117 
            <%End If%>
118 
		<td></td>
 118 
            <td colspan="2" class="body_scol"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
119 
		<td></td>
 119 
            <td><img src="images/h_spacer.gif" width="150" height="1"></td>
120 
	    <td></td>
 120 
            <td></td>
121 
	  </tr>
 121 
            <td></td>
122 
	  <input type="hidden" name="pv_id" value="<%=parPv_id%>">
 122 
            <td></td>
123 
	  <input type="hidden" name="rtag_id" value="<%=parRtag_id%>">
 123 
         </tr>
124 
	  </form>
 124 
         <input type="hidden" name="pv_id" value="<%=NNpv_id%>">
125 
	</table>
125 
         <input type="hidden" name="rtag_id" value="<%=NNrtag_id%>">
126 
<%
126 
      </form>
127 
	OraDatabase.Parameters.Remove "RTAG_ID"
 127 
   </table>
128 
	OraDatabase.Parameters.Remove "PV_ID"
 128 
   <%
129 
	rsTemp.Close
 129 
   OraDatabase.Parameters.Remove "RTAG_ID"
130 
	Set rsTemp = nothing
 130 
   OraDatabase.Parameters.Remove "PV_ID"
- 
 
 131 
   rsTemp.Close
- 
 
 132 
   Set rsTemp = nothing
131 
End Sub
 133 
End Sub
132 
'-----------------------------------------------------------------------------------------------------------------
 134 
'-----------------------------------------------------------------------------------------------------------------
133 
Sub Print_Patch_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
 135 
Sub Print_Patch_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
134 
	Dim rsTemp, Query_String, noDependencies
 136 
   Dim rsTemp, Query_String, noDependencies
135 
	noDependencies = FALSE
 137 
   noDependencies = FALSE
136
138 
 
137 
	Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
 139 
   Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
138
140 
 
139 
	OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
 141 
   OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
140 
	OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
 142 
   OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
141
143 
 
142 
	OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
 144 
   OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
143 
	OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
 145 
   OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
144
146 
 
145 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )%>
 147 
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )%>
146
148 
 
147 
	<table width="100%" border="0" cellspacing="1" cellpadding="3">
 149 
   <table width="100%" border="0" cellspacing="1" cellpadding="3">
148 
	  <tr>
150 
      <tr>
149 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Name<br><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
 151 
         <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">Name<br><img src="images/h_trsp_dot.gif" width="120" height="1"></td>
150 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
 152 
         <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
151 
		<td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
 153 
         <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
152 
	    <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
 154 
         <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
153 
	  </tr>
 155 
      </tr>
154 
	<%' Display "no dependencies" if needed%>
 156 
      <%' Display "no dependencies" if needed%>
155 
	<%If rsTemp.RecordCount = 0 Then%>
 157 
      <%If rsTemp.RecordCount = 0 Then%>
156 
	  <tr>
158 
         <tr>
157 
	    <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 159 
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
158 
	    <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 160 
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
159 
		<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 161 
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
160 
		<td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
 162 
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
161 
	  </tr>
 163 
         </tr>
162 
	<%
 164 
         <%
163 
	noDependencies = TRUE
 165 
         noDependencies = TRUE
164 
	End If
 166 
      End If
165 
	%>
 167 
      %>
166 
	<%
 168 
      <%
167 
	Dim objTempSession, pkgURL, workInProgress
 169 
      Dim objTempSession, pkgURL, workInProgress
168
170 
 
169 
	Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
 171 
      Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
170 
		pkgURL = "#"
 172 
         pkgURL = "#"
171 
		If NOT IsNull(rsTemp.Fields("dpv_link")) Then pkgURL = scriptName &"?pv_id="& rsTemp("orig_pv_id") &"&rtag_id="& parRtag_id
 173 
         If NOT IsNull(rsTemp.Fields("dpv_link")) Then pkgURL = scriptName &"?pv_id="& rsTemp("orig_pv_id") &"&rtag_id="& parRtag_id
172
174 
 
173 
		If rsTemp("latest_dlocked") = "N" Then
 175 
         If rsTemp("latest_dlocked") = "N" Then
174 
			workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
 176 
            workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
175 
		Else
 177 
         Else
176 
			workInProgress = ""
 178 
            workInProgress = ""
177 
		End If
 179 
         End If
178
180 
 
179 
	%>
 181 
         %>
180 
	  <tr>
182 
         <tr>
181 
	    <td background="images/bg_form_lightgray.gif" class="envPkg" nowrap><a href="<%=pkgURL%>" class="txt_linked"><%If rsTemp("is_patch") = "Y" Then%><%=PatchIcon ( rsTemp("is_patch"), rsTemp("is_obsolete") )%><%End If%><%=rsTemp.Fields("dpkg_name")%></a></td>
 183 
            <td background="images/bg_form_lightgray.gif" class="envPkg" nowrap><a href="<%=pkgURL%>" class="txt_linked"><%If rsTemp("is_patch") = "Y" Then%><%=PatchIcon ( rsTemp("is_patch"), rsTemp("is_obsolete") )%><%End If%><%=rsTemp.Fields("dpkg_name")%></a></td>
182 
	    <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("dpkg_version")%></td>
 184 
            <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If rsTemp("dlocked") = "Y" Then%><%=imgPkgLocked%><%Else%><%=imgPkgLockSpacer%><%End If%><%=rsTemp("dpkg_version")%></td>
183 
		<td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If NOT IsNull(rsTemp.Fields("modifier_name")) Then%><a href="mailto:<%=rsTemp.Fields("modifier_email")%>" class="txt_linked"><%=workInProgress%><%=rsTemp.Fields("modifier_name")%></a> on <%=EuroDateTime ( rsTemp("modified_stamp") )%><%End If%></td>
 185 
            <td background="images/bg_form_lightgray.gif" class="form_item" nowrap><%If NOT IsNull(rsTemp.Fields("modifier_name")) Then%><a href="mailto:<%=rsTemp.Fields("modifier_email")%>" class="txt_linked"><%=workInProgress%><%=rsTemp.Fields("modifier_name")%></a> on <%=EuroDateTime ( rsTemp("modified_stamp") )%><%End If%></td>
184 
	    <td background="images/bg_form_lightgray.gif" class="form_item"><%If pkgInfoHash.Item ("dlocked") = "N" Then%><a href="_remove_build_dependency.asp?pv_id=<%=parPv_id%>&dpv_id=<%=rsTemp("orig_pv_id")%>&rtag_id=<%=parRtag_id%>" onClick="return confirmDelete('this Build Dependency');"><img src="images/i_delete.gif" alt="Remove from list." width="13" height="12" hspace="3" border="0"></a><%Else%><img src="images/i_delete_disable.gif" width="13" height="12" hspace="3" border="0"><%End If%></td>
 186 
            <td background="images/bg_form_lightgray.gif" class="form_item"><%If pkgInfoHash.Item ("dlocked") = "N" Then%><a href="_remove_build_dependency.asp?pv_id=<%=parPv_id%>&dpv_id=<%=rsTemp("orig_pv_id")%>&rtag_id=<%=parRtag_id%>" onClick="return confirmDelete('this Build Dependency');"><img src="images/i_delete.gif" alt="Remove from list." width="13" height="12" hspace="3" border="0"></a><%Else%><img src="images/i_delete_disable.gif" width="13" height="12" hspace="3" border="0"><%End If%></td>
185 
	  </tr>
 187 
         </tr>
186 
<%
 188 
         <%
187 
		rsTemp.MoveNext
 189 
         rsTemp.MoveNext
188 
	Loop
 190 
      Loop
- 
 
 191 
      %>
189 
%>	    <tr>
192 
      <tr>
190 
	    <td colspan="2" class="body_scol"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
 193 
         <td colspan="2" class="body_scol"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
191 
		<td></td>
 194 
         <td></td>
192 
	    <td></td>
 195 
         <td></td>
193 
		<td></td>
 196 
         <td></td>
194 
	  </tr>
 197 
      </tr>
195 
	</table>
198 
   </table>
196 
<%
199 
   <%
197 
	OraDatabase.Parameters.Remove "RTAG_ID"
 200 
   OraDatabase.Parameters.Remove "RTAG_ID"
198 
	OraDatabase.Parameters.Remove "PV_ID"
 201 
   OraDatabase.Parameters.Remove "PV_ID"
199 
	rsTemp.Close
 202 
   rsTemp.Close
200 
	Set rsTemp = nothing
 203 
   Set rsTemp = nothing
201 
End Sub
 204 
End Sub
202 
'-----------------------------------------------------------------------------------------------------------------
 205 
'-----------------------------------------------------------------------------------------------------------------
203 
Function Define_Ignore_State ( BBcurr_ignore_state, cIsPatchIgnore, NNpkg_state, SSlatest, SSdlocked )
 206 
Function Define_Ignore_State ( BBcurr_ignore_state, cIsPatchIgnore, NNpkg_state, SSlatest, SSdlocked )
204 
	' ==== Ignore Warning Rules ====
 207 
   ' ==== Ignore Warning Rules ====
205 
	' ENABLE - Dependency is   official  AND  PKG_STATE is OK  AND  has no latest  AND  current ignore warning is not ticked AND not Patch Ignore
 208 
   ' ENABLE - Dependency is   official  AND  PKG_STATE is OK  AND  has no latest  AND  current ignore warning is not ticked AND not Patch Ignore
206 
	' ENABLE - current ignore state is ticked AND not Patch Ignore
 209 
   ' ENABLE - current ignore state is ticked AND not Patch Ignore
207
210 
 
208 
	If  (SSdlocked = "Y") AND _
 211 
   If  (SSdlocked = "Y") AND _
209 
		( (CInt(NNpkg_state) <> enumPKG_STATE_OK) OR (SSlatest <> "") ) _
 212 
      ( (CInt(NNpkg_state) <> enumPKG_STATE_OK) OR (SSlatest <> "") ) _
210 
	Then
 213 
   Then
211
214 
 
212 
		Define_Ignore_State = " "& BBcurr_ignore_state
 215 
      Define_Ignore_State = " "& BBcurr_ignore_state
213
216 
 
214 
	Else
 217 
   Else
215
218 
 
216 
		Define_Ignore_State = "disabled "& BBcurr_ignore_state
 219 
      Define_Ignore_State = "disabled "& BBcurr_ignore_state
217
220 
 
218 
	End If
 221 
   End If
219
222 
 
220
223 
 
221 
	'If ( (SSdlocked = "Y") AND _
 224 
   'If ( (SSdlocked = "Y") AND _
222 
	'     (CInt(NNpkg_state) = enumPKG_STATE_OK) AND _
 225 
   '     (CInt(NNpkg_state) = enumPKG_STATE_OK) AND _
223 
	'     (SSlatest <> "") AND _
 226 
   '     (SSlatest <> "") AND _
224 
	'     IsNull(BBcurr_ignore_state) AND _
 227 
   '     IsNull(BBcurr_ignore_state) AND _
225 
	'	 IsNull(cIsPatchIgnore) ) _
 228 
   '    IsNull(cIsPatchIgnore) ) _
226 
	'   OR _
 229 
   '   OR _
227 
	'   ( NOT IsNull(BBcurr_ignore_state)  AND  IsNull(cIsPatchIgnore) ) Then
 230 
   '   ( NOT IsNull(BBcurr_ignore_state)  AND  IsNull(cIsPatchIgnore) ) Then
228 
	'
231 
   '
229 
	'	Define_Ignore_State = " "& BBcurr_ignore_state
 232 
   '   Define_Ignore_State = " "& BBcurr_ignore_state
230 
	'Else
 233 
   'Else
231 
	'	Define_Ignore_State = "disabled "& BBcurr_ignore_state
 234 
   '   Define_Ignore_State = "disabled "& BBcurr_ignore_state
232 
	'End If
 235 
   'End If
233 
End Function
 236 
End Function
234 
'-----------------------------------------------------------------------------------------------------------------
 237 
'-----------------------------------------------------------------------------------------------------------------
235 
'-----------------------------------------------------------------------------------------------------------------
 238 
'-----------------------------------------------------------------------------------------------------------------
236 
%>
 239 
%>
237 
<%
 240 
<%
Line 239... Line 242...
239 
 
 242 
 
240 
 
 243 
 
241 
'---------------------------------------------------------------
 244 
'---------------------------------------------------------------
242 
%>
 245 
%>
243 
<%If (parPv_id <> "") Then%>
 246 
<%If (parPv_id <> "") Then%>
244 
<!-- MAIN PAGE ------------------------------------------>
 247 
   <!-- MAIN PAGE ------------------------------------------>
245 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 248 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
246 
  <tr>
 249 
      <tr>
247 
    <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
 250 
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
248 
    <td width="100%" background="images/bg_action_norm.gif"><!--#include file="_pkg_action_buttons.asp"--></td>
 251 
         <td width="100%" background="images/bg_action_norm.gif"><!--#include file="_pkg_action_buttons.asp"--></td>
249 
    <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
 252 
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
250 
  </tr>
 253 
      </tr>
251 
  <!-- PACKAGE PROPERTIES ----------------------------  -->
 254 
      <!-- PACKAGE PROPERTIES ----------------------------  -->
252 
  <%Call RenderPackageProperties ()%>
 255 
      <%Call RenderPackageProperties ()%>
253 
  <tr>
 256 
      <tr>
254 
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
 257 
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
255 
    <td valign="bottom" background="images/bg_lght_gray.gif">
 258 
         <td valign="bottom" background="images/bg_lght_gray.gif">
256 
      <table width="100" border="0" cellspacing="0" cellpadding="0">
 259 
            <table width="100" border="0" cellspacing="0" cellpadding="0">
257 
        <tr>
 260 
               <tr>
258 
          <td><IMG height=1 src="images/spacer.gif" width=50></td>
 261 
                  <td><IMG height=1 src="images/spacer.gif" width=50></td>
259 
          <td>
 262 
                  <td>
260 
		  <!-- TABS ------------------------------------->
 263 
                     <!-- TABS ------------------------------------->
261 
		  <%Call Generate_Tab_Menu ( TABarray1, "Dependencies", "orange" )%>
 264 
                     <%Call Generate_Tab_Menu ( TABarray1, "Dependencies", "orange" )%>
262 
		  </td>
 265 
                  </td>
263 
        </tr>
 266 
               </tr>
264 
      </table>
 267 
            </table>
265 
    </td>
 268 
         </td>
266 
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
 269 
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
267 
  </tr>
 270 
      </tr>
268 
  <tr>
 271 
      <tr>
269 
    <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
 272 
         <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
270 
    <td background="images/lbox_bg_orange.gif">
 273 
         <td background="images/lbox_bg_orange.gif">
271 
	<!-- TAB ACTION BUTTONS ------------------------------------->
 274 
            <!-- TAB ACTION BUTTONS ------------------------------------->
272 
	<%Call Action_Buttons ( "Build Dependencies" )%>
275 
            <%Call Action_Buttons ( "Build Dependencies" )%>
273 
	</td>
 276 
         </td>
274 
    <td background="images/lbox_bg_orange.gif">&nbsp;</td>
 277 
         <td background="images/lbox_bg_orange.gif">&nbsp;</td>
275 
  </tr>
 278 
      </tr>
276 
  <tr>
 279 
      <tr>
277 
    <td></td>
 280 
         <td></td>
278 
    <td valign="top">
 281 
         <td valign="top">
279 
	<!-- BUILD DEPENDENCIES ------------------------------------->
 282 
            <!-- BUILD DEPENDENCIES ------------------------------------->
280 
	<br>
 283 
            <br>
281 
	<fieldset>
 284 
            <fieldset>
282 
	<legend class="body_colb">Build Dependencies</legend>
285 
               <legend class="body_colb">Build Dependencies</legend>
283 
	<a name="DEPENDENCIES"></a>
 286 
               <a name="DEPENDENCIES"></a>
284 
	<%
 287 
               <%
285 
	If pkgInfoHash.Item ("is_patch") = "Y" Then
 288 
               If pkgInfoHash.Item ("is_patch") = "Y" Then
286 
		Call Print_Patch_Dependencies ( parPv_id, parRtag_id, FALSE )
 289 
                  Call Print_Patch_Dependencies ( parPv_id, parRtag_id, FALSE )
287 
	Else
 290 
               Else
288 
		Call Print_Pkg_Dependencies ( parPv_id, parRtag_id, FALSE )
 291 
                  Call Print_Pkg_Dependencies ( parPv_id, parRtag_id, FALSE )
289 
	End If
 292 
               End If
290 
	%>
 293 
               %>
291 
	</fieldset>
 294 
            </fieldset>
292 
	<br><br>
 295 
            <br><br>
293 
	<!-- MODULE CHANGES ----------------------------------------->
 296 
            <!-- MODULE CHANGES ----------------------------------------->
294 
	<table width="100%"  border="0" cellspacing="0" cellpadding="3">
 297 
            <table width="100%"  border="0" cellspacing="0" cellpadding="3">
295 
	  <tr>
 298 
               <tr>
296 
		<td align="right"><a href="javascript:;" onClick="MM_openBrWindow('_wform_dependency_changes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&rfile=<%=ScriptName%>&compare_pv_id=<%=Request("compare_pv_id")%>&filediff=<%=Request("filediff")%>','DependencyChanges','scrollbars=yes,resizable=yes,width=700,height=600')" class="txt_linked" title='Open this section in new window.'><%=LIMG_NEW_WINDOW%>New Window</a> </td>
 299 
                  <td align="right"><a href="javascript:;" onClick="MM_openBrWindow('_wform_dependency_changes.asp?rtag_id=<%=parRtag_id%>&pv_id=<%=parPv_id%>&rfile=<%=ScriptName%>&compare_pv_id=<%=Request("compare_pv_id")%>&filediff=<%=Request("filediff")%>','DependencyChanges','scrollbars=yes,resizable=yes,width=700,height=600')" class="txt_linked" title='Open this section in new window.'><%=LIMG_NEW_WINDOW%>New Window</a> </td>
297 
	  </tr>
 300 
               </tr>
298 
	</table>
 301 
            </table>
299 
 
 302 
 
300 
	<fieldset>
 303 
            <fieldset>
301 
	<legend class="body_colb">Dependency Changes</legend>
304 
               <legend class="body_colb">Dependency Changes</legend>
302 
	<!--#include file="_mod_dependency_changes.asp"-->
 305 
               <!--#include file="_mod_dependency_changes.asp"-->
303 
	</fieldset><br>
 306 
            </fieldset><br>
304 
	<!----------------------------------------------------------->
 307 
            <!----------------------------------------------------------->
305 
	</td>
 308 
         </td>
306 
    <td>&nbsp;</td>
 309 
         <td>&nbsp;</td>
307 
  </tr>
 310 
      </tr>
308 
</table>
 311 
   </table>
309 
 
 312 
 
310 
<%Else%>
 313 
<%Else%>
311 
 
 314 
 
312 
<!-- NO PACKAGE SELECTED  ------------------------------------>
 315 
   <!-- NO PACKAGE SELECTED  ------------------------------------>
313 
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 316 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
314 
  <tr>
 317 
      <tr>
315 
    <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
 318 
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
316 
    <td width="100%" background="images/bg_action_norm.gif"></td>
 319 
         <td width="100%" background="images/bg_action_norm.gif"></td>
317 
    <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
 320 
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
318 
  </tr>
 321 
      </tr>
319 
  <tr>
 322 
      <tr>
320 
    <td background="images/bg_lght_gray.gif"><IMG height=50 src="images/spacer.gif" width=1></td>
 323 
         <td background="images/bg_lght_gray.gif"><IMG height=50 src="images/spacer.gif" width=1></td>
321 
    <td background="images/bg_lght_gray.gif" nowrap class="lbox_ttl"></td>
 324 
         <td background="images/bg_lght_gray.gif" nowrap class="lbox_ttl"></td>
322 
    <td background="images/bg_lght_gray.gif"></td>
 325 
         <td background="images/bg_lght_gray.gif"></td>
323 
  </tr>
 326 
      </tr>
324 
  <tr>
 327 
      <tr>
325 
    <td background="images/bg_lght_gray.gif"></td>
 328 
         <td background="images/bg_lght_gray.gif"></td>
326 
    <td valign="bottom" background="images/bg_lght_gray.gif">
 329 
         <td valign="bottom" background="images/bg_lght_gray.gif">
327 
      <table width="100" border="0" cellspacing="0" cellpadding="0">
 330 
            <table width="100" border="0" cellspacing="0" cellpadding="0">
328 
        <tr>
 331 
               <tr>
329 
          <td><IMG height=1 src="images/spacer.gif" width=150></td>
 332 
                  <td><IMG height=1 src="images/spacer.gif" width=150></td>
330 
          <td><!-- TABS -------------------------------------></td>
 333 
                  <td><!-- TABS -------------------------------------></td>
331 
        </tr>
 334 
               </tr>
332 
      </table>
 335 
            </table>
333 
    </td>
 336 
         </td>
334 
    <td background="images/bg_lght_gray.gif">&nbsp;</td>
 337 
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
335 
  </tr>
 338 
      </tr>
336 
  <tr>
 339 
      <tr>
337 
    <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
 340 
         <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
338 
    <td background="images/lbox_bg_orange.gif"><span class="sublbox_ttl">&laquo;&nbsp;Select package</span></td>
 341 
         <td background="images/lbox_bg_orange.gif"><span class="sublbox_ttl">&laquo;&nbsp;Select package</span></td>
339 
    <td background="images/lbox_bg_orange.gif">&nbsp;</td>
 342 
         <td background="images/lbox_bg_orange.gif">&nbsp;</td>
340 
  </tr>
 343 
      </tr>
341 
  <tr>
 344 
      <tr>
342 
    <td></td>
 345 
         <td></td>
343 
    <td valign="top"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
 346 
         <td valign="top"><SPAN id="ProgressBar" name="ProgressBar" style="visibility:hidden;"><img src="images/i_processing.gif" width="11" height="17" align="absmiddle" hspace="3">Processing...</SPAN></td>
344 
    <td>&nbsp;</td>
 347 
         <td>&nbsp;</td>
345 
  </tr>
 348 
      </tr>
346 
</table>
 349 
   </table>
347 
<%End If%>
 350 
<%End If%>
348 
<%'Response.write "TOTAL TIME: "&  Timer - tempTimer%>
 - 
 
349 

            351
            
<%'Response.write "TOTAL TIME: "&  Timer - tempTimer%>

          

          

            -
            
 

            352