<%
'===================================================================
'							Tab Controls
'===================================================================
%>
<%
'------------ VARIABLE DEFINITION -------------
Dim arrEnv, arrProductEnv
Dim LScriptName
Dim	strURL
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------

If scriptName = "find.asp" Then
	LScriptName = "dependencies.asp"
Else
	LScriptName = scriptName
End If
	
		
	'[1] Tab Name
	'[2] Tab Link
	'[3] JavaScript Event e.g. "onClick='...'"
	'[4] Tab Image Selected
	'[5] Tab Image Diselected
	'[6] Tab Image Disabled
	'[7] Tab Hint
	'[8] Force Disable. Values: Y, N(default)
If Request("keyword") = "" Then
	strURL = objPMod.ComposeURL()
Else
	strURL = objPMod.ComposeURL() + "&keyword="& Request("keyword")
End If
	
arrEnv = _
				Array ( "Work&nbsp;In&nbsp;Progress", _
						LScriptName &"?envtab="& enumENVTAB_WORK_IN_PROGRESS &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Pending", _
						LScriptName &"?envtab="& enumENVTAB_PLANNED &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Released", _
						LScriptName &"?envtab="& enumENVTAB_RELEASED &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"&nbsp;All&nbsp;", _
						LScriptName &"?envtab="& enumENVTAB_ALL &"&"& strURL, _
						"", _
						"", "", "", "", "" _
						
					  )
					  
arrProductEnv = _
				Array ( "Release", _
						LScriptName &"?envtab="& enumENVTAB_PRODRELEASE &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Integrate", _
						LScriptName &"?envtab="& enumENVTAB_INTEGRATE &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Test", _
						LScriptName &"?envtab="& enumENVTAB_TEST &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Deploy", _
						LScriptName &"?envtab="& enumENVTAB_DEPLOY &"&"& strURL, _
						"", _
						"", "", "", "", "", _
						
						"Reject", _
						LScriptName &"?envtab="& enumENVTAB_REJECT &"&"& strURL, _
						"", _
						"", "", "", "", "" _						
						
					  )
'----------------------------------------------
%>
<%
'------------ RUN BEFORE CONTROL RENDER -------
'----------------------------------------------
%>
<%
'------------ RUN AFTER CONTROL RENDER --------
'----------------------------------------------
%>