| Line 25... |
Line 25... |
| 25 |
'------------ VARIABLE DEFINITION -------------
|
25 |
'------------ VARIABLE DEFINITION -------------
|
| 26 |
Dim rsQry, healthTag, cmdInterface, pkgOwner, isInterface, package, procDesc
|
26 |
Dim rsQry, healthTag, cmdInterface, pkgOwner, isInterface, package, procDesc
|
| 27 |
Dim sMessage
|
27 |
Dim sMessage
|
| 28 |
Dim SEQ_proc_id
|
28 |
Dim SEQ_proc_id
|
| 29 |
'------------ CONSTANTS DECLARATION -----------
|
29 |
'------------ CONSTANTS DECLARATION -----------
|
| 30 |
Const LIMG_PRODUCT = "<img src='icons/i_product.gif' width='19' height='19' hspace='2' align='absmiddle'>"
|
- |
|
| 31 |
Const LIMG_PRODUCT_UNPACKAGED = "<img src='icons/i_product_unpackaged.gif' width='19' height='19' hspace='2' align='absmiddle' title='Product is unofficial'>"
|
- |
|
| 32 |
Const LIMG_PRODUCT_PATCH = "<img src='icons/i_patch_small.gif' hspace='2' align='absmiddle'>"
|
- |
|
| 33 |
'------------ VARIABLE INIT -------------------
|
30 |
'------------ VARIABLE INIT -------------------
|
| 34 |
sMessage = NULL
|
31 |
sMessage = NULL
|
| 35 |
isInterface = NULL
|
32 |
isInterface = NULL
|
| 36 |
'parOs_id = Request("os_id")
|
- |
|
| 37 |
'parBom_id = Request("bom_id")
|
- |
|
| 38 |
Set objFormCollector = CreateObject("Scripting.Dictionary")
|
33 |
Set objFormCollector = CreateObject("Scripting.Dictionary")
|
| 39 |
'------------ CONDITIONS ----------------------
|
34 |
'------------ CONDITIONS ----------------------
|
| 40 |
'----------------------------------------------
|
35 |
'----------------------------------------------
|
| 41 |
%>
|
36 |
%>
|
| 42 |
<%
|
37 |
<%
|