Subversion Repositories DevTools

Option Explicit
'=====================================================
'        Name:  config
' Description:  Contains all configuration details,
'                               enums, global constants and variables.
'=====================================================

'=========== GLOBAL CONSTANTS DECLARATION ============
'============ GLOBAL VARIABLES DEFINITION ============
Dim OraSession
Dim OraDatabase
Dim APP_ROOT
Dim QUERIES_PATH
Dim ENV_ORA_DATABASE
Dim ENV_ORA_CONNECTION
'============= VARIABLES INITIALISATION ==============
APP_ROOT = Get_Application_Path()
ENV_ORA_DATABASE = getEnvVar("ORA_DATABASE")
ENV_ORA_CONNECTION = getEnvVar("ORA_CONNECTION")
'================== CONFIGURATION ====================
If ENV_ORA_DATABASE = ""  OR ENV_ORA_CONNECTION = "" Then
    Wscript.Echo "ERROR: EnvVars ENV_ORA_DATABASE and ENV_ORA_CONNECTION have not been set" 
    WScript.Quit (1)
End If
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.OpenDatabase( ENV_ORA_DATABASE, ENV_ORA_CONNECTION, Cint(0))
QUERIES_PATH = APP_ROOT &"jobs\queries"
Const QUERIES_FOLDER = "queries"

'======================== enums ======================
Const enumEVENT_SUCCESS = 0
Const enumEVENT_ERROR = 1
Const enumEVENT_WARNING = 2
Const enumEVENT_INFORMATION = 4
'====================== OO4O =========================
const ORATYPE_VARCHAR2 = 1
const ORATYPE_NUMBER = 2
const ORATYPE_SINT = 3
const ORATYPE_FLOAT = 4
const ORATYPE_STRING = 5
const ORATYPE_VARCHAR = 9
const ORATYPE_DATE = 12
const ORATYPE_UINT = 68
const ORATYPE_RAW = 95
const ORATYPE_CHAR = 96
const ORATYPE_CHARZ = 97
const ORATYPE_MLSLABEL = 105
const ORATYPE_OBJECT = 108
const ORATYPE_REF = 110
const ORATYPE_CLOB = 112
const ORATYPE_BLOB = 113
const ORATYPE_BFILE = 114
const ORATYPE_VARRAY = 247
const ORATYPE_TABLE = 248
const ORATYPE_CURSOR = 102


const ORAPARM_INPUT=1
const ORAPARM_OUTPUT=2
const ORAPARM_BOTH=3

const ORADYN_DEFAULT=&H0&
'=====================================================