| Line 22... |
Line 22... |
| 22 |
Dim DEPLOYMENT_MANAGER_URL
|
22 |
Dim DEPLOYMENT_MANAGER_URL
|
| 23 |
Dim PRODUCTION_MANAGER_URL
|
23 |
Dim PRODUCTION_MANAGER_URL
|
| 24 |
Dim RELEASE_MANAGER_URL
|
24 |
Dim RELEASE_MANAGER_URL
|
| 25 |
Dim strRelativePath ' Rel Path from script to URL
|
25 |
Dim strRelativePath ' Rel Path from script to URL
|
| 26 |
Dim managerSuiteBase ' Url to the base of the Manager Suite
|
26 |
Dim managerSuiteBase ' Url to the base of the Manager Suite
|
| - |
|
27 |
Dim siteRootUrl ' Full url to the base of the site
|
| 27 |
Dim MAIL_SERVER
|
28 |
Dim MAIL_SERVER
|
| 28 |
Dim FAULT_EMAIL_LIST
|
29 |
Dim FAULT_EMAIL_LIST
|
| 29 |
Dim FavIcon ' Favorite Icon
|
30 |
Dim FavIcon ' Favorite Icon
|
| 30 |
Dim ServiceConfig ' All service config
|
31 |
Dim ServiceConfig ' All service config
|
| 31 |
Dim ForcePageLogon ' Page Protection Mode
|
32 |
Dim ForcePageLogon ' Page Protection Mode
|
| Line 82... |
Line 83... |
| 82 |
data = Split(request.servervariables("URL"),"/")
|
83 |
data = Split(request.servervariables("URL"),"/")
|
| 83 |
GetManagerSuiteBase = "/" & data(1)
|
84 |
GetManagerSuiteBase = "/" & data(1)
|
| 84 |
End Function
|
85 |
End Function
|
| 85 |
|
86 |
|
| 86 |
'--------------------------------------------------------------------------------------
|
87 |
'--------------------------------------------------------------------------------------
|
| - |
|
88 |
Function getSiteRootUrl()
|
| - |
|
89 |
dim siteRootUrl, protocol, hostname, port
|
| - |
|
90 |
|
| - |
|
91 |
if Request.ServerVariables("HTTPS") = "off" then
|
| - |
|
92 |
protocol = "http"
|
| - |
|
93 |
else
|
| - |
|
94 |
protocol = "https"
|
| - |
|
95 |
end if
|
| - |
|
96 |
siteRootUrl = protocol & "://"
|
| - |
|
97 |
|
| - |
|
98 |
hostname = Request.ServerVariables("HTTP_HOST")
|
| - |
|
99 |
siteRootUrl = siteRootUrl & hostname
|
| - |
|
100 |
|
| - |
|
101 |
getSiteRootUrl = siteRootUrl
|
| - |
|
102 |
End Function
|
| - |
|
103 |
|
| - |
|
104 |
'--------------------------------------------------------------------------------------
|
| 87 |
' Determine if a variable or Const exists and is not empty
|
105 |
' Determine if a variable or Const exists and is not empty
|
| 88 |
' Use to check if a vbscript variable has been declared and contains a non-empty value
|
106 |
' Use to check if a vbscript variable has been declared and contains a non-empty value
|
| 89 |
Function isDefined( var)
|
107 |
Function isDefined( var)
|
| 90 |
If (not IsEmpty(Eval(var))) AND Eval(var & " <> """"") Then
|
108 |
If (not IsEmpty(Eval(var))) AND Eval(var & " <> """"") Then
|
| 91 |
isDefined = TRUE
|
109 |
isDefined = TRUE
|
| Line 158... |
Line 176... |
| 158 |
LXR_URL = "http://" & lxr_server & "/lxr/source"
|
176 |
LXR_URL = "http://" & lxr_server & "/lxr/source"
|
| 159 |
MAIL_SERVER = ServiceConfig("MAIL SERVER")
|
177 |
MAIL_SERVER = ServiceConfig("MAIL SERVER")
|
| 160 |
FAULT_EMAIL_LIST = ServiceConfig("FAULT EMAIL ADDRESS LIST")
|
178 |
FAULT_EMAIL_LIST = ServiceConfig("FAULT EMAIL ADDRESS LIST")
|
| 161 |
strRelativePath = GetPathToBase()
|
179 |
strRelativePath = GetPathToBase()
|
| 162 |
managerSuiteBase = GetManagerSuiteBase()
|
180 |
managerSuiteBase = GetManagerSuiteBase()
|
| - |
|
181 |
siteRootUrl = getSiteRootUrl()
|
| 163 |
APP_ROOT = Server.MapPath(".")
|
182 |
APP_ROOT = Server.MapPath(".")
|
| 164 |
QUERIES_PATH = APP_ROOT &"\queries"
|
183 |
QUERIES_PATH = APP_ROOT &"\queries"
|
| 165 |
scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )
|
184 |
scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )
|
| 166 |
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
|
185 |
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
|
| 167 |
DocRepositiryLink = DOC_REPOSITORY_URL & "docLinkTo.asp?docnum="
|
186 |
DocRepositiryLink = DOC_REPOSITORY_URL & "docLinkTo.asp?docnum="
|
| Line 253... |
Line 272... |
| 253 |
Const enum_imgSdkImport = "<img src='images/i_sdkpkg.png' width='15' height='15' border='0' title='This version imported via an SDK'>"
|
272 |
Const enum_imgSdkImport = "<img src='images/i_sdkpkg.png' width='15' height='15' border='0' title='This version imported via an SDK'>"
|
| 254 |
Const enum_imgSdkDep = "<img src='images/i_sdkdep.png' width='15' height='15' border='0' title='Not Found. Is a dependency only of the SDK and not required to be in this release.'>"
|
273 |
Const enum_imgSdkDep = "<img src='images/i_sdkdep.png' width='15' height='15' border='0' title='Not Found. Is a dependency only of the SDK and not required to be in this release.'>"
|
| 255 |
Const enum_imgUnBuildable = "<img src='icons/s_unbuildable.png' width='15' height='15' border='0' title='This package is unbuildable.'>"
|
274 |
Const enum_imgUnBuildable = "<img src='icons/s_unbuildable.png' width='15' height='15' border='0' title='This package is unbuildable.'>"
|
| 256 |
Const enum_imgRippleStop = "<img src='images/RippleStop.gif' width='16' height='16' border='0' title='Package is waiting for user to release the ripple stop'>"
|
275 |
Const enum_imgRippleStop = "<img src='images/RippleStop.gif' width='16' height='16' border='0' title='Package is waiting for user to release the ripple stop'>"
|
| 257 |
Const enum_imgRippleGo = "<img src='images/RippleGo.gif' width='16' height='16' border='0' title='Ripple stop released. Package waiting to build.'>"
|
276 |
Const enum_imgRippleGo = "<img src='images/RippleGo.gif' width='16' height='16' border='0' title='Ripple stop released. Package waiting to build.'>"
|
| 258 |
Const enum_imgClipBoard = "<img src='images/CopyToClipboard.ico' width='15' height='15' border='0' title='Copy package name to clipboard'>"
|
277 |
Const enum_imgClipBoard = "<img src='images/CopyToClipboard.ico' width='15' height='15' border='0' title='Copy package details to clipboard'>"
|
| 259 |
Const enum_imgClipBoard10 = "<img src='images/CopyToClipboard.ico' width='10' height='10' border='0' title='Copy names to clipboard'>"
|
278 |
Const enum_imgClipBoard10 = "<img src='images/CopyToClipboard.ico' width='10' height='10' border='0' title='Copy names to clipboard'>"
|
| 260 |
Const enum_imgClipBoard12 = "<img src='images/CopyToClipboard.ico' width='12' height='12' border='0' align='absmiddle' title='Copy names to clipboard'>"
|
279 |
Const enum_imgClipBoard12 = "<img src='images/CopyToClipboard.ico' width='12' height='12' border='0' align='absmiddle' title='Copy names to clipboard'>"
|
| 261 |
|
280 |
|
| 262 |
'------------ Release and Sdk States -----------
|
281 |
'------------ Release and Sdk States -----------
|
| 263 |
Const LIMG_OPEN_MODE = "<img src='images/i_rtag_open_mode.gif' border='0' align='absmiddle' hspace='2' title='Open Mode'>"
|
282 |
Const LIMG_OPEN_MODE = "<img src='images/i_rtag_open_mode.gif' border='0' align='absmiddle' hspace='2' title='Open Mode'>"
|