Subversion Repositories DevTools

Rev

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

Rev 4554 Rev 4807
Line 10... Line 10...
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
 13 
Dim rootPath
14 
Dim scriptName
 14 
Dim scriptName
- 
 
 15 
Dim SMTP_HOST
15 
' -----------------------------------------------------
 16 
' -----------------------------------------------------
16 
%>
 17 
%>
17 
<%
 18 
<%
18 
' -- DATABASE CONNECTIONS -----------------------------
 19 
' -- DATABASE CONNECTIONS -----------------------------
19 
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
 20 
'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Line 23... Line 24...
23 
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
 24 
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
24 
Set OraDatabase = OraSession.OpenDatabase( Application("TNS_NAME"), Application("DEPLOYMENT_MANAGER_LOGIN"), Cint(0))
 25 
Set OraDatabase = OraSession.OpenDatabase( Application("TNS_NAME"), Application("DEPLOYMENT_MANAGER_LOGIN"), Cint(0))
25 
' -----------------------------------------------------
 26 
' -----------------------------------------------------
26 
%>
 27 
%>
27 
<%
 28 
<%
- 
 
 29 
'--------------------------------------------------------------------------------------
- 
 
 30 
'Returns the server of the package archive
- 
 
 31 
Function Get_Mail_Server()
- 
 
 32 
   Dim sqry: sqry = "SELECT * FROM RELEASE_MANAGER.BUILD_SERVICE_CONFIG WHERE SERVICE='MAIL SERVER'"
- 
 
 33 
   Dim rsTemp
- 
 
 34 
   Set rsTemp = OraDatabase.DbCreateDynaset( sqry , cint(0) )
- 
 
 35 
   Get_Mail_Server = rsTemp("config")
- 
 
 36 
   rsTemp.Close()
- 
 
 37 
   Set rsTemp = Nothing
- 
 
 38 
End Function
- 
 
 39 
 
28 
' -- CONFIGURATIONS -----------------------------------
 40 
' -- CONFIGURATIONS -----------------------------------
29 
Const APPLICATION_ID = 1  			' Stored in Deployment Manager, [APPLICATIONS] table
 41 
Const APPLICATION_ID = 1  			' Stored in Deployment Manager, [APPLICATIONS] table
30 
APP_ROOT = Server.MapPath(".")
 42 
APP_ROOT = Server.MapPath(".")
31 
TNS_NAME = Application("TNS_NAME") '"RELEASEM"
 43 
TNS_NAME = Application("TNS_NAME") '"RELEASEM"
32 
DB_AUTHENTICATION = Application("DEPLOYMENT_MANAGER_LOGIN") '"release_manager_devl/release_manager_devl"								' DEVL schema
 44 
DB_AUTHENTICATION = Application("DEPLOYMENT_MANAGER_LOGIN") '"release_manager_devl/release_manager_devl"								' DEVL schema
33 
QUERIES_PATH = APP_ROOT &"\queries"
 45 
QUERIES_PATH = APP_ROOT &"\queries"
34 
scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )
 46 
scriptName = Mid(Request.ServerVariables("SCRIPT_NAME"), InStrRev(Request.ServerVariables("SCRIPT_NAME"), "/") + 1 )
35 
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
 47 
