Subversion Repositories DevTools

Rev

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

Rev 29 Rev 5355
Line 1... Line 1...
1 
<%@LANGUAGE="VBSCRIPT"%>
 1 
<%@LANGUAGE="VBSCRIPT"%>
2 
<%
 2 
<%
3 
'=====================================================
 3 
'=====================================================
4 
'|                                                   |
 4 
'|                                                   |
5 
'|			          wUnDeployView                  |
 5 
'|			          wUnDeployView                  |
6 
'|                                                   |
 6 
'|                                                   |
7 
'=====================================================
 7 
'=====================================================
8 
%>
 8 
%>
9 
<%
 9 
<%
10 
Option explicit
 10 
Option explicit
11 
Response.Expires = 0
 11 
Response.Expires = 0
12 
%>
 12 
%>
13 
<%
 13 
<%
14 
'To enable the script timeout to 10 mins
 14 
'To enable the script timeout to 10 mins
15 
Server.ScriptTimeout=600
 15 
Server.ScriptTimeout=600
16 
%>
 16 
%>
17 
<!--#include file="common/globals.asp"-->
 17 
<!--#include file="common/globals.asp"-->
18 
<!--#include file="common/config.asp"-->
 18 
<!--#include file="common/config.asp"-->
19 
<!--#include file="common/common_subs.asp"-->
 19 
<!--#include file="common/common_subs.asp"-->
20 
<!--#include file="common/_popup_window_common.asp"-->
 20 
<!--#include file="common/_popup_window_common.asp"-->
21 
<%
 21 
<%
22 
'------------ ACCESS CONTROL ------------------
 22 
'------------ ACCESS CONTROL ------------------
23 
%>
 23 
%>
24 
<!--#include file="_access_control_general.asp"-->
 24 
<!--#include file="_access_control_general.asp"-->
25 
<%
 25 
<%
26 
'------------ VARIABLE DEFINITION -------------
 26 
'------------ VARIABLE DEFINITION -------------
27 
Dim rsQry
 27 
Dim rsQry
28 
Dim aProducts
 28 
Dim aProducts
29 
Dim numOfRows
 29 
Dim numOfRows
30 
Dim rowNum
 30 
Dim rowNum
31 
Dim objFormCollector
 31 
Dim objFormCollector
32 
Dim currPkg_id
 32 
Dim currPkg_id
33 
Dim	Query_String
 33 
Dim	Query_String
34 
'Dim parProj_id
 34 
'Dim parProj_id
35 
'Dim parBranch_id
 35 
'Dim parBranch_id
36 
'------------ CONSTANTS DECLARATION -----------
 36 
'------------ CONSTANTS DECLARATION -----------
37 
'------------ VARIABLE INIT -------------------
 37 
'------------ VARIABLE INIT -------------------
38 
parProj_id = Request("proj_id")
 38 
parProj_id = Request("proj_id")
39 
parBranch_id = Request("branch_id")
 39 
parBranch_id = Request("branch_id")
40 
Set objFormCollector = CreateObject("Scripting.Dictionary")
 40 
Set objFormCollector = CreateObject("Scripting.Dictionary")
41 
'------------ CONDITIONS ----------------------
 41 
'------------ CONDITIONS ----------------------
42 
'----------------------------------------------
 42 
'----------------------------------------------
43 
%>
 43 
%>
44 
<%
 44 
<%
45 
'----------------------------------------------------------------------------------------------------------------------------------
 45 
'----------------------------------------------------------------------------------------------------------------------------------
46 
Sub GetFormDetails ( nProj_id, ByRef outobjDetails )
 46 
Sub GetFormDetails ( nProj_id, ByRef outobjDetails )
47 
	Dim rsQry, query
 47 
	Dim rsQry, query
48 
	OraDatabase.Parameters.Add "PROJ_ID", 		nProj_id,		ORAPARM_INPUT, ORATYPE_NUMBER
