Subversion Repositories DevTools

Rev

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

Rev 129 Rev 5357
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|                      REPORT                       |
 5 
'|                      REPORT                       |
6 
'|                      Escrow                       |
 6 
'|                      Escrow                       |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
' Good idea to set when using redirect
 11 
' Good idea to set when using redirect
12 
Response.Expires = 0   ' always load the page, dont store
 12 
Response.Expires = 0   ' always load the page, dont store
13 
%>
 13 
%>
14 
<!--#include file="common/conf.asp"-->
 14 
<!--#include file="common/conf.asp"-->
15 
<!--#include file="common/globals.asp"-->
 15 
<!--#include file="common/globals.asp"-->
16 
<!--#include file="common/common_subs.asp"-->
 16 
<!--#include file="common/common_subs.asp"-->
17 
<!--#include file="common/formating.asp"-->
 17 
<!--#include file="common/formating.asp"-->
18 
<!--#include file="common/qstr.asp"-->
 18 
<!--#include file="common/qstr.asp"-->
19 
<!--#include file="common/common_dbedit.asp"-->
 19 
<!--#include file="common/common_dbedit.asp"-->
20 
<%
 20 
<%
21 
'------------ ACCESS CONTROL ------------------
 21 
'------------ ACCESS CONTROL ------------------
22 
%>
 22 
%>
23 
<!--#include file="_access_control_general.asp"-->
 23 
<!--#include file="_access_control_general.asp"-->
24 
<%
 24 
<%
25 
'------------ Variable Definition -------------
 25 
'------------ Variable Definition -------------
26 
Dim rsQry
 26 
Dim rsQry
27 
Dim rsTemp
 27 
Dim rsTemp
28 
Dim parPv_id, parExt
 28 
Dim parPv_id, parExt
29 
Dim objReleaseContent
 29 
Dim objReleaseContent
30 
Dim aReleaseContent
 30 
Dim aReleaseContent
31 
Dim objPackageDetails
 31 
Dim objPackageDetails
32 
Dim BldStd
 32 
Dim BldStd
33 
'------------ Constants Declaration -----------
 33 
'------------ Constants Declaration -----------
34 
'------------ Variable Init -------------------
 34 
'------------ Variable Init -------------------
35 
parRtag_id = Request("rtag_id")
 35 
parRtag_id = Request("rtag_id")
36 
parExt = Request("ext")
 36 
parExt = Request("ext")
37 
Set objReleaseContent = CreateObject("Scripting.Dictionary")
 37 
Set objReleaseContent = CreateObject("Scripting.Dictionary")
38 
Set objPackageDetails = CreateObject("Scripting.Dictionary")
 38 
Set objPackageDetails = CreateObject("Scripting.Dictionary")
39 
'----------------------------------------------
 39 
'----------------------------------------------
40 
%>
 40 
%>
41 
<%
 41 
<%
42 
'----------------------------------------------------------------------------------------------------------------------------------------
 42 
'----------------------------------------------------------------------------------------------------------------------------------------
43 
Sub GetPackageInformation ( nPv_id, ByRef oPackageDetails )
 43 
Sub GetPackageInformation ( nPv_id, ByRef oPackageDetails )
44 
   Dim rsQry, query
 44 
   Dim rsQry, query
45 
   query = _
 45 
   query = _
46 
   " SELECT pkg.pkg_name, pv.* "&_
 46 
   " SELECT pkg.pkg_name, pv.* "&_
47 
   "   FROM PACKAGES pkg,"&_
 47 
   "   FROM PACKAGES pkg,"&_
48 
   "        PACKAGE_VERSIONS pv"&_
 48 
   "        PACKAGE_VERSIONS pv"&_
49 
   "  WHERE pv.pv_id = "& nPv_id &_
 49 
   "  WHERE pv.pv_id = "& nPv_id &_
50 
   "    AND pv.pkg_id = pkg.pkg_id   "
 50 
   "    AND pv.pkg_id = pkg.pkg_id   "
51 
 
 51 
 
