Rev 3930 | Rev 3932 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<%@LANGUAGE="VBSCRIPT"%><%'====================================================='| |'| MEMBERS |'| MY ROLES - Access Details |'=====================================================%><%Option explicit' Good idea to set when using redirectResponse.Expires = 0 ' always load the page, dont store%><!--#include file="common/conf.asp"--><!--#include file="common/globals.asp"--><!--#include file="common/formating.asp"--><!--#include file="common/qstr.asp"--><!--#include file="common/common_subs.asp"--><%'------------ ACCESS CONTROL ------------------%><!--#include file="_access_control_login.asp"--><!--#include file="_access_control_general.asp"--><%'------------ Variable Definition -------------Dim rsTempDim rsQryDim sqlQueryDim parProj'------------ Constants Declaration -----------'------------ Variable Init -------------------parProj = QStrPar("proj_id")'----------------------------------------------Function chkbox( value )chkbox = "<input type='checkbox' disabled"If value Then chkbox = chkbox & " checked=yes"chkbox = chkbox & "/>"End Function'----------------------------------------------' Display the text (HTML allowed) as a tooltipFunction ToolTip(text)ToolTip = "<a href='#' class='tooltip'><img src='images/i_help.gif' style='height:12px;width:12px;border-width:0;'><span><i></i>"ToolTip = ToolTip & textToolTip = ToolTip & "</span></a>"End Function%><html><head><title>Release Manager</title><meta HTTP-EQUIV="Pragma" CONTENT="no-cache"><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><link rel="stylesheet" href="images/release_manager_style.css" type="text/css"><link rel="stylesheet" href="images/navigation.css" type="text/css"><script language="JavaScript" src="images/common.js"></script><script language="JavaScript">// Refresh this page with the specified projectfunction updatePage(proj_id){window.location.replace("members_my_access_details.asp?proj_id=" + proj_id);}</script><style type="text/css">/* a.tooltip {outline:none;text-decoration:none;border-bottom:dotted 1px blue;}*/a.tooltip strong {line-height:30px;}a.tooltip > span{width:200px;padding: 10px 20px;margin-top: 20px;margin-left: -85px;opacity: 0;visibility: hidden;z-index: 10;position: absolute;font-family:tahoma,sans-serif;font-size:11px;font-style:normal;font-weight:normal;white-space: normal;text-align: left;-webkit-border-radius: 3px;-moz-border-radius: 3px;-o-border-radius: 3px;border-radius: 3px;-webkit-box-shadow: 2px 2px 2px #999;-moz-box-shadow: 2px 2px 2px #999;box-shadow: 2px 2px 2px #999;-webkit-transition-property:opacity, margin-top, visibility, margin-left;-webkit-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;-webkit-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;-moz-transition-property:opacity, margin-top, visibility, margin-left;-moz-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;-moz-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;-o-transition-property:opacity, margin-top, visibility, margin-left;-o-transition-duration:0.4s, 0.3s, 0.4s, 0.3s;-o-transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;transition-property:opacity, margin-top, visibility, margin-left;transition-duration:0.4s, 0.3s, 0.4s, 0.3s;transition-timing-function: ease-in-out, ease-in-out, ease-in-out, ease-in-out;}a.tooltip:hover > span{opacity: 1;text-decoration:none;visibility: visible;overflow: visible;margin-top:25px;display: inline;margin-left: -60px;}/* Display the ^ as a part of the tooltip. Needs <i></i> */a.tooltip span i {width: 15px;height: 15px;margin-left: 20px;margin-top: -19px;display: block;position: absolute;-webkit-transform: rotate(-45deg);-moz-transform: rotate(-45deg);-o-transform: rotate(-45deg);transform: rotate(-45deg);-webkit-box-shadow: inset -1px 1px 0 #fff;-moz-box-shadow: inset 0 1px 0 #fff;-o-box-shadow: inset 0 1px 0 #fff;box-shadow: inset 0 1px 0 #fff;display: none\0/;*display: none;}a.tooltip > span {color: #000000;background: #FBF5E6;background: -moz-linear-gradient(top, #FBF5E6 0%, #FFFFFF 100%);background: -webkit-gradient(linear, left top, left bottom, color-stop(0%,#FBF5E6), color-stop(100%,#FFFFFF));filter: progid:DXImageTransform.Microsoft.gradient( startColorstr='#FBF5E6', endColorstr='#FFFFFF',GradientType=0 );border: 1px solid #CFB57C;}a.tooltip span i {background: #FBF5E6;border-top: 1px solid #CFB57C;border-right: 1px solid #CFB57C;}</style></head><body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" ><!-- TIPS LAYERS --------------------------------------><div id="formTipsLayer" style="position: absolute; z-index: 1000; visibility: hidden; left:0; top: 0; width: 10"> </div><!-----------------------------------------------------><!-- HEADER --><!--#include file="_header.asp"--><!-- BODY ----><table width="100%" border="0" cellspacing="0" cellpadding="0"><tr><td width="1%" background="images/bg_member_dark.gif" valign="top"><!-- MEMBERS MENU ----------------------------------------------><!--#include file="members_menu_def.asp"--><%Call Member_Menu( "my_roles" )%><!-- MEMBERS MENU END ------------------------------------------></td><td width="1%" valign="top" background="images/bg_member_light.gif"><a href="index.asp" class="form_txt_link"><img src="images/i_home.gif" width="13" height="12" border="0" align="absmiddle">Exit</a></td><td rowspan="2" valign="top" width="70%" background="images/bg_member_light.gif" nowrap><!-------------------------------------------><br><span class="mmb_ttl">My Access Details</span><br><table width="100%" border="0" cellspacing="0" cellpadding="0"><form><tr><td width="1%"> </td><td align="right"><img src="images/h_trsp_dot.gif" width="500" height="30"></td><td width="1%"> </td></tr><tr><td align="left" valign="top" width="1%" background="images/bg_member_dark.gif"><img src="images/h_trsp_dot.gif" width="13" height="13"></td><td background="images/bg_member_dark.gif" align="left" class="wform_ttl"> </td><td align="right" valign="top" width="1%" background="images/bg_member_dark.gif"> </td></tr><tr><td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td><td bgcolor="#FFFFFF" valign="top" class="form_item"><table class="full_table"><tr class="form_item"><td>You have access to do:</td><td align="right"><select name="projA" class="form_item" onChange="updatePage(this.value)" ><option value="">-- Select Project --</option><%OraDatabase.Parameters.Add "PROJ_ID", parProj, ORAPARM_INPUT, ORATYPE_NUMBERSet rsQry = OraDatabase.DbCreateDynaset( GetQuery("ProjectsCombo.sql"), cint(0))OraDatabase.Parameters.Remove "PROJ_ID"While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))%><option value="<%=rsQry("proj_id")%>" <%=rsQry("selected")%>><%=rsQry("proj_name")%></option><%rsQry.MoveNextWEndrsQry.CloseSet rsQry = Nothing%></select></td></table><table width="100%" border="0" cellspacing="1" cellpadding="2"><tr background="images/bg_form_lightbluedark.gif" class="form_field" style="white-space:nowrap"><td><b>Action </b><%=ToolTip("The internal name of the access control")%></td><td><b>Description</b><%=ToolTip("A description of the access control item")%></td><td colspan=2 align="center"><b>Access</b><%=ToolTip("<h4>Project Independent Permissions</h4>These are the basic permissions before project specific control elements have been applied.")%></td><td colspan=2 align="center"><b>Data</b><%=ToolTip("<h4>Project Specific Permissions</h4>These are the permissions after project-specfic control elements have been applied.")%></td></tr><tr background="images/bg_form_lightbluedark.gif" class="form_field"><td colspan=2></td><td><b>Active</b><%=ToolTip("The associated action should be available.<br>Controls do not need to visible for an action to be available.")%></td><td><b>Visible</b><%=ToolTip("The associated action may have a control button that is shown to the user.<br>If the action is not active then the action should not be available to the user.")%></td><td><b>Active</b></td><td><b>Visible</b></td></tr><%sqlQuery = "select obj_name, obj_description " &_"from control_objects co " &_"where co.app_id = :APP_ID " &_"order by UPPER(co.obj_name)"OraDatabase.Parameters.Add "APP_ID", APPLICATION_ID, ORAPARM_INPUT, ORATYPE_NUMBERSet rsTemp = OraDatabase.DbCreateDynaset(sqlQuery, cint(0))OraDatabase.Parameters.Remove "APP_ID"While ((NOT rsTemp.BOF) AND (NOT rsTemp.EOF))%><tr background="images/bg_form_lightgray.gif" class="form_item"><td nowrap><%=rsTemp("obj_name")%></td><td><%=rsTemp("obj_description")%></td><td align="right"><%=chkbox(objAccessControl.IsActive(rsTemp("obj_name")))%></td><td><%=chkbox(objAccessControl.IsVisible(rsTemp("obj_name")))%></td><%If parProj <> "" Then %><td align="right"><%=chkbox(objAccessControl.IsDataActive ("PROJECTS", DB_PROJ_ID, rsTemp("obj_name")))%></td><td><%=chkbox(objAccessControl.IsDataVisible ("PROJECTS", DB_PROJ_ID, rsTemp("obj_name")))%></td><%End If%></tr><%rsTemp.MoveNextWEndrsTemp.Close()Set rsTemp = nothing%></table><br><br></td><td width="1%" background="images/lbox_bgside_white.gif"> </td></tr><tr><td width="1%" background="images/bg_member_dark.gif" valign="bottom"><img src="images/h_trsp_dot.gif" width="13" height="13"></td><td background="images/bg_member_dark.gif"></td><td width="1%" background="images/bg_member_dark.gif" valign="bottom" align="right"><img src="images/h_trsp_dot.gif" width="13" height="13"></td></tr></form></table><!--------------------------------------------------------></td><td rowspan="2" valign="bottom" width="100%" background="images/bg_member_light.gif" align="right"></td></tr><tr><td valign="bottom" align="center" background="images/bg_member_dark.gif"><img src="images/img_members.gif" width="81" height="57" vspace="20" hspace="30"></td><td background="images/bg_member_light.gif" valign="top"><img src="images/h_trsp_dot.gif" width="100" height="400"></td></tr></table><!-- FOOTER --><!--#include file="_footer.asp"--></body></html><%Call Destroy_All_Objects%>