48 
	OraDatabase.Parameters.Add "PROJ_ID", 		nProj_id,		ORAPARM_INPUT, ORATYPE_NUMBER
49
49
50 
	query = _
 50 
	query = _
51 
	"  SELECT * FROM DM_PROJECTS WHERE PROJ_ID= "&nProj_id
 51 
	"  SELECT * FROM DM_PROJECTS WHERE PROJ_ID= "&nProj_id
52
52
53 
	Set rsQry = OraDatabase.DbCreateDynaset( query, ORADYN_DEFAULT )
 53 
	Set rsQry = OraDatabase.DbCreateDynaset( query, ORADYN_DEFAULT )
54 
	If (NOT rsQry.BOF) AND (NOT rsQry.EOF)Then
 54 
	If (NOT rsQry.BOF) AND (NOT rsQry.EOF)Then
55 
		outobjDetails.Item ("RM_PROJECTS_FK") = rsQry("RM_PROJECTS_FK")
 55 
		outobjDetails.Item ("RM_PROJECTS_FK") = rsQry("RM_PROJECTS_FK")
56 
	End If
 56 
	End If
57
57
58
58
59 
	OraDatabase.Parameters.Remove "PROJ_ID"
 59 
	OraDatabase.Parameters.Remove "PROJ_ID"
60
60
61 
	rsQry.Close
 61 
	rsQry.Close
62 
	Set rsQry = Nothing
 62 
	Set rsQry = Nothing
63 
End Sub
 63 
End Sub
64 
'----------------------------------------------------------------------------------------------------------------------------------
 64 
'----------------------------------------------------------------------------------------------------------------------------------
65 
Sub Get_Project_Release ( NNproj_id )
 65 
Sub Get_Project_Release ( NNproj_id )
66 
	Dim rsTemp, Query_String
 66 
	Dim rsTemp, Query_String
67
67
68 
	Query_String = _
 68 
	Query_String = _
69 
	"SELECT * FROM RELEASE_TAGS WHERE PROJ_ID="&NNproj_id&" ORDER BY RTAG_ID DESC"
 69 
	"SELECT * FROM RELEASE_TAGS WHERE PROJ_ID="&NNproj_id&" ORDER BY RTAG_ID DESC"
70 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
 70 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
71
71
72 
	Response.write "<select name='FRrtag_id' onChange=""Cascaded_Menu('parent','"& SCRIPT_NAME &"?FRrtag_id=',this,0)"" class='form_item'>"
 72 
	Response.write "<select name='FRrtag_id' onChange=""Cascaded_Menu('parent','"& SCRIPT_NAME &"?FRrtag_id=',this,0)"" class='form_item'>"
73 
	Response.write "<option></option>"
73 
	Response.write "<option></option>"
74 
		While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 74 
		While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
75 
			If CDbl(Request("FRrtag_id")) = CDbl(rsTemp.Fields("rtag_id")) Then
 75 
			If CDbl(Request("FRrtag_id")) = CDbl(rsTemp.Fields("rtag_id")) Then
76 
	        	Response.write "<option value='"& rsTemp.Fields("rtag_id") &"' selected>"& (rsTemp.Fields("rtag_name")) &"</option>"
 76 
	        	Response.write "<option value='"& rsTemp.Fields("rtag_id") &"' selected>"& (rsTemp.Fields("rtag_name")) &"</option>"
77 
	        Else
 77 
	        Else
78 
				Response.write "<option value='"& rsTemp.Fields("rtag_id") &"'>"& (rsTemp.Fields("rtag_name")) &"</option>"
 78 
				Response.write "<option value='"& rsTemp.Fields("rtag_id") &"'>"& (rsTemp.Fields("rtag_name")) &"</option>"
79 
			End If
 79 
			End If
80 
			rsTemp.MoveNext
 80 
			rsTemp.MoveNext
81 
		WEnd
 81 
		WEnd
82 
	Response.write "</select>"
 82 
	Response.write "</select>"
