Subversion Repositories DevTools

Rev

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

Rev 5102 Rev 5143
Line 39... Line 39...
39 
Const enumPAR_PV_ID 	= 2
 39 
Const enumPAR_PV_ID 	= 2
40 
Const enumPAR_RFILE 	= 3
 40 
Const enumPAR_RFILE 	= 3
41 
Const enumPAR_ADD_TYPE 	= 4
 41 
Const enumPAR_ADD_TYPE 	= 4
42 
Const enumPAR_DPV_ID 	= 5
 42 
Const enumPAR_DPV_ID 	= 5
43 
aPersistList = Array( "proj_id","rtag_id","pv_id","rfile","add_type","dpv_id" )
 43 
aPersistList = Array( "proj_id","rtag_id","pv_id","rfile","add_type","dpv_id" )
44 
' -- Very Baisc Functions -----------------------------
 - 
 
45 
' Determine if a variable or Const exists and is not empty
 - 
 
46 
'   Use to check if a vbscript variable has been declared and contains a non-empty value
 - 
 
47 
Function isDefined( var)
 - 
 
48 
    If (not IsEmpty(Eval(var))) AND Eval(var & " <> """"") Then
 - 
 
49 
        isDefined = TRUE
 - 
 
50 
    Else
 - 
 
51 
        isDefined = FALSE
 - 
 
52 
   End If
 - 
 
53 
End Function
 - 
 
54 
'-------------------------------------------------------
 44 
'-------------------------------------------------------
55 
%>
 45 
%>