Subversion Repositories DevTools

Rev

Rev 5951 | Rev 6623 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
119 ghuddy 1
<%
2
'=====================================================
3
'					  GLOBALS
4
'=====================================================
5
%>
6
<!--#include file="../class/classPersistanceModule.asp"-->
7
<!--#include file="../class/classAccessControl.asp"-->
8
<!--#include file="../class/classExceptionHandler.asp"-->
9
<%
10
' -- Variable Definition ------------------------------
11
Dim parRtag_id
5846 dpurdie 12
Dim pkgInfoHash                             ' See Get_Pkg_Info
5207 dpurdie 13
Dim releaseInfoHash
119 ghuddy 14
Dim objAccessControl
15
Dim objPMod
16
Dim objEH
17
Dim objTabControl
18
Dim aPersistList
19
Dim isPopupWindow
6577 dpurdie 20
Dim DB_PROJ_ID, DB_PROJ_NAME                ' Extracted from Request(proj_id) 
21
Dim DB_RTAG_ID, DB_RTAG_NAME                ' Extracted from Request(rtag_id)
22
Dim DB_PV_ID                                ' Extracted from Request(pv_id)
119 ghuddy 23
Dim TIMER_VALUE
3959 dpurdie 24
Dim rmDebug                                 ' Will display text in the footer area
5590 dpurdie 25
Dim sJqueryIformCancel                      ' ID of Cancel Button in Iframe
26
Dim bJqueryDataTables                       ' Include datatable support
27
Dim bJqueryForms                            ' Include Jquery Form support
28
Dim bJqueryVix                              ' Include vix jquery components
5636 dpurdie 29
Dim bJqueryTimePicker                       ' Include Date-Time picker
5590 dpurdie 30
Dim bJqueryCommonLoaded                     ' Prevent multiple loads
119 ghuddy 31
' -- Variable Initialisation --------------------------
5246 dpurdie 32
Set releaseInfoHash = Nothing
4063 dpurdie 33
rmDebug = ""
34
isPopupWindow = FALSE
5951 dpurdie 35
parRtag_id = QStrPar("rtag_id") : If parRtag_id = "" Then parRtag_id = Empty 
119 ghuddy 36
Set objAccessControl = New AccessControl
37
Set objPMod = New PersistanceModule
38
Set objEH = New ExceptionHandler
6577 dpurdie 39
Call GetCurrentParameters( DB_PROJ_ID, DB_PROJ_NAME, DB_RTAG_ID, DB_RTAG_NAME, DB_PV_ID )	' These parameters are used
5102 dpurdie 40
'-- rmDebug = rmDebug &  "Proj:" &  DB_PROJ_ID  & ",Rtag:" &  DB_RTAG_ID & ",Pvid:" & DB_PV_ID
119 ghuddy 41
TIMER_VALUE = DateDiff("N", "1/1/1900 00:00:00 AM", Now )	' Find number of minutes since some very old point in time
5085 dpurdie 42
bJqueryDataTables = FALSE
43
bJqueryForms = FALSE
5190 dpurdie 44
bJqueryVix = TRUE
5636 dpurdie 45
bJqueryTimePicker = FALSE
5590 dpurdie 46
bJqueryCommonLoaded = FALSE
119 ghuddy 47
' -- Constants ----------------------------------------
48
Const enumPAR_PROJ_ID 	= 0
49
Const enumPAR_RTAG_ID 	= 1
50
Const enumPAR_PV_ID 	= 2
51
Const enumPAR_RFILE 	= 3
52
Const enumPAR_ADD_TYPE 	= 4
53
Const enumPAR_DPV_ID 	= 5
5266 dpurdie 54
aPersistList = Array( "proj_id","rtag_id","pv_id","rfile","add_type","dpv_id","pkg_id" )
119 ghuddy 55
'-------------------------------------------------------
56
%>