Subversion Repositories DevTools

Rev

Rev 5925 | Rev 6590 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%
2
'=====================================================
5590 dpurdie 3
'   _dependencies_page.asp
145 ghuddy 4
'               Package Pages
119 ghuddy 5
'=====================================================
6
%>
7
<!--#include file="_tabs.asp"-->
8
<!--#include file="_action_buttons.asp"-->
9
<%
10
'------------ Variable Definition -------------
11
Dim parExtpkg, parExtrtag_id
12
Dim rsTemp
13
Dim CanIgnoreWarnings
14
'Dim parFileDiff
15
'Dim parComparePvId
16
'Dim parFileFilter
17
'Dim dFileFilter
18
'Dim parDepFilter
19
'Dim dDepFilter
20
'------------ Constants Declaration -----------
21
'------------ Variable Init -------------------
22
parExtpkg = QStrPar("extpkg")
23
parExtrtag_id = QStrPar("extrtag_id")
24
'----------------------------------------------
25
%>
6589 dpurdie 26
<script>
27
    // Support function to copy package name into the users clipboard
28
    function copyPackageName(el) {
29
        var rv = null;
30
        switch(el.value) {
31
        case "1": rv = "<%=pkgInfoHash.Item ("pkg_name")%>\ <%=pkgInfoHash.Item ("pkg_version")%>"; break;
32
        case "2": rv = "LinkPkgArchive ('<%=pkgInfoHash.Item ("pkg_name")%>', '<%=pkgInfoHash.Item ("pkg_version")%>');"; break;
33
        case "3": rv = "BuildPkgArchive ('<%=pkgInfoHash.Item ("pkg_name")%>', '<%=pkgInfoHash.Item ("pkg_version")%>');"; break;
34
        case "4": rv = "BuildName ('<%=pkgInfoHash.Item ("pkg_name")%>', '<%=pkgInfoHash.Item ("pkg_version")%>');"; break;
35
        }
36
        el.value = 0;
37
        vixTextToClipBoard("This is a text", {note : "Copied to Clipboard", duration : 1000});
38
    }
39
</script>
119 ghuddy 40
<%
41
'-----------------------------------------------------------------------------------------------------------------
42
Sub Print_Pkg_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
145 ghuddy 43
   Dim rsTemp, Query_String, noDependencies
44
   noDependencies = FALSE
45
 
46
 
47
   Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
48
 
49
   OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
50
   OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
51
 
52
   OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
53
   OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
54
 
55
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )
56
 
57
   CanIgnoreWarnings = FALSE
58
   If NNrtag_id <> "" AND is_daemon_enabled_release(NNrtag_id, TRUE) = FALSE Then
59
      If pkgInfoHash.Item("build_type") = "M" OR _
60
         ( pkgInfoHash.Item("build_type") = "A" AND pkgInfoHash.Item("dlocked") = "Y" ) OR _
61
         ( pkgInfoHash.Item("build_type") = "Y" AND pkgInfoHash.Item("dlocked") = "Y" ) Then
62
         CanIgnoreWarnings = TRUE
63
      End If
64
   End If
183 brianf 65
 
145 ghuddy 66
   %>
67
   <table width="100%" border="0" cellspacing="1" cellpadding="3">
68
      <form name="ignore_warnings" method="get" action="_ignore_warnings.asp" onSubmit="ProgressBar.style.visibility='visible';">
69
         <tr>
70
            <%If CanIgnoreWarnings Then%><td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Ignore<br>warnings</td><%End If%>
71
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
72
            <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>
73
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
74
            <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Released</td>
75
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
76
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
183 brianf 77
            <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field">&nbsp;&nbsp;&nbsp;</td>
145 ghuddy 78
         </tr>
79
         <%' Display "no dependencies" if needed%>
80
         <%If rsTemp.RecordCount = 0 Then%>
81
            <tr>
82
               <%If CanIgnoreWarnings Then%><td align="center" nowrap background="images/bg_form_lightgray.gif"></td><%End If%>
83
               <td align="center" background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