83
83
84 
	rsTemp.Close
 84 
	rsTemp.Close
85 
	Set rsTemp = nothing
 85 
	Set rsTemp = nothing
86 
End Sub
 86 
End Sub
87 
'----------------------------------------------------------------------------------------------------------------------------------
 87 
'----------------------------------------------------------------------------------------------------------------------------------
88 
Sub Get_SBOM_Release ( NNbranch_id )
 88 
Sub Get_SBOM_Release ( NNbranch_id )
89 
	Dim rsTemp, Query_String
 89 
	Dim rsTemp, Query_String
90
90
91 
	Query_String = _
 91 
	Query_String = _
92 
	"SELECT * FROM BOMS BM, BOM_NAMES BN "&_
 92 
	"SELECT * FROM BOMS BM, BOM_NAMES BN "&_
93 
	"WHERE BM.BOM_NAME_ID = BN.BOM_NAME_ID "&_
 93 
	"WHERE BM.BOM_NAME_ID = BN.BOM_NAME_ID "&_
94 
	"AND BM.BRANCH_ID="&NNbranch_id&" ORDER BY BOM_ID DESC"
 94 
	"AND BM.BRANCH_ID="&NNbranch_id&" ORDER BY BOM_ID DESC"
95 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
 95 
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
96
96
97 
	Response.write "<select name='FRbom_id' onChange=""Cascaded_Menu('parent','"& SCRIPT_NAME &"?FRbom_id=',this,0)"" class='form_item'>"
 97 
	Response.write "<select name='FRbom_id' onChange=""Cascaded_Menu('parent','"& SCRIPT_NAME &"?FRbom_id=',this,0)"" class='form_item'>"
98 
	Response.write "<option></option>"
 98 
	Response.write "<option></option>"
99
99
100 
		While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
 100 
		While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))
101 
			If CDbl(Request("FRbom_id")) = CDbl(rsTemp.Fields("bom_id")) Then
 101 
			If CDbl(Request("FRbom_id")) = CDbl(rsTemp.Fields("bom_id")) Then
102 
	        	Response.write "<option value='"& rsTemp.Fields("bom_id") &"' selected>"& rsTemp.Fields("bom_name") &" "& rsTemp.Fields("bom_version") &"."& rsTemp.Fields("bom_lifecycle") &"</option>"
 102 
	        	Response.write "<option value='"& rsTemp.Fields("bom_id") &"' selected>"& rsTemp.Fields("bom_name") &" "& rsTemp.Fields("bom_version") &"."& rsTemp.Fields("bom_lifecycle") &"</option>"
103 
	        Else
 103 
	        Else
104 
				Response.write "<option value='"& rsTemp.Fields("bom_id") &"'>"& rsTemp.Fields("bom_name") &" "& rsTemp.Fields("bom_version") &"."& rsTemp.Fields("bom_lifecycle") &"</option>"
 104 
				Response.write "<option value='"& rsTemp.Fields("bom_id") &"'>"& rsTemp.Fields("bom_name") &" "& rsTemp.Fields("bom_version") &"."& rsTemp.Fields("bom_lifecycle") &"</option>"
105 
			End If
 105 
			End If
106 
			rsTemp.MoveNext
 106 
			rsTemp.MoveNext
107 
		WEnd
 107 
		WEnd
108 
	Response.write "</select>"
 108 
	Response.write "</select>"
109
109
110 
	rsTemp.Close
 110 
	rsTemp.Close
111 
	Set rsTemp = nothing
 111 
	Set rsTemp = nothing
112 
End Sub
 112 
End Sub
113 
'----------------------------------------------------------------------------------------------------------------------------------
 113 
'----------------------------------------------------------------------------------------------------------------------------------
114 
%>
 114 
%>
115 
<%
 115 
<%
116 
'------------ RUN BEFORE PAGE RENDER ----------
 116 
'------------ RUN BEFORE PAGE RENDER ----------
117 
Call GetFormDetails ( parProj_id, objFormCollector )
 117 
