| Line 15... |
Line 15... |
| 15 |
Dim archive_server
|
15 |
Dim archive_server
|
| 16 |
Dim dpkg_archiveURL
|
16 |
Dim dpkg_archiveURL
|
| 17 |
Dim HTTP_PKG_ARCHIVE
|
17 |
Dim HTTP_PKG_ARCHIVE
|
| 18 |
Dim release_archiveURL
|
18 |
Dim release_archiveURL
|
| 19 |
Dim ACCESS_MANAGER_URL
|
19 |
Dim ACCESS_MANAGER_URL
|
| - |
|
20 |
Dim DEPLOYMENT_MANAGER_URL
|
| 20 |
Dim strRelativePath ' Rel Path from script to URL
|
21 |
Dim strRelativePath ' Rel Path from script to URL
|
| 21 |
Dim MAIL_SERVER
|
22 |
Dim MAIL_SERVER
|
| 22 |
|
23 |
|
| 23 |
' -- Variable Initialisation --------------------------
|
24 |
' -- Variable Initialisation --------------------------
|
| 24 |
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
|
25 |
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
|
| Line 78... |
Line 79... |
| 78 |
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
|
79 |
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
|
| 79 |
DocRepositiryLink = DOC_REPOSITORY_URL & "docLinkTo.asp?docnum="
|
80 |
DocRepositiryLink = DOC_REPOSITORY_URL & "docLinkTo.asp?docnum="
|
| 80 |
DocRepositiryLinkOld = DOC_REPOSITORY_URL & "docLinkTo.asp?old=1&fileid="
|
81 |
DocRepositiryLinkOld = DOC_REPOSITORY_URL & "docLinkTo.asp?old=1&fileid="
|
| 81 |
|
82 |
|
| 82 |
' -- Constants ----------------------------------------
|
83 |
' -- Constants ----------------------------------------
|
| 83 |
Const domainName = "VIX"
|
- |
|
| 84 |
HTTP_PKG_ARCHIVE = "http://" & archive_server
|
84 |
HTTP_PKG_ARCHIVE = "http://" & archive_server
|
| 85 |
dpkg_archiveURL = HTTP_PKG_ARCHIVE & "/dpkg_archive/"
|
85 |
dpkg_archiveURL = HTTP_PKG_ARCHIVE & "/dpkg_archive/"
|
| 86 |
release_archiveURL = HTTP_PKG_ARCHIVE & "/releases/"
|
86 |
release_archiveURL = HTTP_PKG_ARCHIVE & "/releases/"
|
| 87 |
ACCESS_MANAGER_URL = "http://" & Request.ServerVariables("HTTP_HOST") & "/Access_Manager"
|
87 |
ACCESS_MANAGER_URL = "http://" & Request.ServerVariables("HTTP_HOST") & "/Access_Manager"
|
| 88 |
' Const ACCESS_MANAGER_URL = "http://bms:8002/ManagerSuite/Access_Manager"
|
- |
|
| 89 |
' Const RELEASE_MANAGER_URL = "http://bms:8002/ManagerSuite/Release_Manager"
|
88 |
DEPLOYMENT_MANAGER_URL = "http://" & Request.ServerVariables("HTTP_HOST") & "/Deployment_Manager"
|
| 90 |
|
- |
|
| 91 |
' -- User Roles ---------------------------------------
|
- |
|
| 92 |
' S -> System Admin ( Full access to system for data alteration )
|
- |
|
| 93 |
' A -> Administrator (Full access to data manipulation)
|
- |
|
| 94 |
' P -> Power User (Ability to make release official, no access to ADMIN menu)
|
- |
|
| 95 |
%>
|
89 |
%>
|
| 96 |
<%
|
90 |
<%
|
| 97 |
'-- ERROR MESSAGES ---------------------------
|
91 |
'-- ERROR MESSAGES ---------------------------
|
| 98 |
Const enum_MSG_ERROR = "msg_error.asp"
|
92 |
Const enum_MSG_ERROR = "msg_error.asp"
|
| 99 |
Const enum_WMSG_ERROR = "wmsg_error.asp"
|
93 |
Const enum_WMSG_ERROR = "wmsg_error.asp"
|