84
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
85
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
86
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
87
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
88
               <td background="images/bg_form_lightgray.gif" class="form_item"></td>
183 brianf 89
               <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
145 ghuddy 90
            </tr>
91
            <%
92
            noDependencies = TRUE
93
         End If
94
         %>
95
         <%
96
         Dim objTempSession, pkgURL, workInProgress
97
 
98
         Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
99
            pkgURL = "#"
4043 dpurdie 100
            If NOT IsNull(rsTemp.Fields("dpv_link")) Then
101
                pkgURL = scriptName &"?pv_id="& rsTemp("dpv_link") &"&rtag_id="& NNrtag_id
102
            ElseIf NOT IsNull(rsTemp.Fields("orig_pv_id")) Then
103
                pkgURL = scriptName &"?pv_id="& rsTemp("orig_pv_id")
104
            End If
145 ghuddy 105
 
106
            If rsTemp("latest_dlocked") = "N" Then
107
               workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
108
            Else
109
               workInProgress = ""
110
            End If
111
 
112
            %>
113
            <tr>
5175 dpurdie 114
               <%If CanIgnoreWarnings Then%>
115
					<td align="center" nowrap background="images/bg_form_lightbluedark.gif">
116
						<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") )%>>
117
					</td>
118
			   <%End If%>
145 ghuddy 119
               <td align="center" background="images/bg_form_lightgray.gif" class="form_item">
5175 dpurdie 120
				  <%=DefineStateIcon ( iif(rsTemp("pkg_state") <> 0,rsTemp("pkg_state"),rsTemp("deprecated_state")), rsTemp("dlocked"), rsTemp("ignore_warn"), rsTemp("is_patch_ignore"), pkgInfoHash.Item("build_type"), FALSE )%>
145 ghuddy 121
               </td>
4043 dpurdie 122
               <td background="images/bg_form_lightgray.gif" class="envPkg" nowrap><a href="<%=pkgURL%>" class="txt_linked"><%=rsTemp.Fields("dpkg_name")%></a></td>
145 ghuddy 123
               <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>
124
               <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>
5632 dpurdie 125
               <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 <%=DisplayDateTime ( rsTemp("modified_stamp")  )%><%End If%></td>
183 brianf 126
               <td background="images/bg_form_lightgray.gif" class="form_item">