Call GetFormDetails ( parProj_id, objFormCollector )
118 
 
 118 
 
119 
 
 119 
 
120 
 
 120 
 
121 
'----------------------------------------------
 121 
'----------------------------------------------
122 
%>
 122 
%>
123 
 
 123 
 
124 
 
 124 
 
125 
<html>
 125 
<html>
126 
<head>
 126 
<head>
127 
<title>Deployment Manager</title>
 127 
<title>Deployment Manager</title>
128 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
 128 
<link rel="shortcut icon" href="<%=FavIcon%>"/>
129 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
 129 
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
130 
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
 130 
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
131 
<link href="images/release_manager_style.css" rel="stylesheet" type="text/css">
 131 
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
132 
<script language="JavaScript" src="scripts/common.js"></script>
 132 
<link href="images/release_manager_style.css" rel="stylesheet" type="text/css">
133 
<style type="text/css">
 133 
<script language="JavaScript" src="scripts/common.js"></script>
134 
<!--
 134 
<style type="text/css">
135 
.style8 {font-size: 12px}
 135 
<!--
136 
-->
 136 
.style8 {font-size: 12px}
137 
</style>
 137 
-->
138 
</head>
 138 
</style>
139 
 
 139 
</head>
140 
<body background="images/bg_bage_0.gif" leftmargin="0" topmargin="0" onLoad="self.focus();">
 140 
 
141 
<table width="100%"  border="0" cellspacing="0" cellpadding="10">
 141 
<body background="images/bg_bage_0.gif" leftmargin="0" topmargin="0" onLoad="self.focus();">
142 
  <tr>
 142 
<table width="100%"  border="0" cellspacing="0" cellpadding="10">
143 
    <td bgcolor="#FFFFFF" class="body_txt"><span class="body_h1"><img src="icons/i_linkarrow_black.gif" width="11" height="11" align="absmiddle">&nbsp;UnDeployed View For Products/Patches  </span> <br>
 143 
  <tr>
144 
    UnDeployed View, comparing with the latest from "Release Manager".
 144 
    <td bgcolor="#FFFFFF" class="body_txt"><span class="body_h1"><img src="icons/i_linkarrow_black.gif" width="11" height="11" align="absmiddle">&nbsp;UnDeployed View For Products/Patches  </span> <br>
145 
    </td>
 145 
    UnDeployed View, comparing with the latest from "Release Manager".
146 
  </tr>
146 
    </td>
147 
<%
 147 
  </tr>
148 
'-- FROM START --------------------------------------------------------------------------------------------------------------
 148 
<%
149 
objFormComponent.FormName = "FormName"
 149 
'-- FROM START --------------------------------------------------------------------------------------------------------------
150 
objFormComponent.Action = SCRIPT_NAME
 150 
objFormComponent.FormName = "FormName"
151 
objFormComponent.OnSubmit = "ShowProgress();"
 151 
objFormComponent.Action = SCRIPT_NAME
152 
Call objFormComponent.FormStart()
 152 
objFormComponent.OnSubmit = "ShowProgress();"
153 
%>
153 
Call objFormComponent.FormStart()
154 
  <tr>
 154 
%>
155 
    <td background="images/bg_login.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
 155 
  <tr>
156 
	  <tr>
156 
    <td background="images/bg_login.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
157 
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
 157 
	  <tr>
158 
        <td width="1%" align="right" nowrap class="form_field"><b>Release Manager Reference Release:</b></td>
 158 
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
159 
        <td width="100%"><%Call Get_Project_Release( objFormCollector.Item("RM_PROJECTS_FK") )%></td>
 159 
        <td width="1%" align="right" nowrap class="form_field"><b>Release Manager Reference Release:</b></td>
160 
      </tr>
 160 
        <td width="100%"><%Call Get_Project_Release( objFormCollector.Item("RM_PROJECTS_FK") )%></td>
