Subversion Repositories DevTools

Rev

Rev 5958 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5355 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|			          UsedBy					 	 |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
Response.Expires = 0
12
%>
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/config.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<!--#include file="common/_product_common.asp"-->
17
<%
18
'------------ ACCESS CONTROL ------------------
19
%>
20
<!--#include file="_access_control_general.asp"-->
21
<%
22
'------------ VARIABLE DEFINITION -------------
23
Dim rsQry
24
'------------ CONSTANTS DECLARATION -----------
25
'------------ VARIABLE INIT -------------------
26
'------------ CONDITIONS ----------------------
27
'----------------------------------------------
28
%>
29
<%
30
'------------ RUN BEFORE PAGE RENDER ----------
31
'----------------------------------------------
32
%>
33
<html>
34
<head>
35
<title>Deployment Manager</title>
36
<link rel="shortcut icon" href="<%=FavIcon%>"/>
37
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
38
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
6663 dpurdie 39
<link href="scripts/deployment_manager.css?ver=<%=VixVerNum%>" rel="stylesheet" type="text/css">
40
<script language="JavaScript" src="scripts/common.js?ver=<%=VixVerNum%>"></script>
5355 dpurdie 41
</head>
42
 
43
<body leftmargin="0" topmargin="0">
44
<!-- HEADER ++++++++++++++++ -->
45
<!--#include file="_header.asp"-->
46
<!-- +++++++++++++++++++++++ -->
47
<!-- MAIN MENU  +  CRUMBS ++++++++++++++++ -->
48
<!--#include file="_main_menu.asp"-->
49
<!-- +++++++++++++++++++++++++++++++++++++ -->
50
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
51
  <tr>
52
    <td width="1%" valign="top" background="images/bg_bage_0.gif">
53
	<!-- NODE BROWSER ++++++++++++++++++++++ -->
54
	<!--#include file="_bom_browser.asp"-->
55
	<!-- END OF NODE BROWSER +++++++++++++++ -->
56
	</td>
57
    <td width="1" background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="600"></td>
58
    <td width="100%" valign="top" bgcolor="#FFFFFF">
59
	<table width="100%"  border="0" cellspacing="0" cellpadding="0">
60
	  <tr>
61
        <td valign="top" background="images/bg_blue.gif"></td>
62
        <td align="right" valign="bottom" background="images/bg_blue.gif" class="body_txtw"><%Call RenderTitle( objProdCollector )%></td>
63
        <td background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="20"></td>
64
      </tr>
65
      <tr>
66
        <td width="1%" valign="top" background="images/bg_blue.gif"></td>
67
        <td width="100%" valign="bottom" background="images/bg_blue.gif">
68
		<!-- TAB CONTROLS ++++++++++++++++++++++ -->
69
		<!--#include file="_tabs_definition.asp"-->
70
		<%
71
		Set objTabControl = New TabControl
72
		objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition
73
		objTabControl.TabStyle = "StyleWinXP"
74
		objTabControl.AddTabDefnition ( arrProdTabDef )
75
		objTabControl.SelectByName ("Used By")
76
		objTabControl.Render ()
77
		%>
78
		<!-- END OF TAB CONTROLS +++++++++++++++ -->
79
		</td>
80
        <td width="1%" background="images/bg_blue.gif"><img src="images/spacer.gif" width="10" height="35"></td>
81
        </tr>
82
      <tr>
83
        <td background="images/bg_bage_0.gif"><img src="images/spacer.gif" width="30" height="10"></td>
84
        <td background="images/bg_bage_0.gif">
85
		<!-- BUTTONS CONTROL +++++++++++++++++++ -->
86
		<%
87
		'-- Define Action buttons on this tab
88
		'aTabBtnsDef = Array("btnAddOs", "width=10", "btnCopyOs", "btnPasteOs")
89
 
90
		'Call LoadTabActionButtons ( aTabBtnsDef, objBtnControl )
91
 
92
		'objBtnControl.Render( aTabBtnsDef )
93
		%>
94
		<!-- +++++++++++++++++++++++++++++++++++ -->
95
		</td>
96
        <td background="images/bg_blue.gif"><img src="images/p_bar_corrner.gif" width="17" height="42"></td>
97
        </tr>
98
      <tr>
99
        <td>&nbsp;</td>
100
        <td>&nbsp;</td>
101
        <td valign="top"><%If Request.Cookies( enumCOOKIE_NAME )( "user_bar" ) = "hide" Then%><a href="<%=SCRIPT_NAME%>?user_bar=<%=enumDEFAULT%>&<%=objPMod.ComposeURL()%>"><img src="icons/b_left.gif" title="Maximize favourits" width="13" height="13" vspace="5" border="0"></a><%End If%></td>