52 
   Set rsQry = OraDatabase.DbCreateDynaset( query, 0)
 52 
   Set rsQry = OraDatabase.DbCreateDynaset( query, 0)
53 
 
 53 
 
54 
   oPackageDetails.RemoveAll
 54 
   oPackageDetails.RemoveAll
55 
 
 55 
 
56 
   If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then
 56 
   If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then
57 
      oPackageDetails("pkg_name") = rsQry("pkg_name")
 57 
      oPackageDetails("pkg_name") = rsQry("pkg_name")
58 
      oPackageDetails("pkg_version") = rsQry("pkg_version")
 58 
      oPackageDetails("pkg_version") = rsQry("pkg_version")
59 
      oPackageDetails("v_ext") = rsQry("v_ext")
 59 
      oPackageDetails("v_ext") = rsQry("v_ext")
60 
      oPackageDetails("pv_description") = rsQry("pv_description")
 60 
      oPackageDetails("pv_description") = rsQry("pv_description")
61 
      oPackageDetails("pv_overview") = rsQry("pv_overview")
 61 
      oPackageDetails("pv_overview") = rsQry("pv_overview")
62 
      oPackageDetails("src_path") = rsQry("src_path")
 62 
      oPackageDetails("src_path") = rsQry("src_path")
63 
      oPackageDetails("pkg_label") = rsQry("pkg_label")
 63 
      oPackageDetails("pkg_label") = rsQry("pkg_label")
64 
      oPackageDetails("is_build_env_required") = rsQry("is_build_env_required")
 64 
      oPackageDetails("is_build_env_required") = rsQry("is_build_env_required")
65 
 
 65 
 
66 
   End If
 66 
   End If
67 
 
 67 
 
68 
   rsQry.Close()
 68 
   rsQry.Close()
69 
   Set rsQry = Nothing
 69 
   Set rsQry = Nothing
70 
End Sub
 70 
End Sub
71 
'----------------------------------------------------------------------------------------------------------------------------------------
 71 
'----------------------------------------------------------------------------------------------------------------------------------------
72 
Function SQL_Build_Std ( nPv_id )
 72 
Function SQL_Build_Std ( nPv_id )
73 
   SQL_Build_Std = _
 73 
   SQL_Build_Std = _
74 
   " SELECT bs.bs_name"&_
 74 
   " SELECT bs.bs_name"&_
75 
   "   FROM RELEASE_MANAGER.PACKAGE_VERSIONS pv,"&_
 75 
   "   FROM RELEASE_MANAGER.PACKAGE_VERSIONS pv,"&_
76 
   "        RELEASE_MANAGER.BUILD_STANDARDS bs"&_
 76 
   "        RELEASE_MANAGER.BUILD_STANDARDS bs"&_
77 
   "  WHERE pv.PV_ID = "& nPv_id &_
 77 
   "  WHERE pv.PV_ID = "& nPv_id &_
78 
   "    AND pv.BS_ID = bs.BS_ID "
 78 
   "    AND pv.BS_ID = bs.BS_ID "
79 
End Function
 79 
End Function
80 
'----------------------------------------------------------------------------------------------------------------------------------------
 80 
'----------------------------------------------------------------------------------------------------------------------------------------
81 
Function SQL_Build_Env ( nPv_id )
 81 
Function SQL_Build_Env ( nPv_id )
82 
   SQL_Build_Env = _
 82 
   SQL_Build_Env = _
83 
   " SELECT bm.bm_name"&_
 83 
   " SELECT bm.bm_name"&_
84 
   "  FROM  RELEASE_MANAGER.PACKAGE_BUILD_INFO pbi,"&_
 84 
   "  FROM  RELEASE_MANAGER.PACKAGE_BUILD_INFO pbi,"&_
85 
   "        RELEASE_MANAGER.BUILD_MACHINES bm"&_
 85 
   "        RELEASE_MANAGER.BUILD_MACHINES bm"&_
