Subversion Repositories DevTools

Rev

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

Rev 15 Rev 17
Line 8... Line 8...
8
Dim OraSession, OraDatabase		' DB connection
8
Dim OraSession, OraDatabase		' DB connection
9
Dim QUERIES_PATH
9
Dim QUERIES_PATH
10
Dim SCRIPT_NAME
10
Dim SCRIPT_NAME
11
Dim TNS_NAME, DB_AUTHENTICATION
11
Dim TNS_NAME, DB_AUTHENTICATION
12
Dim APP_ROOT
12
Dim APP_ROOT
-
 
13
Dim rootPath
-
 
14
Dim scriptName
13
' -----------------------------------------------------
15
' -----------------------------------------------------
14
%>
16
%>
15
<%
17
<%
16
' -- DATABASE CONNECTIONS -----------------------------
18
' -- DATABASE CONNECTIONS -----------------------------
17
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
19
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Line 30... Line 32...
30
Const APPLICATION_ID = 1  			' Stored in Deployment Manager, [APPLICATIONS] table
32
Const APPLICATION_ID = 1  			' Stored in Deployment Manager, [APPLICATIONS] table
31
APP_ROOT = Server.MapPath(".")
33
APP_ROOT = Server.MapPath(".")
32
TNS_NAME = Application("TNS_NAME") '"RELEASEM"	
34
TNS_NAME = Application("TNS_NAME") '"RELEASEM"	
33
DB_AUTHENTICATION = Application("DEPLOYMENT_MANAGER_LOGIN") '"release_manager_devl/release_manager_devl"								' DEVL schema
35
DB_AUTHENTICATION = Application("DEPLOYMENT_MANAGER_LOGIN") '"release_manager_devl/release_manager_devl"								' DEVL schema
34
QUERIES_PATH = APP_ROOT &"\queries"
36
QUERIES_PATH = APP_ROOT &"\queries"
-
 
37
scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )
-
 
38
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
35
Const ADMIN_EMAIL = "releasem@erggroup.com"
39
Const ADMIN_EMAIL = "releasem@erggroup.com"
36
Const enumDB_PERMISSION_TYPE_VISIBLE = 1		' Stored in Access Manager, [Permission_Types] table
40
Const enumDB_PERMISSION_TYPE_VISIBLE = 1		' Stored in Access Manager, [Permission_Types] table
37
Const enumDB_PERMISSION_TYPE_ACTIVE = 2			' Stored in Access Manager, [Permission_Types] table
41
Const enumDB_PERMISSION_TYPE_ACTIVE = 2			' Stored in Access Manager, [Permission_Types] table
38
Const enumRELEASES_DAYS_BACK_IN_TIME = 7		' Number of days back in time searching for released products
42
Const enumRELEASES_DAYS_BACK_IN_TIME = 7		' Number of days back in time searching for released products
39
Const ACCESS_MANAGER_URL = "http://erg:8002/ManagerSuite/Access_Manager"
43
Const ACCESS_MANAGER_URL = "http://erg:8002/ManagerSuite/Access_Manager"