| Line 9... |
Line 9... |
| 9 |
'============ GLOBAL VARIABLES DEFINITION ============
|
9 |
'============ GLOBAL VARIABLES DEFINITION ============
|
| 10 |
Dim OraSession
|
10 |
Dim OraSession
|
| 11 |
Dim OraDatabase
|
11 |
Dim OraDatabase
|
| 12 |
Dim APP_ROOT
|
12 |
Dim APP_ROOT
|
| 13 |
Dim QUERIES_PATH
|
13 |
Dim QUERIES_PATH
|
| - |
|
14 |
Dim ENV_ORA_DATABASE
|
| - |
|
15 |
Dim ENV_ORA_CONNECTION
|
| 14 |
'============= VARIABLES INITIALISATION ==============
|
16 |
'============= VARIABLES INITIALISATION ==============
|
| 15 |
APP_ROOT = Get_Application_Path()
|
17 |
APP_ROOT = Get_Application_Path()
|
| 16 |
'==================== INCLUDE ASP ====================
|
18 |
ENV_ORA_DATABASE = getEnvVar("ORA_DATABASE")
|
| 17 |
'Call Include_File ( AppPath &"common\base_conf.asp" )
|
19 |
ENV_ORA_CONNECTION = getEnvVar("ORA_CONNECTION")
|
| 18 |
'================== CONFIGURATION ====================
|
20 |
'================== CONFIGURATION ====================
|
| - |
|
21 |
If ENV_ORA_DATABASE = "" OR ENV_ORA_CONNECTION = "" Then
|
| - |
|
22 |
Wscript.Echo "ERROR: EnvVars ENV_ORA_DATABASE and ENV_ORA_CONNECTION have not been set"
|
| - |
|
23 |
WScript.Quit (1)
|
| - |
|
24 |
End If
|
| 19 |
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
|
25 |
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
|
| 20 |
Set OraDatabase = OraSession.OpenDatabase( "RELMANU1", "DEPLOYMENT_MANAGER/DEPLOYMENT_MANAGER", Cint(0))
|
26 |
Set OraDatabase = OraSession.OpenDatabase( ENV_ORA_DATABASE, ENV_ORA_CONNECTION, Cint(0))
|
| 21 |
QUERIES_PATH = APP_ROOT &"jobs\queries"
|
27 |
QUERIES_PATH = APP_ROOT &"jobs\queries"
|
| 22 |
|
- |
|
| 23 |
Const UNC_ARCHIVE = "\\auperaunx26\releasem"
|
- |
|
| 24 |
Const URL_PATH_DPKG_ARCHIVE = "/dpkg_archive"
|
- |
|
| 25 |
Const URL_PATH_DEPLOY_ARCHIVE = "/deploy_archive"
|
- |
|
| 26 |
Const DPKG_ARCHIVE = "\dpkg_archive"
|
- |
|
| 27 |
Const DEPLOY_ARCHIVE = "\deploy_archive"
|
- |
|
| 28 |
Const TELNET_MACHINE = "auperaunx26" ' <-- If this machine name is changed, you need to rebuild pkg_archive.vbs
|
- |
|
| 29 |
Const TELNET_DPKG_ARCHIVE = "dpkg_archive"
|
- |
|
| 30 |
Const TELNET_RELEASES = "releases"
|
- |
|
| 31 |
Const TELNET_DEPLOY_ARCHIVE = "deploy_archive"
|
- |
|
| 32 |
Const QUERIES_FOLDER = "queries"
|
28 |
Const QUERIES_FOLDER = "queries"
|
| 33 |
Const DESCPKG_FILE = "descpkg"
|
- |
|
| 34 |
Const RELESE_NOTES_PERFIX = "RELEASE_NOTES"
|
- |
|
| 35 |
Const RELEASE_NOTES_TEMPLATE_A = "scripts\templates\release_notes_template_a.html"
|
- |
|
| 36 |
Const RELEASE_NOTES_TEMPLATE_B = "scripts\templates\release_notes_template_b.html"
|
- |
|
| 37 |
Const CKSUM_EXE = "scripts\bin\cksum.exe"
|
- |
|
| 38 |
Const MODCRC_EXE = "scripts\bin\modcrc.exe"
|
- |
|
| 39 |
Const SSH_EXE = "scripts\bin\plink.exe"
|
- |
|
| 40 |
Const WINRSH_EXE = "scripts\bin\winrsh32.exe"
|
- |
|
| - |
|
29 |
|
| 41 |
'======================== enums ======================
|
30 |
'======================== enums ======================
|
| 42 |
Const enumEVENT_SUCCESS = 0
|
31 |
Const enumEVENT_SUCCESS = 0
|
| 43 |
Const enumEVENT_ERROR = 1
|
32 |
Const enumEVENT_ERROR = 1
|
| 44 |
Const enumEVENT_WARNING = 2
|
33 |
Const enumEVENT_WARNING = 2
|
| 45 |
Const enumEVENT_INFORMATION = 4
|
34 |
Const enumEVENT_INFORMATION = 4
|