161 
	  <tr>
161 
      </tr>
162 
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
 162 
	  <tr>
163 
        <td width="1%" align="right" nowrap class="form_field"><b>Deployment Manager SBOM Release:</b></td>
 163 
        <td width="1%" nowrap class="form_field"><img src="images/spacer.gif" width="30" height="8"></td>
164 
        <td width="100%"><%Call Get_SBOM_Release( parBranch_id )%></td>
 164 
        <td width="1%" align="right" nowrap class="form_field"><b>Deployment Manager SBOM Release:</b></td>
165 
      </tr>
 165 
        <td width="100%"><%Call Get_SBOM_Release( parBranch_id )%></td>
166 
      <tr>
 166 
      </tr>
167 
        <td><%=ProgressBar()%>
 167 
      <tr>
168 
          </td>
 168 
        <td><%=ProgressBar()%>
169 
		<td width="1%" align="right" nowrap class="form_field"></td>
 169 
          </td>
170 
        <td align="centre">
 170 
		<td width="1%" align="right" nowrap class="form_field"></td>
171 
            <div align="left">
 171 
        <td align="centre">
172 
              <input name="btn2" type="submit" class="form_btn" value="Compare">
 172 
            <div align="left">
173 
              <input name="btn" type="reset" class="form_btn" value="Back" onClick="window.location='<%=Request("rfile") &"bomstates.asp?CANCEL=OK"& objPMod.ComposeURLWithout("rfile")%>';">
 173 
              <input name="btn2" type="submit" class="form_btn" value="Compare">
174 
            </div></td></tr>
 174 
              <input name="btn" type="reset" class="form_btn" value="Back" onClick="window.location='<%=Request("rfile") &"bomstates.asp?CANCEL=OK"& objPMod.ComposeURLWithout("rfile")%>';">
175 
    </table></td>
 175 
            </div></td></tr>
176 
  </tr>
 176 
    </table></td>
177 
  <tr>
 177 
  </tr>
178 
    <td>
 178 
  <tr>
179 
 
 179 
    <td>
180 
 
 180 
 
181 
<!-- PRODUCT NAME RESULTS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
181 
 
182 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
 182 
<!-- PRODUCT NAME RESULTS ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
183 
      <tr>
 183 
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
184 
        <td width="100%" valign="top" nowrap class="body_txt">
 184 
      <tr>
185 
		  <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
185 
        <td width="100%" valign="top" nowrap class="body_txt">
186 
		  <!--#include file="messages/_msg_inline.asp"-->
 186 
		  <!-- MESSAGE +++++++++++++++++++++++++++++++++++++++++++++++++++ -->
187 
		  <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 187 
		  <!--#include file="messages/_msg_inline.asp"-->
188 
		  <%
 188 
		  <!-- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
189 
		  'If objFormCollector.Item("rtag_id_fk") = "" Then
 189 
		  <%
190 
			'Call Messenger ( "This BOM does not have Release Manager Reference release.<br>Please edit BOM properties first.<br>", 1, "100%" )
 190 
		  'If objFormCollector.Item("rtag_id_fk") = "" Then
191 
		  'End If
 191 
			'Call Messenger ( "This BOM does not have Release Manager Reference release.<br>Please edit BOM properties first.<br>", 1, "100%" )
192 
		  %>
 192 
		  'End If
193 
		  <!-- VIEW PRODUCTS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 193 
		  %>
194 
          <table width="100%"  border="0" cellspacing="3" cellpadding="0">
 194 
		  <!-- VIEW PRODUCTS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
195 
            <tr>
 195 
          <table width="100%"  border="0" cellspacing="3" cellpadding="0">
196 
			  <td width="1%" nowrap background="images/bg_bage_0h.gif" class="body_col">Product</td>
 196 
            <tr>
197 
              <td width="40%" nowrap background="images/bg_bage_0h.gif" class="body_col">Location</td>
 197 
			  <td width="1%" nowrap background="images/bg_bage_0h.gif" class="body_col">Product</td>