5080 dpurdie 127
                        <%If (NOT pkgInfoHash.Item("is_sdkpkg")) AND ((pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R")) Then%>
5190 dpurdie 128
                            <a href="_remove_build_dependency.asp?pv_id=<%=NNpv_id%>&dpv_id=<%=rsTemp("orig_pv_id")%>&rtag_id=<%=NNrtag_id%>" onClick="return vixConfirmDelete('this Build Dependency');"><img src="images/i_delete.gif" alt="Remove from list." width="13" height="12" hspace="3" border="0" title="Delete this package as a dependency"></a>
5080 dpurdie 129
                        <%Else%>
130
                            <img src="images/i_delete_disable.gif" width="13" height="12" hspace="3" border="0" title="Delete this package as a dependency">
131
                        <%End If%>
132
               </td>
133
               <td background="images/bg_form_lightgray.gif" class="form_item">
5083 dpurdie 134
               <%If (NNrtag_id <> "") and ((CInt(rsTemp("pkg_state")) = enumPKG_NOT_FOUND) OR (CInt(rsTemp("pkg_state")) = enumPKG_SDK_DEPENDENCY)) Then%>
183 brianf 135
               <%
136
                 Dim sonclick
137
                 Dim surl
138
                 surl = "_wform_add_missing_dependency.asp" &_
139
                   "?rfile=" & scriptName &_
140
                   "&ppv_id=" & NNpv_id &_
141
                   "&pv_id=" & rsTemp("orig_pv_id") &_
142
                   "&rtag_id=" & NNrtag_id
5607 dpurdie 143
                 sonclick = "MM_openVixIFrame('" & surl & "','Add Dependency');"
183 brianf 144
               %>
5080 dpurdie 145
                 <img onclick="<%=sonclick%>" src="images/i_add_missing_dep.gif" alt="Add missing dependency." width="15" height="15" hspace="3" border="0" title="Add this package to the Release">
183 brianf 146
               <%Else%>
147
                 <img src="images/i_add_missing_dep.gif" width="15" height="15" hspace="3" border="0" style="visibility:hidden">
148
               <%End If%>
149
               </td>
150
 
151
 
145 ghuddy 152
            </tr>
153
            <%
154
            rsTemp.MoveNext
155
         Loop
156
         %>
157
        <tr>
5178 dpurdie 158
            <%If noDependencies OR releaseIsClosed(ReleaseMode) Then%>
145 ghuddy 159
               <td></td>
160
            <%Else%>
161
               <%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%>
162
            <%End If%>
163
            <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>
183 brianf 164
            <td><img src="images/spacer.gif" width="150" height="1"></td>
145 ghuddy 165
            <td></td>
166
            <td></td>
167
            <td></td>
168
         </tr>
169
         <input type="hidden" name="pv_id" value="<%=NNpv_id%>">
170
         <input type="hidden" name="rtag_id" value="<%=NNrtag_id%>">
171
      </form>
172
   </table>
173
   <%
174
   OraDatabase.Parameters.Remove "RTAG_ID"
175
   OraDatabase.Parameters.Remove "PV_ID"
176
   rsTemp.Close
177
   Set rsTemp = nothing
119 ghuddy 178
End Sub
179
'-----------------------------------------------------------------------------------------------------------------
180
Sub Print_Patch_Dependencies ( NNpv_id, NNrtag_id, BBextpkg )
145 ghuddy 181
   Dim rsTemp, Query_String, noDependencies
182
   noDependencies = FALSE
183
 
184
   Query_String = ReadFile( rootPath & "queries\dependencies.sql" )
185
 
186
   OraDatabase.Parameters.Add "RTAG_ID", NNrtag_id, ORAPARM_INPUT
187
   OraDatabase.Parameters("RTAG_ID").ServerType = ORATYPE_NUMBER
188
 
189
   OraDatabase.Parameters.Add "PV_ID", NNpv_id, ORAPARM_INPUT
190
   OraDatabase.Parameters("PV_ID").ServerType = ORATYPE_NUMBER
191
 
192
   Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, 0 )%>
193
 
194
   <table width="100%" border="0" cellspacing="1" cellpadding="3">
195
      <tr>
196
         <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>
197
         <td background="images/bg_form_lightbluedark.gif" nowrap width="100%" class="form_field"><%=imgPkgLockSpacer%>Version</td>
198
         <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field" align="center">Last&nbsp;Modified</td>
199
         <td background="images/bg_form_lightbluedark.gif" nowrap width="1%" class="form_field"></td>
200
      </tr>
201
      <%' Display "no dependencies" if needed%>
202
      <%If rsTemp.RecordCount = 0 Then%>
203
         <tr>
204
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
205
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
206
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
207
            <td background="images/bg_form_lightgray.gif" class="form_item">&nbsp;</td>
208
         </tr>
209
         <%
210
         noDependencies = TRUE
211
      End If
212
      %>
213
      <%
214
      Dim objTempSession, pkgURL, workInProgress
215
 
216
      Do Until ((rsTemp.BOF) OR (rsTemp.EOF))
217
         pkgURL = "#"
4043 dpurdie 218
         If NOT IsNull(rsTemp.Fields("dpv_link")) Then
219
            pkgURL = scriptName &"?pv_id="& rsTemp("orig_pv_id") &"&rtag_id="& parRtag_id
220
         ElseIf NOT IsNull(rsTemp.Fields("orig_pv_id")) Then
221
            pkgURL = scriptName &"?pv_id="& rsTemp("orig_pv_id")
222
         End If
145 ghuddy 223
 
224
         If rsTemp("latest_dlocked") = "N" Then
225
            workInProgress = "<img src='images/i_user.gif' width='10' height='13' border='0' alt='Work is in progress...' align='absmiddle' hspace='2'>"
226
         Else
227
            workInProgress = ""
228
         End If
229
 
230
         %>
231
         <tr>
232
            <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>
233
            <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>
5632 dpurdie 234
            <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 <%=DisplayDateTime ( rsTemp("modified_stamp") )%><%End If%></td>
155 ghuddy 235
            <td background="images/bg_form_lightgray.gif" class="form_item"><%If (pkgInfoHash.Item ("dlocked") = "N") OR (pkgInfoHash.Item ("dlocked") = "R") 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>
145 ghuddy 236
         </tr>
237
         <%
238
         rsTemp.MoveNext
239
      Loop
240
      %>
241
      <tr>
242
         <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>
243
         <td></td>
244
         <td></td>
245
         <td></td>
246
      </tr>
247
   </table>
248
   <%
249
   OraDatabase.Parameters.Remove "RTAG_ID"
250
   OraDatabase.Parameters.Remove "PV_ID"
251
   rsTemp.Close
252
   Set rsTemp = nothing
119 ghuddy 253
End Sub
254
'-----------------------------------------------------------------------------------------------------------------
255
Function Define_Ignore_State ( BBcurr_ignore_state, cIsPatchIgnore, NNpkg_state, SSlatest, SSdlocked )
145 ghuddy 256
   ' ==== Ignore Warning Rules ====
257
   ' ENABLE - Dependency is   official  AND  PKG_STATE is OK  AND  has no latest  AND  current ignore warning is not ticked AND not Patch Ignore
258
   ' ENABLE - current ignore state is ticked AND not Patch Ignore
259
 
260
   If  (SSdlocked = "Y") AND _
261
      ( (CInt(NNpkg_state) <> enumPKG_STATE_OK) OR (SSlatest <> "") ) _
262
   Then
263
 
264
      Define_Ignore_State = " "& BBcurr_ignore_state
265
 
266
   Else
267
 
268
      Define_Ignore_State = "disabled "& BBcurr_ignore_state
269
 
270
   End If
271
 
272
 
273
   'If ( (SSdlocked = "Y") AND _
274
   '     (CInt(NNpkg_state) = enumPKG_STATE_OK) AND _
275
   '     (SSlatest <> "") AND _
276
   '     IsNull(BBcurr_ignore_state) AND _
277
   '    IsNull(cIsPatchIgnore) ) _
278
   '   OR _
279
   '   ( NOT IsNull(BBcurr_ignore_state)  AND  IsNull(cIsPatchIgnore) ) Then
280
   '
281
   '   Define_Ignore_State = " "& BBcurr_ignore_state
282
   'Else
283
   '   Define_Ignore_State = "disabled "& BBcurr_ignore_state
284
   'End If
119 ghuddy 285
End Function
286
'-----------------------------------------------------------------------------------------------------------------
287
'-----------------------------------------------------------------------------------------------------------------
288
%>
289
<%
290
'------------------------- MAIN LINE ---------------------------
291
 
292
 
293
'---------------------------------------------------------------
294
%>
295
<%If (parPv_id <> "") Then%>
145 ghuddy 296
   <!-- MAIN PAGE ------------------------------------------>
297
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
298
      <tr>
299
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
185 brianf 300
         <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,parPv_id)%></td>