86 
   "  WHERE pbi.PV_ID = "& nPv_id &_
 86 
   "  WHERE pbi.PV_ID = "& nPv_id &_
87 
   "    AND pbi.BM_ID = bm.BM_ID "&_
 87 
   "    AND pbi.BM_ID = bm.BM_ID "&_
88 
   "  ORDER BY UPPER(bm.BM_NAME) "
 88 
   "  ORDER BY UPPER(bm.BM_NAME) "
89 
End Function
 89 
End Function
90 
'----------------------------------------------------------------------------------------------------------------------------------------
 90 
'----------------------------------------------------------------------------------------------------------------------------------------
91 
Function SQL_Build_Dependencies ( nPv_id )
 91 
Function SQL_Build_Dependencies ( nPv_id )
92 
   SQL_Build_Dependencies = _
 92 
   SQL_Build_Dependencies = _
93 
   " SELECT dpkg.pkg_name, dpv.pkg_version"&_
 93 
   " SELECT dpkg.pkg_name, dpv.pkg_version"&_
94 
   "   FROM PACKAGE_DEPENDENCIES dep,"&_
 94 
   "   FROM PACKAGE_DEPENDENCIES dep,"&_
95 
   "        PACKAGES dpkg,"&_
 95 
   "        PACKAGES dpkg,"&_
96 
   "        PACKAGE_VERSIONS dpv"&_
 96 
   "        PACKAGE_VERSIONS dpv"&_
97 
   "  WHERE dep.pv_id = "& nPv_id &_
 97 
   "  WHERE dep.pv_id = "& nPv_id &_
98 
   "    AND dep.DPV_ID = dpv.pv_id"&_
 98 
   "    AND dep.DPV_ID = dpv.pv_id"&_
99 
   "    AND dpv.pkg_id = dpkg.pkg_id   "&_
 99 
   "    AND dpv.pkg_id = dpkg.pkg_id   "&_
100 
   " ORDER BY UPPER(dpkg.pkg_name) "
 100 
   " ORDER BY UPPER(dpkg.pkg_name) "
101 
End Function
 101 
End Function
102 
'----------------------------------------------------------------------------------------------------------------------------------------
 102 
'----------------------------------------------------------------------------------------------------------------------------------------
103 
Sub GetReleaseContent ( nRtag_id, ByRef oReleaseContent )
 103 
Sub GetReleaseContent ( nRtag_id, ByRef oReleaseContent )
104 
   Dim rsQry, query
 104 
   Dim rsQry, query
105 
   query = _
 105 
   query = _
106 
   " SELECT qry.pv_id"&_
 106 
   " SELECT qry.pv_id"&_
107 
   "  FROM ("&_
 107 
   "  FROM ("&_
108 
   "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, 1 AS seq_num"&_
 108 
   "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, 1 AS seq_num"&_
109 
   "        FROM RELEASE_CONTENT rc,"&_
 109 
   "        FROM RELEASE_CONTENT rc,"&_
110 
   "             PACKAGES pkg,"&_
 110 
   "             PACKAGES pkg,"&_
111 
   "             PACKAGE_VERSIONS pv"&_
 111 
   "             PACKAGE_VERSIONS pv"&_
112 
   "       WHERE rc.rtag_id = "& nRtag_id  &_
 112 
   "       WHERE rc.rtag_id = "& nRtag_id  &_
113 
   "         AND pv.pkg_id = pkg.pkg_id"&_
 113 
   "         AND pv.pkg_id = pkg.pkg_id"&_
114 
   "         AND rc.pv_id = pv.pv_id"&_
 114 
   "         AND rc.pv_id = pv.pv_id"&_
115 
   "         AND rc.BASE_VIEW_ID = 5  "&_
 115 
   "         AND rc.BASE_VIEW_ID = 5  "&_
116 
   "      UNION   "&_
 116 
   "      UNION   "&_
117 
   "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, 2 AS seq_num"&_
 117 
   "      SELECT pv.pv_id, pkg.pkg_name, pv.pkg_version, 2 AS seq_num"&_