198 
              <td width="20%" nowrap background="images/bg_bage_0h.gif" class="body_col">Version</td>
 198 
              <td width="40%" nowrap background="images/bg_bage_0h.gif" class="body_col">Location</td>
199 
              <td width="20%" background="images/bg_bage_0h.gif" class="body_col"><img src="images/spacer.gif" width="1" height="18" align="absmiddle">Latest</td>
 199 
              <td width="20%" nowrap background="images/bg_bage_0h.gif" class="body_col">Version</td>
200 
            </tr>
 200 
              <td width="20%" background="images/bg_bage_0h.gif" class="body_col"><img src="images/spacer.gif" width="1" height="18" align="absmiddle">Latest</td>
201 
			<%
 201 
            </tr>
202 
			OraDatabase.Parameters.Add "BOM_ID", Request("FRbom_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
202 
			<%
203 
			OraDatabase.Parameters.Add "RTAG_ID", Request("FRrtag_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
203 
			OraDatabase.Parameters.Add "BOM_ID", Request("FRbom_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
204
204 
			OraDatabase.Parameters.Add "RTAG_ID", Request("FRrtag_id"),		ORAPARM_INPUT, ORATYPE_NUMBER
205 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("CompareBomWithLatestFromRM.sql"), ORADYN_DEFAULT )
 205
206 
			currPkg_id = 0
 206 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("CompareBomWithLatestFromRM.sql"), ORADYN_DEFAULT )
207 
			%>
 207 
			currPkg_id = 0
208 
			<%If rsQry.RecordCount < 1 Then%>
 208 
			%>
209 
			<tr>
 209 
			<%If rsQry.RecordCount < 1 Then%>
210 
              <td colspan="4" class="body_row">No Products to Update.</td>
 210 
			<tr>
211 
            </tr>
 211 
              <td colspan="4" class="body_row">No Products to Update.</td>
212 
			<%End If%>
 212 
            </tr>
213
213 
			<%End If%>
214 
			<%
 214
215 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 215 
			<%
216 
			%>
 216 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
217 
			<%If currPkg_id <> rsQry("pkg_id") Then%>
 217 
			%>
218 
            <tr>
 218 
			<%If currPkg_id <> rsQry("pkg_id") Then%>
219 
			  <td colspan="2" nowrap><span class="body_row"><img src="icons/i_product.gif" width="19" height="19" hspace="2" align="absmiddle"><%=rsQry("prod_name")%></span></td>
 219 
            <tr>
220 
              <td nowrap class="body_row">&nbsp;</td>
 220 
			  <td colspan="2" nowrap><span class="body_row"><img src="icons/i_product.gif" width="19" height="19" hspace="2" align="absmiddle"><%=rsQry("prod_name")%></span></td>
221 
              <td nowrap class="body_row"></td>
 221 
              <td nowrap class="body_row">&nbsp;</td>
222 
            </tr>
 222 
              <td nowrap class="body_row"></td>
223 
			<tr>
 223 
            </tr>
224 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 224 
			<tr>
225 
            </tr>
 225 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
226 
			<%currPkg_id = rsQry("pkg_id")%>
 226 
            </tr>
227 
			<%End If%>
 227 
			<%currPkg_id = rsQry("pkg_id")%>
228
228 
			<%End If%>
229 
            <tr>
 229
230 
              <td align="center" nowrap><input type="checkbox" name="update_<%=rsQry("os_id") &"_"& rsQry("prod_id")%>" value="<%=rsQry("latest_prod_id")%>" disabled> </td>
 230 
            <tr>
231 
              <td nowrap class="body_row"><img hspace="2" src="icons/<%=rsQry("node_icon")%>" align="absmiddle" border="0"><%=rsQry("prod_location")%></td>
 231 
              <td align="center" nowrap><input type="checkbox" name="update_<%=rsQry("os_id") &"_"& rsQry("prod_id")%>" value="<%=rsQry("latest_prod_id")%>" disabled> </td>
232 
              <td nowrap class="body_row"><%=rsQry("prod_version")%></td>
 232 
              <td nowrap class="body_row"><img hspace="2" src="icons/<%=rsQry("node_icon")%>" align="absmiddle" border="0"><%=rsQry("prod_location")%></td>
233 
              <td nowrap class="body_txtr"><%=rsQry("rm_latest_version")%></td>
 233 
              <td nowrap class="body_row"><%=rsQry("prod_version")%></td>
234 
            </tr>
 234 
              <td nowrap class="body_txtr"><%=rsQry("rm_latest_version")%></td>
235 
			<tr>
 235 
            </tr>
236 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 236 
			<tr>
237 
            </tr>
 237 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
238
238 
            </tr>
239 
            <%rsQry.MoveNext
 239
240 
			Wend
 240 
            <%rsQry.MoveNext
241 
			%>
 241 
			Wend
242
242 
			%>
243
243
244 
		  <!-- NEW PATCHES +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 244
245 
		    <%
 245 
		  <!-- NEW PATCHES +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
246 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("NewPatchesView.sql"), ORADYN_DEFAULT )
 246 
		    <%