145 ghuddy 301
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
302
      </tr>
303
      <tr>
183 brianf 304
        <td background="images/bg_lght_gray.gif"><IMG height="45" src="images/spacer.gif" width=1></td>
305
        <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
306
        <td background="images/bg_lght_gray.gif">&nbsp;</td>
307
      </tr>
308
      <tr>
145 ghuddy 309
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
310
         <td valign="bottom" background="images/bg_lght_gray.gif">
311
            <table width="100" border="0" cellspacing="0" cellpadding="0">
312
               <tr>
4687 dpurdie 313
                  <td><IMG height="1" src="images/spacer.gif" width="0" alt="tab-left-margin" ></td>
145 ghuddy 314
                  <td>
315
                     <!-- TABS ------------------------------------->
316
                     <%Call Generate_Tab_Menu ( TABarray1, "Dependencies", "orange" )%>
317
                  </td>
318
               </tr>
319
            </table>
320
         </td>
321
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
322
      </tr>
323
      <tr>
324
         <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
325
         <td background="images/lbox_bg_orange.gif">
326
            <!-- TAB ACTION BUTTONS ------------------------------------->
327
            <%Call Action_Buttons ( "Build Dependencies" )%>
328
         </td>
329
         <td background="images/lbox_bg_orange.gif">&nbsp;</td>