118 
   "        FROM RELEASE_CONTENT rc,"&_
 118 
   "        FROM RELEASE_CONTENT rc,"&_
119 
   "             PACKAGES pkg,"&_
 119 
   "             PACKAGES pkg,"&_
120 
   "             PACKAGE_VERSIONS pv"&_
 120 
   "             PACKAGE_VERSIONS pv"&_
121 
   "       WHERE rc.rtag_id = "& nRtag_id &_
 121 
   "       WHERE rc.rtag_id = "& nRtag_id &_
122 
   "         AND pv.pkg_id = pkg.pkg_id"&_
 122 
   "         AND pv.pkg_id = pkg.pkg_id"&_
123 
   "         AND rc.pv_id = pv.pv_id"&_
 123 
   "         AND rc.pv_id = pv.pv_id"&_
124 
   "         AND rc.BASE_VIEW_ID != 5"&_
 124 
   "         AND rc.BASE_VIEW_ID != 5"&_
125 
   "      ) qry  "&_
 125 
   "      ) qry  "&_
126 
   " ORDER BY qry.seq_num, UPPER(qry.pkg_name)"
 126 
   " ORDER BY qry.seq_num, UPPER(qry.pkg_name)"
127 
 
 127 
 
128 
   Set rsQry = OraDatabase.DbCreateDynaset( query, 0)
 128 
   Set rsQry = OraDatabase.DbCreateDynaset( query, 0)
129 
 
 129 
 
130 
   While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 130 
   While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
131 
      oReleaseContent( CStr( rsQry("pv_id")) ) = ""
 131 
      oReleaseContent( CStr( rsQry("pv_id")) ) = ""
132 
      rsQry.MoveNext()
 132 
      rsQry.MoveNext()
133 
   WEnd
 133 
   WEnd
134 
 
 134 
 
135 
   rsQry.Close()
 135 
   rsQry.Close()
136 
   Set rsQry = Nothing
 136 
   Set rsQry = Nothing
137 
End Sub
 137 
End Sub
138 
'----------------------------------------------------------------------------------------------------------------------------------------
 138 
'----------------------------------------------------------------------------------------------------------------------------------------
139 
 
 139 
 
140 
%>
 140 
%>
141 
<%
 141 
<%
142 
'---------------------- Run Before Page ---------------------------
 142 
'---------------------- Run Before Page ---------------------------
143 
Call GetReleaseContent ( parRtag_id, objReleaseContent )
 143 
Call GetReleaseContent ( parRtag_id, objReleaseContent )
144 
'------------------------------------------------------------------
 144 
'------------------------------------------------------------------
145 
%>
 145 
%>
146 
<html>
 146 
<html>
147 
<head>
 147 
<head>
148 
<title>Release Manager</title>
 148 
<title>Release Manager</title>
149 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 149 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
150 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 150 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
151 
</head>
 151 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
152 
<body>
 152 
</head>
153 
 
 153 
<body>
154 
<%
 154 
 
155 
aReleaseContent = objReleaseContent.Keys
 155 
<%
156 
For Each parPv_id In aReleaseContent
 156 
aReleaseContent = objReleaseContent.Keys
157 
   Response.Flush
 157 
For Each parPv_id In aReleaseContent
158 
   Call GetPackageInformation ( parPv_id, objPackageDetails )
 158 
   Response.Flush
159 
   %>
 159 
   Call GetPackageInformation ( parPv_id, objPackageDetails )
160 
   <a name="<%=objPackageDetails.Item("pkg_name")%>"></a>
 160 
   %>
161 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
 161 
   <a name="<%=objPackageDetails.Item("pkg_name")%>"></a>
162 
      <tr>
 162 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
163 
         <td class="body_colb"><h3><%=objPackageDetails.Item("pkg_name")%></h3></td>
 163 
      <tr>
164 
      </tr>
 164 
         <td class="body_colb"><h3><%=objPackageDetails.Item("pkg_name")%></h3></td>
165 
   </table>
 165 
      </tr>
