<%
'===================================================================
'							Tab Controls
'===================================================================
%>
<%
'------------ VARIABLE DEFINITION -------------
Dim arrUserAccount
Dim arrRole
Dim arrControl
Dim arrComputer
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------
	
	'[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)
	
	
arrUserAccount = _
				Array ( "General", _
						"User_General.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Applications", _
						"User_Applications.asp?"& objPMod.ComposeURLWith("user_id,tree"), _
						"", _
						"", "", "", "", "", _
						
						"Roles", _
						"User_Roles.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"User Permissions", _
						"User_Privileges.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Login Trail", _
						"User_LoginTrail.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "" _
					  )

arrRole = _
				Array ( "General", _
						"Role_General.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Members", _
						"Role_Members.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Role Permissions", _
						"Role_Privileges.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Data Filtering", _
						"Role_DataFiltering.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "" _
					  )					  

arrControl = _
				Array ( "General", _
						"Control_General.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "", _
						
						"Action Permissions", _
						"Control_Privileges.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", ""_
					  )	
					  

arrComputer = _
				Array ( "Computer Users", _
						"ClientList.asp?"& objPMod.ComposeURL(), _
						"", _
						"", "", "", "", "" _
					  )
'----------------------------------------------
%>
<%
'------------ RUN BEFORE CONTROL RENDER -------
'----------------------------------------------
%>
<%
'------------ RUN AFTER CONTROL RENDER --------
'----------------------------------------------
%>