330
      </tr>
331
      <tr>
332
         <td></td>
333
         <td valign="top">
334
            <!-- BUILD DEPENDENCIES ------------------------------------->
335
            <br>
336
            <fieldset>
337
               <legend class="body_colb">Build Dependencies</legend>
338
               <a name="DEPENDENCIES"></a>
339
               <%
340
               If pkgInfoHash.Item ("is_patch") = "Y" Then
341
                  Call Print_Patch_Dependencies ( parPv_id, parRtag_id, FALSE )
342
               Else
343
                  Call Print_Pkg_Dependencies ( parPv_id, parRtag_id, FALSE )
344
               End If
345
               %>
346
            </fieldset>
347
            <br><br>
348
            <!-- MODULE CHANGES ----------------------------------------->
349
            <table width="100%"  border="0" cellspacing="0" cellpadding="3">
350
               <tr>
351
                  <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>
352
               </tr>
353
            </table>
354
            <fieldset>
355
               <legend class="body_colb">Dependency Changes</legend>
356
               <!--#include file="_mod_dependency_changes.asp"-->
357
            </fieldset><br>
358
            <!----------------------------------------------------------->
359
         </td>
360
         <td>&nbsp;</td>
361
      </tr>
362
   </table>
119 ghuddy 363
 
364
<%Else%>
365
 
145 ghuddy 366
   <!-- NO PACKAGE SELECTED  ------------------------------------>
367
   <table width="100%" border="0" cellspacing="0" cellpadding="0">
368
      <tr>
369
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=35 src="images/spacer.gif" width=15></td>
185 brianf 370
         <td width="100%" background="images/bg_action_norm.gif"><%Call RenderActionBar(parRtag_id,NULL)%></td>
145 ghuddy 371
         <td width="1%" background="images/bg_action_norm.gif"><IMG height=1 src="images/spacer.gif" width=15></td>
372
      </tr>
373
      <tr>
374
         <td background="images/bg_lght_gray.gif"><IMG height=50 src="images/spacer.gif" width=1></td>
187 brianf 375
         <td background="images/bg_lght_gray.gif"><%Call RenderStatus(parRtag_id,parPv_id)%></td>
145 ghuddy 376
         <td background="images/bg_lght_gray.gif"></td>
377
      </tr>
378
      <tr>
379
         <td background="images/bg_lght_gray.gif"></td>
380
         <td valign="bottom" background="images/bg_lght_gray.gif">
381
            <table width="100" border="0" cellspacing="0" cellpadding="0">
382
               <tr>
383
                  <td><IMG height=1 src="images/spacer.gif" width=150></td>
384
                  <td><!-- TABS -------------------------------------></td>
385
               </tr>
386
            </table>
387
         </td>
388
         <td background="images/bg_lght_gray.gif">&nbsp;</td>
389
      </tr>
390
      <tr>
391
         <td background="images/lbox_bg_orange.gif"><IMG height=35 src="images/spacer.gif" width=1></td>
392
         <td background="images/lbox_bg_orange.gif"><span class="sublbox_ttl">&laquo;&nbsp;Select package</span></td>
393
         <td background="images/lbox_bg_orange.gif">&nbsp;</td>
394
      </tr>
395
      <tr>
396
         <td></td>
397
         <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>
398
         <td>&nbsp;</td>
399
      </tr>
400
   </table>
119 ghuddy 401
<%End If%>
145 ghuddy 402
<%'Response.write "TOTAL TIME: "&  Timer - tempTimer%>