166 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
 166 
   </table>
167 
      <tr>
 167 
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
168 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Version:</strong></td>
 168 
      <tr>
169 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("pkg_version")%></td>
 169 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Version:</strong></td>
170 
      </tr>
 170 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("pkg_version")%></td>
171 
      <tr>
 171 
      </tr>
172 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Source Path:</strong> </td>
 172 
      <tr>
173 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("src_path")%></td>
 173 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Source Path:</strong> </td>
174 
      </tr>
 174 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("src_path")%></td>
175 
      <tr>
 175 
      </tr>
176 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Source Label:</strong></td>
 176 
      <tr>
177 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("pkg_label")%></td>
 177 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Source Label:</strong></td>
178 
      </tr>
 178 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=objPackageDetails.Item("pkg_label")%></td>
179 
      <tr>
 179 
      </tr>
180 
         <td width="1%" nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Short Description:</strong></td>
 180 
      <tr>
181 
         <td witdh="100%" bgcolor="#FFFFFF" class="sublbox_txt"><%=NewLine_To_BR ( To_HTML( objPackageDetails.Item("pv_description") ) )%></td>
 181 
         <td width="1%" nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Short Description:</strong></td>
182 
      </tr>
 182 
         <td witdh="100%" bgcolor="#FFFFFF" class="sublbox_txt"><%=NewLine_To_BR ( To_HTML( objPackageDetails.Item("pv_description") ) )%></td>
183 
      <tr>
 183 
      </tr>
184 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Package Overview:</strong> </td>
 184 
      <tr>
185 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=NewLine_To_BR ( To_HTML( objPackageDetails.Item("pv_overview") ) )%></td>
 185 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Package Overview:</strong> </td>
186 
      </tr>
 186 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%=NewLine_To_BR ( To_HTML( objPackageDetails.Item("pv_overview") ) )%></td>
187 
      <tr>
 187 
      </tr>
188 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>General Sublicense Material:</strong> </td>
 188 
      <tr>
189 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%If objPackageDetails.Item("v_ext") = parExt Then%>Yes<%Else%>No<%End If%></td>
 189 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>General Sublicense Material:</strong> </td>
190 
      </tr>
 190 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%If objPackageDetails.Item("v_ext") = parExt Then%>Yes<%Else%>No<%End If%></td>
191 
      <tr>
 191 
      </tr>
192 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Build Environment:</strong> </td>
 192 
      <tr>
193 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%If objPackageDetails.Item("is_build_env_required") = enumDB_NO Then%>Not Required.<%End If%>
 193 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Build Environment:</strong> </td>
194 
            <%
 194 
         <td bgcolor="#FFFFFF" class="sublbox_txt"><%If objPackageDetails.Item("is_build_env_required") = enumDB_NO Then%>Not Required.<%End If%>
195 
            '--- Get Build Env Details
 195 
            <%
196 
 
 196 
            '--- Get Build Env Details
197 
            Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Std ( parPv_id ), cint(0))
 197 
 
198 
            If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
 198 
            Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Std ( parPv_id ), cint(0))
199 
               BldStd = rsQry("bs_name")
 199 
            If ((NOT rsQry.BOF) AND (NOT rsQry.EOF)) Then
200 
               rsQry.Close
 200 
               BldStd = rsQry("bs_name")
201 
 
 201 
               rsQry.Close
202 
               Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Env ( parPv_id ), cint(0))
 202 
 
203 
               %>
 203 
               Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Env ( parPv_id ), cint(0))
204 
               <ul>
 204 
               %>
205 
                  <%
 205 
               <ul>
206 
                  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 206 
                  <%
207 
                     %>
 207 
                  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
208 
                     <li><%=BldStd%>, <%=rsQry("bm_name")%></li>
 208 
                     %>
209 
                     <%rsQry.MoveNext
 209 
                     <li><%=BldStd%>, <%=rsQry("bm_name")%></li>
210 
                  WEnd
 210 
                     <%rsQry.MoveNext
211 
                  %>
 211 
                  WEnd
