Subversion Repositories DevTools

Rev

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

Rev 5357 Rev 5384
Line 23... Line 23...
23
%>
23
%>
24
<!--#include file="_access_control_general.asp"-->
24
<!--#include file="_access_control_general.asp"-->
25
<!--#include file="_access_control_login.asp"-->
25
<!--#include file="_access_control_login.asp"-->
26
<%
26
<%
27
'------------ VARIABLE DEFINITION -------------
27
'------------ VARIABLE DEFINITION -------------
28
Dim rsQry, healthTag, cmdInterface, pkgOwner, isInterface, package, procDesc
28
Dim rsQry
29
Dim sMessage
29
Dim sMessage
30
Dim GBE_MACHTYPE
-
 
31
Dim Query_String
30
Dim Query_String
32
Dim RecordCount
-
 
33
 
31
 
34
Dim display_name
32
Dim display_name
35
Dim machine_hostname
33
Dim machine_hostname
36
Dim gbe_id
34
Dim gbe_id
37
Dim active, activeChecked
35
Dim active, activeChecked
38
Dim description
36
Dim description
39
 
37
 
40
'------------ CONSTANTS DECLARATION -----------
38
'------------ CONSTANTS DECLARATION -----------
41
Const LIMG_PRODUCT = "<img src='icons/i_product.gif' width='19' height='19' hspace='2' align='absmiddle'>"
-
 
42
Const LIMG_PRODUCT_UNPACKAGED = "<img src='icons/i_product_unpackaged.gif' width='19' height='19' hspace='2' align='absmiddle' title='Product is unofficial'>"
-
 
43
Const LIMG_PRODUCT_PATCH = "<img src='icons/i_patch_small.gif' hspace='2' align='absmiddle'>"
-
 
44
'------------ VARIABLE INIT -------------------
39
'------------ VARIABLE INIT -------------------
45
sMessage = NULL
40
sMessage = NULL
46
 
-
 
47
 
-
 
48
Set objFormCollector = CreateObject("Scripting.Dictionary")
41
Set objFormCollector = CreateObject("Scripting.Dictionary")
49
'------------ CONDITIONS ----------------------
42
'------------ CONDITIONS ----------------------
50
'----------------------------------------------
43
'----------------------------------------------
51
%>
44
%>
52
<%
45
<%