Subversion Repositories DevTools

Rev

Rev 5506 | Rev 7291 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5506 Rev 6879
Line 13... Line 13...
13
 
13
 
14
If scriptName = "find.asp" Then
14
If scriptName = "find.asp" Then
15
	LScriptName = "dependencies.asp"
15
	LScriptName = "dependencies.asp"
16
Else
16
Else
17
	LScriptName = scriptName
17
	LScriptName = scriptName
18
End If
18
End If 
19
	
-
 
20
		
-
 
21
	'[1] Tab Name
19
    '[1] Tab Image
22
	'[2] Tab Link
20
	'[2] Tab Name
23
	'[3] JavaScript Event e.g. "onClick='...'"
-
 
24
	'[4] Tab Image Selected
-
 
25
	'[5] Tab Image Diselected
-
 
26
	'[6] Tab Image Disabled
-
 
27
	'[7] Tab Hint
21
	'[3] Tab Link
28
	'[8] Force Disable. Values: Y, N(default)
-
 
29
If Request("keyword") = "" Then
22
If Request("keyword") = "" Then
30
	strURL = objPMod.ComposeURL()
23
	strURL = objPMod.ComposeURL()
31
Else
24
Else
32
	strURL = objPMod.ComposeURL() + "&keyword="& Request("keyword")
25
	strURL = objPMod.ComposeURL() + "&keyword="& Request("keyword")
33
End If
26
End If
34
	
27
 
35
arrEnv = _
28
arrEnv = Array ( _
36
				Array ( "Work In Progress", _
-
 
37
						LScriptName &"?envtab="& enumENVTAB_WORK_IN_PROGRESS &"&"& strURL, _
29
                Array("","Work In Progress",LScriptName &"?envtab="& enumENVTAB_WORK_IN_PROGRESS &"&"& strURL),_
38
						"", _
-
 
39
						"", "", "", "", "", _
-
 
40
						
-
 
41
						"Pending", _
-
 
42
						LScriptName &"?envtab="& enumENVTAB_PLANNED &"&"& strURL, _
30
                Array("","Pending",LScriptName &"?envtab="& enumENVTAB_PLANNED &"&"& strURL),_
43
						"", _
-
 
44
						"", "", "", "", "", _
-
 
45
						
-
 
46
						"Released", _
-
 
47
						LScriptName &"?envtab="& enumENVTAB_RELEASED &"&"& strURL, _
31
                Array("","Released",LScriptName &"?envtab="& enumENVTAB_RELEASED &"&"& strURL),_
48
						"", _
-
 
49
						"", "", "", "", "", _
-
 
50
						
-
 
51
						" All ", _
-
 
52
						LScriptName &"?envtab="& enumENVTAB_ALL &"&"& strURL, _
32
                Array(""," All",LScriptName &"?envtab="& enumENVTAB_ALL &"&"& strURL))
53
						"", _
-
 
54
						"", "", "", "", "" _
-
 
55
						
33
 
56
					  )
-
 
57
					  
-
 
58
arrProductEnv = _
34
arrProductEnv = Array ( _
59
				Array ( "Release", _
-
 
60
						LScriptName &"?envtab="& enumENVTAB_PRODRELEASE &"&"& strURL, _
35
                Array("","Release",LScriptName &"?envtab="& enumENVTAB_PRODRELEASE &"&"& strURL),_
61
						"", _
-
 
62
						"", "", "", "", "", _
-
 
63
						
-
 
64
						"Integrate", _
-
 
65
						LScriptName &"?envtab="& enumENVTAB_INTEGRATE &"&"& strURL, _
36
                Array("","Integrate",LScriptName &"?envtab="& enumENVTAB_INTEGRATE &"&"& strURL),_
66
						"", _
-
 
67
						"", "", "", "", "", _
-
 
68
						
-
 
69
						"Test", _
-
 
70
						LScriptName &"?envtab="& enumENVTAB_TEST &"&"& strURL, _
37
                Array("","Test",LScriptName &"?envtab="& enumENVTAB_TEST &"&"& strURL),_
71
						"", _
-
 
72
						"", "", "", "", "", _
-
 
73
						
-
 
74
						"Deploy", _
-
 
75
						LScriptName &"?envtab="& enumENVTAB_DEPLOY &"&"& strURL, _
38
                Array("","Deploy",LScriptName &"?envtab="& enumENVTAB_DEPLOY &"&"& strURL),_
76
						"", _
-
 
77
						"", "", "", "", "", _
-
 
78
						
-
 
79
						"Reject", _
-
 
80
						LScriptName &"?envtab="& enumENVTAB_REJECT &"&"& strURL, _
39
                Array("","Reject",LScriptName &"?envtab="& enumENVTAB_REJECT &"&"& strURL))
81
						"", _
-
 
82
						"", "", "", "", "" _						
-
 
83
						
-
 
84
					  )
-
 
85
'----------------------------------------------
-
 
86
%>
-
 
87
<%
-
 
88
'------------ RUN BEFORE CONTROL RENDER -------
-
 
89
'----------------------------------------------
-
 
90
%>
-
 
91
<%
40
 
92
'------------ RUN AFTER CONTROL RENDER --------
-
 
93
'----------------------------------------------
-
 
94
%>	
41
%>	
95
42