212 
               </ul>
 212 
                  %>
213 
            <%End If%>
 213 
               </ul>
214 
         </td>
 214 
            <%End If%>
215 
      </tr>
 215 
         </td>
216 
      <tr>
 216 
      </tr>
217 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Build Dependencies:</strong> </td>
 217 
      <tr>
218 
         <td bgcolor="#FFFFFF" class="sublbox_txt">
 218 
         <td nowrap bgcolor="#FFFFFF" class="sublbox_txt" valign="top"><strong>Build Dependencies:</strong> </td>
219 
            <%
 219 
         <td bgcolor="#FFFFFF" class="sublbox_txt">
220 
            '--- Get Build Dependencies Details
 220 
            <%
221 
 
 221 
            '--- Get Build Dependencies Details
222 
            Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Dependencies ( parPv_id ), cint(0))
 222 
 
223 
            %>
 223 
            Set rsQry = OraDatabase.DbCreateDynaset( SQL_Build_Dependencies ( parPv_id ), cint(0))
224 
            <table width="100%"  cellspacing="0" cellpadding="2" border="1">
 224 
            %>
225 
               <tr>
 225 
            <table width="100%"  cellspacing="0" cellpadding="2" border="1">
226 
                  <td nowrap class="sublbox_txt" bgcolor="#FFFFFF" width="1%"><strong>Software Component</strong></td>
 226 
               <tr>
227 
                  <td nowrap class="sublbox_txt" bgcolor="#FFFFFF" width="100%"><strong>Version</strong></td>
 227 
                  <td nowrap class="sublbox_txt" bgcolor="#FFFFFF" width="1%"><strong>Software Component</strong></td>
228 
               </tr>
 228 
                  <td nowrap class="sublbox_txt" bgcolor="#FFFFFF" width="100%"><strong>Version</strong></td>
229 
               <%If rsQry.RecordCount < 1 Then%>
 229 
               </tr>
230 
                  <tr>
 230 
               <%If rsQry.RecordCount < 1 Then%>
231 
                     <td nowrap class="sublbox_txt">No Dependencies</td>
 231 
                  <tr>
232 
                     <td nowrap class="sublbox_txt"></td>
 232 
                     <td nowrap class="sublbox_txt">No Dependencies</td>
233 
                  </tr>
 233 
                     <td nowrap class="sublbox_txt"></td>
234 
               <%End If%>
 234 
                  </tr>
235 
               <%
 235 
               <%End If%>
236 
               While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 236 
               <%
237 
                  %>
 237 
               While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
238 
                  <tr>
 238 
                  %>
239 
                     <td nowrap class="sublbox_txt"><a href="#<%=rsQry("pkg_name")%>"><%=rsQry("pkg_name")%></a></td>
 239 
                  <tr>
240 
                     <td nowrap class="sublbox_txt"><%=rsQry("pkg_version")%></td>
 240 
                     <td nowrap class="sublbox_txt"><a href="#<%=rsQry("pkg_name")%>"><%=rsQry("pkg_name")%></a></td>
241 
                  </tr>
 241 
                     <td nowrap class="sublbox_txt"><%=rsQry("pkg_version")%></td>
242 
                  <%rsQry.MoveNext
 242 
                  </tr>
243 
               WEnd
 243 
                  <%rsQry.MoveNext
244 
               %>
 244 
               WEnd
245 
            </table>
 245 
               %>
246 
         </td>
 246 
            </table>
247 
      </tr>
 247 
         </td>
248 
   </table>
 248 
      </tr>
249 
   <br><br>
 249 
   </table>
250 
   <%
 250 
   <br><br>
251 
'Exit For
 251 
   <%
252 
Next
 252 
'Exit For
253 
%>
 253 
Next
254 
</body>
 254 
%>
255 
</html>
 255 
</body>
256 
<%
 256 
</html>
257 
Call Destroy_All_Objects
 257 
<%
258 
%>
 258 
Call Destroy_All_Objects
- 
 
 259 
%>