247 
			currPkg_id = 0
 247 
			Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("NewPatchesView.sql"), ORADYN_DEFAULT )
248 
			%>
 248 
			currPkg_id = 0
249
249 
			%>
250 
			<%If rsQry.RecordCount > 0 Then%>
 250
251 
		    <tr>
 251 
			<%If rsQry.RecordCount > 0 Then%>
252 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col" align="center">Patch</td>
 252 
		    <tr>
253 
              <td nowrap background="images/bg_bage_0h.gif" class="body_col">Location</td>
 253 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col" align="center">Patch</td>
254 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col">Version</td>
 254 
              <td nowrap background="images/bg_bage_0h.gif" class="body_col">Location</td>
255 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col">Comments</td>
 255 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col">Version</td>
256 
              <td background="images/bg_bage_0h.gif" class="body_col"><img src="images/spacer.gif" width="1" height="18" align="absmiddle"></td>
 256 
			  <td nowrap background="images/bg_bage_0h.gif" class="body_col">Comments</td>
257 
            </tr>
 257 
              <td background="images/bg_bage_0h.gif" class="body_col"><img src="images/spacer.gif" width="1" height="18" align="absmiddle"></td>
258
258 
            </tr>
259 
			<%
 259
260 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
 260 
			<%
261 
			%>
 261 
			While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
262 
			<%If currPkg_id <> rsQry("pkg_id") Then%>
 262 
			%>
263 
            <tr>
 263 
			<%If currPkg_id <> rsQry("pkg_id") Then%>
264 
			  <td colspan="2" nowrap><span class="body_row"><img src="icons/i_product.gif" width="19" height="19" hspace="2" align="absmiddle"><%=rsQry("prod_name")%></span></td>
 264 
            <tr>
265 
              <td nowrap class="body_row">&nbsp;</td>
 265 
			  <td colspan="2" nowrap><span class="body_row"><img src="icons/i_product.gif" width="19" height="19" hspace="2" align="absmiddle"><%=rsQry("prod_name")%></span></td>
266 
              <td nowrap class="body_row"></td>
 266 
              <td nowrap class="body_row">&nbsp;</td>
267 
            </tr>
 267 
              <td nowrap class="body_row"></td>
268 
			<tr>
 268 
            </tr>
269 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 269 
			<tr>
270 
            </tr>
 270 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
271 
			<%currPkg_id = rsQry("pkg_id")%>
 271 
            </tr>
272 
			<%End If%>
 272 
			<%currPkg_id = rsQry("pkg_id")%>
273
273 
			<%End If%>
274 
            <tr>
 274