rootPath = Left( Server.MapPath( scriptName ), InStrRev(Server.MapPath( scriptName ), "\") )
- 
 
 48 
SMTP_HOST = Get_Mail_Server()
36 
Const ADMIN_EMAIL = "VixIT@vixtechnology.com"
 49 
Const ADMIN_EMAIL = "VixIT@vixtechnology.com"
37 
Const JIRA_URL    = "http://cloudajir01.vix.local:8080"
 50 
Const JIRA_URL    = "http://cloudajir01.vix.local:8080"
38 
Const JIRA_CREDENTAILS = "ReleaseManager:r3l3@se4J!r@"
 51 
Const JIRA_CREDENTAILS = "ReleaseManager:r3l3@se4J!r@"
39 
Const enumDB_PERMISSION_TYPE_VISIBLE = 1		' Stored in Access Manager, [Permission_Types] table
 52 
Const enumDB_PERMISSION_TYPE_VISIBLE = 1		' Stored in Access Manager, [Permission_Types] table
40 
Const enumDB_PERMISSION_TYPE_ACTIVE = 2			' Stored in Access Manager, [Permission_Types] table
 53 
Const enumDB_PERMISSION_TYPE_ACTIVE = 2			' Stored in Access Manager, [Permission_Types] table
Line 73... Line 86...
73 
Const enumMSSQL_ERROR = "<img src='icons/i_no_db_connection.gif' width='16' height='17' hspace='2' border='0' align='absmiddle' title='3rd party database is off-line'><SPAN class='body_txtr'>Information not currently available.</SPAN>"
 86 
Const enumMSSQL_ERROR = "<img src='icons/i_no_db_connection.gif' width='16' height='17' hspace='2' border='0' align='absmiddle' title='3rd party database is off-line'><SPAN class='body_txtr'>Information not currently available.</SPAN>"
74 
Const enumSESSION_COPY_TYPE = "COPY_TYPE"
 87 
Const enumSESSION_COPY_TYPE = "COPY_TYPE"
75 
Const enumSESSION_COPY_ITEMS = "COPY_ITEMS"
 88 
Const enumSESSION_COPY_ITEMS = "COPY_ITEMS"
76 
Const enumSESSION_COPY_FROM = "COPY_FROM"
 89 
Const enumSESSION_COPY_FROM = "COPY_FROM"
77 
Const enumLOADING = "Loading..."
 90 
Const enumLOADING = "Loading..."
- 
 
 91 
Const enum_MSG_ERROR    = "msg_error.asp"
- 
 
 92 
Const enum_RELMGR_ERRDESCRIPTION = "RELMGR_ERRDESCRIPTION"		' session variable where long error message is stored before display to user
78 
' -- ACTION TRAIL -------------------------------------
 93 
' -- ACTION TRAIL -------------------------------------
79 
Const enumAT_EVENT_COMMENT 	= 0
 94 
Const enumAT_EVENT_COMMENT 	= 0
80 
Const enumAT_EVENT_ADDED 	= 1
 95 
Const enumAT_EVENT_ADDED 	= 1
81 
Const enumAT_EVENT_MODIFIED = 2
 96 
Const enumAT_EVENT_MODIFIED = 2
82 
Const enumAT_EVENT_REMOVED 	= 3
 97 
Const enumAT_EVENT_REMOVED 	= 3
83 
Const SMTP_HOST = "auperadom10.vix.local"
 - 
 
84 
Const enum_MSG_PROCESS_EXISTS = "msg_process_exists.asp"
 98 
Const enum_MSG_PROCESS_EXISTS = "msg_process_exists.asp"
85 
' -----------------------------------------------------
 99 
' -----------------------------------------------------
86 
%>
 100 
%>
87 
<%
 101 
<%
88 
' -- OO4O ---------------------------------------------
 102 
' -- OO4O ---------------------------------------------
Line 105... Line 119...
105 
const ORATYPE_BFILE = 114
 119 
const ORATYPE_BFILE = 114
106 
const ORATYPE_VARRAY = 247
 120 
const ORATYPE_VARRAY = 247
107 
const ORATYPE_TABLE = 248
 121 
const ORATYPE_TABLE = 248
108 
const ORATYPE_CURSOR = 102
 122 
const ORATYPE_CURSOR = 102
109 
 
 123 
 
- 
 
 124 
const ORALOB_ONE_PIECE = 0
- 
 
 125 
const ORALOB_FIRST_PIECE = 1
- 
 
 126 
const ORALOB_NEXT_PIECE = 2
- 
 
 127 
const ORALOB_LAST_PIECE = 3
- 
 
 128 
 
- 
 
 129 
Const ORALOB_SUCCESS = 0
- 
 
 130 
Const ORALOB_NEED_DATA = 99
- 
 
 131 
Const ORALOB_NODATA = 100
110 
 
 132 
 
111 
const ORAPARM_INPUT=1
 133 
const ORAPARM_INPUT=1
112 
const ORAPARM_OUTPUT=2
 134 
const ORAPARM_OUTPUT=2
113 
const ORAPARM_BOTH=3
 135 
const ORAPARM_BOTH=3
114 
 
 136