102
        </tr>
103
    </table>
104
	<table width="100%"  border="0" cellspacing="10" cellpadding="0">
105
      <tr>
106
        <td>
107
		<!-- PAGE DETAILS +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
108
		<table width="100%"  border="0" cellspacing="3" cellpadding="0">
109
          <tr>
110
            <td width="30%" background="images/bg_table_border.gif"><table width="100%"  border="0" cellspacing="1" cellpadding="2">
111
              <tr>
112
                <td align="right" nowrap background="images/bg_table_col.gif" class="body_col">Location</td>
113
              </tr>
114
            </table></td>
115
			<td width="20%" align="right" background="images/bg_table_col.gif" class="body_col">Product Name</td>
116
			<td width="10%" align="right" background="images/bg_table_col.gif" class="body_col">Version</td>
117
			<td width="50%" align="right" background="images/bg_table_col.gif" class="body_col">Comments</td>
118
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
119
			<td width="1" background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
120
          </tr>
121
		  <%
122
		  OraDatabase.Parameters.Add "PROD_ID", dbPARprod_id,		ORAPARM_INPUT, ORATYPE_NUMBER 
123
		  OraDatabase.Parameters.Add "BOM_ID",  dbPARbom_id,		ORAPARM_INPUT, ORATYPE_NUMBER 
124
 
125
		  Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("ProductNameAtOtherLocations.sql"), ORADYN_DEFAULT )
126
		  While (NOT rsQry.BOF) AND (NOT rsQry.EOF)
127
		  %>
128
          <tr>
129
            <td nowrap valign="top"><a href="ProdDefault.asp?prod_id=<%=rsQry("prod_id")%>&os_id=<%=rsQry("os_id")%><%=objPMod.ComposeURLWithout("prod_id,os_id")%>" title="Go to This Location" class="body_link"><img src="icons/<%=rsQry("node_icon")%>" border="0" align='absmiddle' hspace="2"><%=rsQry("node_name").Value &" / "& rsQry("os_name").Value %></a></td>
130
			<td nowrap class="body_row" valign="top"><%=LIMG_PRODUCT  &  rsQry("prod_name").Value%></td>
131
            <td nowrap <%If CBool(rsQry("is_different")) Then%>class="body_txtr"<%Else%>class="body_row"<%End If%> valign="top"><%=rsQry("prod_version")%></td>
132
            <td class="body_rowlite" valign="top"><%=rsQry("product_comments")%></td>
133
			<td align="center" valign="top"><a href="#" title="Edit"><%=LIMG_EDIT%></a></td>
134
			<td align="center" valign="top"><a href="#" title="Remove"><%=LIMG_REMOVE%></a></td>
135
          </tr>
136
		  <%rsQry.MoveNext%>
137
 
138
		  <%If (NOT rsQry.BOF) AND (NOT rsQry.EOF) Then%>
139
          <tr>
140
            <td colspan="6" background="images/bg_table_border.gif"><img src="images/spacer.gif" width="1" height="1"></td>
141
          </tr>
142
		  <%End If%>
143
 
144
		  <%
145
		  WEnd
146
 
147
		  OraDatabase.Parameters.Remove "PROD_ID"
148
		  OraDatabase.Parameters.Remove "BOM_ID"
149
		  %>
150
          <tr>
151
            <td colspan="6" background="images/bg_table_border.gif">
152
			 <table width="100%"  border="0" cellspacing="1" cellpadding="2">
153
              <tr>
154
                <td nowrap background="images/bg_table_col.gif"><img src="images/spacer.gif" width="1" height="1"></td>
155
              </tr>
156
             </table>
157
			</td>
158
          </tr>
159
         </table>	
160
		<!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
161
		</td>
162
      </tr>
163
    </table>
164
	</td>
165
    <td width="1%" valign="top" background="images/bg_favourits.gif">
166
	<!-- PERSONAL BAR +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
167
	<!--#include file="_personal_bar.asp"-->
168
	<!-- END OF PERSONAL BAR ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
169
   </td>
170
  </tr>
171
  <tr>
172
    <td background="images/bg_bage_0a.gif"><img src="images/spacer.gif" width="1" height="15"></td>
173
    <td background="images/bg_bage_1.gif"><img src="images/spacer.gif" width="1" height="1"></td>
174
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
175
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
176
  </tr>
177
  <tr>
178
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="20"></td>
179
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
180
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="1"></td>
181
    <td bgcolor="#FFFFFF">&nbsp;</td>
182
  </tr>
183
</table>
184
<!-- FOOTER ++++++++++++++++ -->
185
<!--#include file="_footer.asp"-->
186
<!-- +++++++++++++++++++++++ -->
187
</body>
188
</html>