275 
              <td align="center" nowrap><input type="checkbox" name="add_<%=rsQry("os_id") &"_"& rsQry("prod_id")%>" value="<%=rsQry("prod_id")%>" disabled> </td>
 275 
            <tr>
276 
              <td nowrap class="body_row"><img hspace="2" src="icons/<%=rsQry("node_icon")%>" align="absmiddle" border="0"><%=rsQry("prod_location")%></td>
 276 
              <td align="center" nowrap><input type="checkbox" name="add_<%=rsQry("os_id") &"_"& rsQry("prod_id")%>" value="<%=rsQry("prod_id")%>" disabled> </td>
277 
              <td nowrap class="body_row"><img src="icons/i_patch_small.gif" width="16" height="16" border="0" align="absmiddle"><%=rsQry("prod_version")%></td>
 277 
              <td nowrap class="body_row"><img hspace="2" src="icons/<%=rsQry("node_icon")%>" align="absmiddle" border="0"><%=rsQry("prod_location")%></td>
278 
			  <td nowrap class="body_row"><%=rsQry("comments")%></td>
 278 
              <td nowrap class="body_row"><img src="icons/i_patch_small.gif" width="16" height="16" border="0" align="absmiddle"><%=rsQry("prod_version")%></td>
279 
              <td nowrap class="body_txtr"></td>
 279 
			  <td nowrap class="body_row"><%=rsQry("comments")%></td>
280 
            </tr>
 280 
              <td nowrap class="body_txtr"></td>
281 
			<tr>
 281 
            </tr>
282 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
 282 
			<tr>
283 
            </tr>
 283 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
284
284 
            </tr>
285 
            <%rsQry.MoveNext
 285
286 
			Wend
 286 
            <%rsQry.MoveNext
287 
			%>
 287 
			Wend
288
288 
			%>
289 
			<%End If%>
 289
290
290 
			<%End If%>
291 
			<tr>
 291
292 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="3"></td>
 292 
			<tr>
293 
            </tr>
 293 
              <td colspan="4" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="3"></td>
294 
          </table>
 294 
            </tr>
295
295 
          </table>
296
296
297 
		  <%
 297
298 
		  OraDatabase.Parameters.Remove "RTAG_ID"
 298 
		  <%
299 
		  OraDatabase.Parameters.Remove "BOM_ID"
 299 
		  OraDatabase.Parameters.Remove "RTAG_ID"
300 
		  rsQry.Close
 300 
		  OraDatabase.Parameters.Remove "BOM_ID"
301 
		  Set rsQry = Nothing
 301 
		  rsQry.Close
302 
		  %>
 302 
		  Set rsQry = Nothing
303 
		  </td>
 303 
		  %>
304 
        </tr>
 304 
		  </td>
305 
    </table>
 305 
        </tr>
306 
	<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
 306 
    </table>
307 
    </td>
 307 
	<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
308 
  </tr>
 308 
    </td>
309 
  <%=objPMod.ComposeHiddenTags()%>
 309 
  </tr>
310 
  <input type="hidden" name="action" value="true">
 310 
  <%=objPMod.ComposeHiddenTags()%>
311 
<%
 311 
  <input type="hidden" name="action" value="true">
312 
 
 312 
<%
313 
Call objFormComponent.FormEnd()
 313 
 
314 
'-- FROM END ----------------------------------------------------------------------------------------------------------------
 314 
Call objFormComponent.FormEnd()
315 
%>
 315 
'-- FROM END ----------------------------------------------------------------------------------------------------------------
316 
</table>
 316 
%>
317 
</body>
 317 
</table>
318 
</html>
 318 
</body>
319 
<%
 319 
</html>
320 
'------------ RUN AFTER PAGE RENDER -----------
 320 
<%
321 
'----------------------------------------------
 321 
'------------ RUN AFTER PAGE RENDER -----------
322 
%><!--#include file="common/globals_destructor.asp"-->
 322 
'----------------------------------------------
- 
 
 323 
%><!--#include file="common/globals_destructor.asp"-->